remove unused files
[platform/upstream/gcc48.git] / gcc / testsuite / gcc.dg / pr42427.c
1 /* { dg-do assemble { target c99_runtime } } */
2 /* { dg-options "-O2 -fexceptions -fnon-call-exceptions -fpeel-loops" } */
3 /* { dg-add-options c99_runtime } */
4 /* { dg-require-effective-target ilp32 } */
5
6 #include <complex.h>
7
8 extern double myabs (complex double);
9
10 void
11 test (double *help, complex double *wm, long nz)
12 {
13   long k;
14   double znew;
15   double zold;
16   for (k = 0; k < nz; k++)
17     {
18       znew = myabs (wm[k]);
19       zold = help[k];
20       help[k] = znew;
21     }
22 }