1! { dg-do compile }
2! { dg-options "-Wline-truncation" }
3print *, 'aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
4end
5! { dg-error "Line truncated" " " { target *-*-* } 3 }
6! { dg-error "Unterminated character constant" " " { target *-*-* } 3 }
7! { dg-excess-errors "some warnings being treated as errors" }
8