1! { dg-do compile }
2! PR fortran/66979
3program p
4  implicit none
5  integer::i
6  flush (iostat=i) ! { dg-error "UNIT number missing" }
7end program p
8