This is from FM923.FOR $ cat b.f INTEGER J1I(3) DATA J1I / 3,2,1 / WRITE(20,'(A)')'/ 10 20 30' WRITE(20,'(A)')'1 2 3 4' WRITE(20,'(A)')'5 6 7 8' REWIND(20) READ(20,*) (J1I(IVI), IVI=1,3) PRINT*,(J1I(IVI), IVI=1,3) READ(20,*) I,J PRINT*,I,J READ(20,*) I,J PRINT*,I,J END $ gfc b.f $ ./a.out 1 2 1 5 6 At line 11 of file b.f Fortran runtime error: End of file $ g77 b.f $ ./a.out 3 2 1 1 2 5 6
$ gfc --version GNU Fortran 95 (GCC 4.0.0 20050101 (experimental)) -- Summary: formatted read with leading slash Product: gcc Version: 4.0.0 Status: UNCONFIRMED Severity: normal Priority: P2 Component: libfortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: bdavis at gcc dot gnu dot org CC: gcc-bugs at gcc dot gnu dot org http://gcc.gnu.org/bugzilla/show_bug.cgi?id=19216