PR ipa/83051
[official-gcc.git] / gcc / testsuite / gfortran.dg / allocatable_module_1.f90
blob36671fee2b114969185dd546c687eeb2e227b28d
1 ! { dg-do compile }
2 ! PR 36934 - this used to give a spurious error and segfault with a
3 ! patch that wasn't complete
4 ! Test case contributed by Philip Mason
6 module fred1
7 real, allocatable :: default_clocks(:)
8 end module fred1
10 module fred2
11 real, allocatable :: locks(:)
12 end module fred2
14 program fred
15 use fred1
16 use fred2
17 end program fred