2 ! { dg-options "-Wline-truncation" }
4 ! By default, for free-form source code: Error out
5 ! Even with -Wline-truncation, we still get an error
7 print *, 1 + 2 ! { dg-error "Line truncated at .1." }
9 ! { dg-excess-errors "some warnings being treated as errors" }