! { dg-do compile } | |
! { dg-options } | |
! PR37988 Edit descriptor checking (compile time) for "<Holerith>T)" | |
! Test case derived from the reporter. | |
8001 FORMAT(//,' SIGNIFICANCE LEVEL =',F7.4, 21H ONE-SIDED AT THE LEFT) ! { dg-error "required with T descriptor" } | |
end |