blob: 171d826cb6c486d7afc8c5fa02d97fb7356f3076 (
plain)
1
2
3
4
5
6
7
8
|
! { dg-do run }
! PR46705 Spurious "Missing '&' in continued character constant" warning occurs twice
character(15) :: astring
1 FORMAT (''&
' abcdefg x')
write(astring, 1)
if (astring.ne."' abcdefg x") call abort
END
|