This is the mail archive of the gcc@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]

is g77 compatible with Fortran 77 ?


Hi, everybody.

I'm quite new here, so forgive me if it's offtopic.
I attached small program here, which works in a wierd way
when I compile it with gcc-2.7.1 or egcs-1.1.1 (I'm afraid I have no
access to newer versions right now).

Regards,
Ilia Chipitsine
      PROGRAM F
      LOGICAL OPENED
      INTEGER UNIT, IOSTAT

      DO 10 UNIT = 0, 1000
      INQUIRE( UNIT = UNIT, OPENED = OPENED, IOSTAT = IOSTAT )

      IF(IOSTAT.NE.0) THEN
      PRINT *,'PROBLEMS WITH UNIT = ', UNIT
      ENDIF 

      IF( .NOT.OPENED ) THEN

      OPEN ( UNIT = UNIT, FILE = 'f.word' )
      WRITE( UNIT = UNIT, FMT = '(A)' ) 'That''s all, folks !'
      CLOSE( UNIT = UNIT)

      ENDIF
 10   CONTINUE
      
      END

Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]