------- Comment #6 from dominiq at lps dot ens dot fr 2007-11-06 16:17 ------- > Ans a simple patch to fix it:
I have applied the patch, but the test case fails if teststream does not exist (passes if the file exists). [karma] f90/bug% gfc streamtest_7.f90 [karma] f90/bug% a.out [karma] f90/bug% a.out At line 15 of file streamtest_7.f90 (unit = 10, file = 'teststream') Fortran runtime error: End of file [karma] f90/bug% a.out [karma] f90/bug% a.out At line 15 of file streamtest_7.f90 (unit = 10, file = 'teststream') Fortran runtime error: End of file [karma] f90/bug% rm teststream remove teststream? y [karma] f90/bug% rm teststream rm: teststream: No such file or directory [karma] f90/bug% a.out At line 15 of file streamtest_7.f90 (unit = 10, file = 'teststream') Fortran runtime error: End of file [karma] f90/bug% rm teststream remove teststream? y [karma] f90/bug% a.out At line 15 of file streamtest_7.f90 (unit = 10, file = 'teststream') Fortran runtime error: End of file Since I did not do this test without the patch, I cannot say if this is due to the patch or if it was there before it. -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=33985
