! { dg-do compile } ! { dg-options -Wtabs } ! PR fortran/32987 ! PR fortran/58001 program TestFormat write (*, 10) ! There is a tab character before 'bug!'. This is accepted without ! the -Wno-tabs option or a -std= option. 10 format ('Hello ', 'bug!') ! { dg-warning "tab character in format" } end ! { dg-excess-errors "tab character in format" }