X-Git-Url: https://oss.titaniummirror.com/gitweb/?a=blobdiff_plain;f=gcc%2Ftestsuite%2Fg77.dg%2Fpr9258.f;fp=gcc%2Ftestsuite%2Fg77.dg%2Fpr9258.f;h=0000000000000000000000000000000000000000;hb=6fed43773c9b0ce596dca5686f37ac3fc0fa11c0;hp=1bae9207995083aba34691b6fae6721acacd3344;hpb=27b11d56b743098deb193d510b337ba22dc52e5c;p=msp430-gcc.git

diff --git a/gcc/testsuite/g77.dg/pr9258.f b/gcc/testsuite/g77.dg/pr9258.f
deleted file mode 100644
index 1bae9207..00000000
--- a/gcc/testsuite/g77.dg/pr9258.f
+++ /dev/null
@@ -1,18 +0,0 @@
-C Test case for PR fortran/9258
-C Origin: kmccarty@Princeton.EDU
-C
-C { dg-do compile }
-      SUBROUTINE FOO (B)
-
- 10   CALL BAR(A)
-      ASSIGN 20 TO M
-      IF(100.LT.A) GOTO 10
-      GOTO 40
-C
- 20   IF(B.LT.ABS(A)) GOTO 10
-      ASSIGN 30 TO M
-      GOTO 40
-C
- 30   ASSIGN 10 TO M
- 40   GOTO M,(10,20,30)
-      END