gcc/testsuite/gfortran.dg/fmt_tab_1.f90

   1 ! { dg-do compile }
   2 ! { dg-options -Wtabs }
   3 ! PR fortran/32987
   4 ! PR fortran/58001
   5       program TestFormat
   6         write (*, 10)
   7         ! There is a tab character before 'bug!'.  This is accepted without
   8         ! the -Wno-tabs option or a -std= option.
   9  10     format ('Hello ',       'bug!') ! { dg-warning "tab character in format at " }
  10                                         ! { dg-warning "tab character at " "" { target "*-*-*" } .-1 }
  11       end