Fortran error/bug

• To: alpha-osf-managers@xxxxxxxx
• Subject: Fortran error/bug
• From: Marc Cozzi <COZZI@xxxxxxxxxxxxxxxxxx>
• Date: 3 May 94 11:40:11 EST+5
• Organization: Univ. of Notre Dame Radiation Lab.
• Priority: normal

This program gives problems when compiled with Fortran 3.4 on
OSF/1 2.0 or Fortran 3.3 on OSF/1 1.3.
Systems are DEC 3000/800
If you compile it with f77 out.f -o out
and then run it ./out
you get

forrtl: error: floating invalid
IOT Trap (core dumped)

Now if you comment out the WRITE (4,4010) C
you do not get the error, and you don't get the sum!
If you compile it with the -g option and leave the WRITE
commented out, you get the error message!!!

If anyone out there has a clue as to whats going on here
I would really like to hear from you.

Thanks
Marc Cozzi
Univ. of Notre Dame
Radiation Laboratory     cozzi@xxxxxx


C       TEST OF APPARENT PROBLEM IN ADDITION OF A SMALL NUMBER
C
    IMPLICIT DOUBLE PRECISION(A-H,O-Z)
C
    A = 'C085D2CE2682C2A6'Z
    B = '800000007'Z
    WRITE(4,4000) A,B
C
    C = B+A
    WRITE(4,4010) C
C
 4000   FORMAT(/' A,B =',2D30.18)
 4010   FORMAT(/' C   =',D30.18)
C
    STOP
    END

• Prev: SUMMARY 2: Bookreader Plus
• Next: Oracle On OSF/1 1.3B
• Index: Mail Index
• Thread: Mail Thread Index