https://gcc.gnu.org/bugzilla/show_bug.cgi?id=104650
G. Steinmetz <gs...@t-online.de> changed:
What |Removed |Added
----------------------------------------------------------------------------
Keywords| |ice-on-valid-code
--- Comment #1 from G. Steinmetz <gs...@t-online.de> ---
This slightly modified variant compiles :
$ cat z2.f90
module m
type t
contains
final :: s
end type
type t2
integer :: n = 1
type(t) :: a
end type
contains
subroutine s(x)
type(t) :: x
end
end
