blob: 92f3401e90fbdc2c802def37405d8ff867fe0b01 [file] [log] [blame]
! { dg-do compile }
! { dg-options "" }
!
! By default, for free-form source code: Error out
!
print *, 1 + 2 ! { dg-error "Line truncated at .1." }
end
! { dg-excess-errors "some warnings being treated as errors" }