New test.

From-SVN: r19398

diff --git a/gcc/testsuite/g77.f-torture/compile/980424-0.f b/gcc/testsuite/g77.f-torture/compile/980424-0.f
new file mode 100644 (file)
index 0000000..5df45bb
--- /dev/null
+++ b/gcc/testsuite/g77.f-torture/compile/980424-0.f
@@ -0,0 +1,6 @@
+C     crashes in subst_stack_regs_pat on x86-linux, in the "abort();"
+C     within the switch statement.
+      SUBROUTINE C(A)
+      COMPLEX A
+      WRITE(*,*) A.NE.CMPLX(0.0D0)
+      END