blob: c102e91e91d3eecb18f35a6bb6429ce2f41a0b6f [file] [log] [blame]
! { dg-do compile }
! PR fortran/66979
program p
implicit none
integer::i
flush (iostat=i) ! { dg-error "UNIT number missing" }
end program p