URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [20040625-1.c] - Rev 154
Go to most recent revision | Compare with Previous | Blame | View Log
/* { dg-do run } */ /* { dg-options "-O2" } */ /* { dg-options "-mminimal-toc" { target { { powerpc*-*-* && lp64 } || { powerpc-ibm-aix* } } } } */ extern void abort (void); extern void exit (int); double __attribute__((noinline)) foo (void) { return 16441577472.0; } double __attribute__((noinline)) bar (double x) { return x; } int __attribute__((noinline)) test (void) { double x = foo (); x = bar (x); x /= 1024L * 1024L * 1024L; x *= 70; x = x < 70 ? x : 70; x += 30; return x; } int main (void) { if (test () != 100) abort (); exit (0); }
Go to most recent revision | Compare with Previous | Blame | View Log