URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc1/] [gcc/] [testsuite/] [gfortran.dg/] [allocatable_module_1.f90] - Blame information for rev 427

Go to most recent revision | Details | Compare with Previous | 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" } }

Line No.	Rev	Author	Line
1	302	jeremybenn	`! { 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`
5
6			`module fred1`
7			`real, allocatable :: default_clocks(:)`
8			`end module fred1`
9
10			`module fred2`
11			`real, allocatable :: locks(:)`
12			`end module fred2`
13
14			`program fred`
15			`use fred1`
16			`use fred2`
17			`end program fred`
18			`! { dg-final { cleanup-modules "fred1 fred2" } }`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc1/] [gcc/] [testsuite/] [gfortran.dg/] [allocatable_module_1.f90] - Blame information for rev 427