Increase timeout factor for hppa*-*-* in gcc.dg/long_branch.c
[official-gcc.git] / gcc / testsuite / gfortran.dg / char_array_constructor_2.f90
blobd6abc260caa4c0746f25224883ed4cc2aecbeb72
1 ! { dg-do compile }
2 ! Tests the fix for PR30319, in which the use of the parameter 'aa' in
3 ! the array constructor that initialises bb would cause an internal
4 ! error in resolution.
6 ! Contributed by Vivek Rao <vivekrao4@yahoo.com>
8 module foomod
9 character (len=1), parameter :: aa = "z", bb(1) = (/aa/)
10 end module foomod
11 use foomod
12 print *, aa, bb
13 end