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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gfortran.dg/] [abstract_type_7.f03] - Blame information for rev 694

Details | Compare with Previous | View Log


! { dg-do compile }
!
! PR 44213: ICE when extending abstract type
!
! Contributed by Hans-Werner Boschmann 
 
module ice_module
  type :: a_type
  end type a_type
 
  type,extends(a_type),abstract :: b_type
  end type b_type
 
  type,extends(b_type) :: c_type
  end type c_type
end module ice_module
 
! { dg-final { cleanup-modules "ice_module" } }

Line No.	Rev	Author	Line
1	694	jeremybenn	`! { dg-do compile }`
2			`!`
3			`! PR 44213: ICE when extending abstract type`
4			`!`
5			`! Contributed by Hans-Werner Boschmann`
6
7			`module ice_module`
8			`type :: a_type`
9			`end type a_type`
10
11			`type,extends(a_type),abstract :: b_type`
12			`end type b_type`
13
14			`type,extends(b_type) :: c_type`
15			`end type c_type`
16			`end module ice_module`
17
18			`! { dg-final { cleanup-modules "ice_module" } }`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gfortran.dg/] [abstract_type_7.f03] - Blame information for rev 694