blob: 93b9616aee9afdccce3538603ac204b816c50bc9 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
! { 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" } }
|
