(root)/
gcc-13.2.0/
gcc/
testsuite/
gfortran.dg/
fmt_tab_1.f90
! { 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 at " }
                                        ! { dg-warning "tab character at " "" { target "*-*-*" } .-1 }
      end