gcc/testsuite/gfortran.dg/pr88249.f90

   1 ! { dg-do compile }
   2 program p
   3    backspace (err=1) ! { dg-error "UNIT number missing" }
   4    endfile (err=1)   ! { dg-error "UNIT number missing" }
   5    flush (err=1)     ! { dg-error "UNIT number missing" }
   6    rewind (err=1)    ! { dg-error "UNIT number missing" }
   7 end