URL
https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk
Subversion Repositories openrisc_2011-10-31
[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc2/] [gcc/] [testsuite/] [gcc.dg/] [pr42427.c] - Rev 298
Go to most recent revision | Compare with Previous | Blame | View Log
/* { dg-do assemble { target c99_runtime } } */ /* { dg-options "-O2 -fexceptions -fnon-call-exceptions -fpeel-loops" } */ /* { dg-add-options c99_runtime } */ /* { dg-require-effective-target ilp32 } */ #include <complex.h> extern double myabs (complex double); void test (double *help, complex double *wm, long nz) { long k; double znew; double zold; for (k = 0; k < nz; k++) { znew = myabs (wm[k]); zold = help[k]; help[k] = znew; } }
Go to most recent revision | Compare with Previous | Blame | View Log