8sa1-gcc/gcc/testsuite/g77.f-torture/noncompile/check0.f
Dave Love 8ebe42f1e4 New file.
From-SVN: r19774
1998-05-15 06:23:01 +00:00

12 lines
311 B
Fortran

CCC Abort fixed by:
CCC1998-04-21 Jim Wilson <wilson@cygnus.com>
CCC
CCC * stmt.c (check_seenlabel): When search for line number note for
CCC warning, handle case where there is no such note.
logical l(10)
integer i(10)
goto (10,20),l
goto (10,20),i
10 stop
20 end