URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [980526-1.c] - Rev 689
Compare with Previous | Blame | View Log
/* { dg-do compile { target fpic } } */ /* { dg-options "-O2 -fpic" } */ int test(void) { double value, maxValue = - (__extension__ ((union { unsigned __l __attribute__((__mode__(__DI__))); double __d; }) { __l: 0x7ff0000000000000ULL }).__d) ; int idx, maxIdx = 1; for (idx = 1; idx < 22; idx++) { if (value > maxValue) { maxValue = value; maxIdx = idx; } } return 0 ; }