Daily bump.
[official-gcc.git] / gcc / testsuite / gfortran.dg / automatic_char_len_1.f90
blob3ccfcb70de8053d5d791c37b461fd6d93d26b876
1 ! { dg-do compile }
2 ! PR18082 - Compiler would get stuck in loop, whilst treating
3 ! the assignments.
4 ! Test is one of PR cases.
5 subroutine snafu (i)
6 character*(i) :: c1, c2
7 c1 = ""
8 c2 = ""
9 end subroutine snafu