[Bug fortran/28335] New: flush() / write() statement on closed units - error?

["tobias dot burnus at physik dot fu-berlin dot de" <gcc-bugzilla@gcc.gnu.org>]

The Fortran 2003 standard declares:
"Every input/output statement except an OPEN, CLOSE, INQUIRE, or WAIT statement
shall refer to a unit that is connected to a file"

gfortran does not give a run-time error. However, I don't know whether one
should enforce the standard (and thus do this check).

program test
  write(*,*) 'Hello'
  flush(6) ! preconnected unit (stdout)
  flush(99)! preconnected unit
 ! flush()  ! invalid
  close(88) ! close preconnected unit <<<<<<<<
  close(88) ! close once more
  ! wait(88) ! not supported by gfortran
  flush(88) ! invalid    <<<<<<<<<<<<<
  write(88,*) 'This should also produce an error' !<<<<<<
end program test

Expected: Like NAG f95 (or g95)
 Hello
Unit 88 is not connected
Program terminated by fatal I/O error
In TEST, line 9 of flush.f90


-- 
           Summary: flush() / write() statement on closed units - error?
           Product: gcc
           Version: 4.2.0
            Status: UNCONFIRMED
          Severity: minor
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: tobias dot burnus at physik dot fu-berlin dot de


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