summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gcc.dg/pr42427.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/testsuite/gcc.dg/pr42427.c')
-rw-r--r--gcc/testsuite/gcc.dg/pr42427.c22
1 files changed, 22 insertions, 0 deletions
diff --git a/gcc/testsuite/gcc.dg/pr42427.c b/gcc/testsuite/gcc.dg/pr42427.c
new file mode 100644
index 000000000..cb43dd2af
--- /dev/null
+++ b/gcc/testsuite/gcc.dg/pr42427.c
@@ -0,0 +1,22 @@
+/* { 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;
+ }
+}