summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gfortran.dg/pr28158.f90
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/testsuite/gfortran.dg/pr28158.f90')
-rw-r--r--gcc/testsuite/gfortran.dg/pr28158.f907
1 files changed, 7 insertions, 0 deletions
diff --git a/gcc/testsuite/gfortran.dg/pr28158.f90 b/gcc/testsuite/gfortran.dg/pr28158.f90
new file mode 100644
index 000000000..4556ecd76
--- /dev/null
+++ b/gcc/testsuite/gfortran.dg/pr28158.f90
@@ -0,0 +1,7 @@
+! { dg-do compile { target i?86-*-* x86_64-*-* } }
+! { dg-require-effective-target ilp32 }
+! { dg-options "-O -msse -mfpmath=sse" }
+ subroutine yhalf(z)
+ complex cdexpj,z
+ z=cdexpj((0.d0,1.d0)*z)
+ end