Sign in
llvm
/
llvm-test-suite
/
refs/heads/main
/
.
/
Fortran
/
gfortran
/
regression
/
Wall.f90
blob: 182974d32c4d949fb296706c0fc35ac6a8009c81 [
file
] [
log
] [
blame
]
!
{
dg
-
do
run
}
!
{
dg
-
options
-
Wall
}
!
PR
30437
Test
for
Wall
program main
character
(
len
=
40
)
&
c
c
=
"Hello, &
world!"
!
{
dg
-
warning
"Missing '&' in continued character constant"
}
if
(
c
.
ne
.&
"Hello, world!"
)&
STOP
1
;
end
program main