OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

re PR rtl-optimization/9258 (ICE in compensate_edge, at reg-stack.c:2589) 

2003-01-28  Toon Moene  <toon@moene.indiv.nluug.nl>

	PR fortran/9258
	* g77.dg/pr9258: New test.

From-SVN: r61984
This commit is contained in:
Toon Moene 2003-01-28 18:20:41 +01:00 committed by Toon Moene
parent 58fb780923
commit f42aadd856
2 changed files with 23 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gcc/testsuite/ChangeLog
View File

@ -1,3 +1,8 @@
2003-01-28 Toon Moene <toon@moene.indiv.nluug.nl>
PR fortran/9258
* g77.dg/pr9258: New test.
2003-01-28 Gerald Pfeifer <pfeifer@dbai.tuwien.ac.at>
* README: Move relevant parts from README.g++.

18
gcc/testsuite/g77.dg/pr9258.f Normal file
View File

@ -0,0 +1,18 @@
C Test case for PR/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