https://gcc.gnu.org/bugzilla/show_bug.cgi?id=78719
--- Comment #2 from Gerhard Steinmetz
---
Interestingly, following invalid variant with "type(t)"
is silently accepted and gives same results as z0.f90 in comment 1.
$ cat z2.f90
program p
type t
integer :: n
end type
type(t) :
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=78719
--- Comment #1 from Gerhard Steinmetz
---
Detected with type "real" instead of "class(t)" :
$ cat z3.f90
program p
type t
integer :: n
end type
real :: g !!
abstract interface
subroutine h
end
end interface
