[Bug fortran/41403] Optimization: NIST test FM013.f fails at -O1 and above

[jvdelisle at gcc dot gnu dot org]

--- Comment #3 from jvdelisle at gcc dot gnu dot org  2009-09-19 06:15 
---
Reduced case:

Expected result:

$ ./a.out 
0 ERRORS ENCOUNTERED

Wrong result:

$ ./a.out 
1 ERRORS ENCOUNTERED

  PROGRAM FM013
  I01 = 5   
  I02 = 6   
  IVPASS=0  
  IVFAIL=0  
  IVDELE=0  
  ICZERO=0  
  IVTNUM = 126  
C   
  IF (ICZERO) 31260, 1260, 31260
 1260 CONTINUE  
  ASSIGN 1263 TO I  
  GO TO I, (1262,1263,1264) 
 1262 ICON01 = 1262 
  GO TO 1265
 1263 ICON01 = 1263 
  GO TO 1265
 1264 ICON01 = 1264 
 1265 CONTINUE  
  GO TO 41260   
31260 IVDELE = IVDELE + 1   
  IF (ICZERO) 41260, 1271, 41260
41260 IF ( ICON01 - 1263 )  21260, 11260, 21260 
11260 IVPASS = IVPASS + 1   
  GO TO 1271
21260 IVFAIL = IVFAIL + 1   
  IVCOMP=ICON01 
  IVCORR = 1263 
 1271 CONTINUE  
  IVTNUM = 127  
9 CONTINUE  
  WRITE (I02,90008)  IVFAIL 
  STOP  
90008 FORMAT ( ,15X,I5, ERRORS ENCOUNTERED )
  END   


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41403

[Bug fortran/41403] Optimization: NIST test FM013.f fails at -O1 and above

[jvdelisle at gcc dot gnu dot org]

--- Comment #1 from jvdelisle at gcc dot gnu dot org  2009-09-19 05:44 
---
Created an attachment (id=18605)
 -- (http://gcc.gnu.org/bugzilla/attachment.cgi?id=18605action=view)
NIST test case that is failing

I will try to reduce this.


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41403

[Bug fortran/41403] Optimization: NIST test FM013.f fails at -O1 and above

[jvdelisle at gcc dot gnu dot org]

--- Comment #2 from jvdelisle at gcc dot gnu dot org  2009-09-19 05:47 
---
Its ugly code so remember to compile with -w and save the attachment as a .f
file so that fixed form is used. This will turn off all of the warnings.


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41403