Sign in
llvm
/
llvm-archive
/
47f46514d69ad808308539dc6c69b907868fcf8a
/
.
/
llvm-gcc-4.2
/
gcc
/
testsuite
/
gfortran.dg
/
automatic_char_len_1.f90
blob: 3ccfcb70de8053d5d791c37b461fd6d93d26b876 [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
PR18082
-
Compiler
would
get
stuck
in
loop
,
whilst treating
!
the assignments
.
!
Test
is
one of PR cases
.
subroutine snafu
(
i
)
character
*(
i
)
::
c1
,
c2
c1
=
""
c2
=
""
end
subroutine snafu