URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gfortran.dg/] [allocatable_module_1.f90] - Rev 305
Go to most recent revision | Compare with Previous | Blame | View Log
! { dg-do compile }
! PR 36934 - this used to give a spurious error and segfault with a
! patch that wasn't complete
! Test case contributed by Philip Mason
module fred1
real, allocatable :: default_clocks(:)
end module fred1
module fred2
real, allocatable :: locks(:)
end module fred2
program fred
use fred1
use fred2
end program fred
! { dg-final { cleanup-modules "fred1 fred2" } }
Go to most recent revision | Compare with Previous | Blame | View Log