1! { dg-do compile }
2! { dg-options "-std=f2003" }
3! PR fortran/32987
4! PR fortran/58001
5 program TestFormat
6 write (*, 10)
7 10 format ('Hello ', 'bug!') ! { dg-warning "tab character in format" }
8 end
9! { dg-excess-errors "tab character in FORMAT" }
10