URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [ieee/] [20030331-1.c] - Rev 774
Go to most recent revision | Compare with Previous | Blame | View Log
extern void exit (int); extern void abort (void); float x = -1.5f; float rintf () { static const float TWO23 = 8388608.0; if (__builtin_fabs (x) < TWO23) { if (x > 0.0) { x += TWO23; x -= TWO23; } else if (x < 0.0) { x = TWO23 - x; x = -(x - TWO23); } } return x; } int main (void) { if (rintf () != -2.0) abort (); exit (0); }
Go to most recent revision | Compare with Previous | Blame | View Log