gcc/testsuite/gfortran.dg/automatic_char_len_1.f90

   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
  10
  11