URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gfortran.dg/] [class_21.f03] - Rev 801
Go to most recent revision | Compare with Previous | Blame | View Log
! { dg-do compile }
!
! PR 43990: [OOP] ICE in output_constructor_regular_field, at varasm.c:4995
!
! Reported by Hans-Werner Boschmann <boschmann@tp1.physik.uni-siegen.de>
module m
type :: t
logical :: l = .true.
class(t),pointer :: cp => null()
end type
type(t),save :: default_t
end module
! { dg-final { cleanup-modules "m" } }
Go to most recent revision | Compare with Previous | Blame | View Log