[Bug fortran/82969] ICE in gfc_class_vptr_get, at fortran/trans-expr.c:211

[gscfq@t-online.de]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=82969

--- Comment #1 from G. Steinmetz <gscfq@t-online.de> ---

These variants compile :


$ cat z2.f90
module m
   type t
      real, allocatable :: x(:)
      procedure(f), nopass, pointer :: g
   end type
contains
   function f() result(z)
      class(t), pointer :: z
   end
end


$ cat z3.f90
module m
   type t
      procedure(f), nopass, pointer :: g
   end type
contains
   function f() result(z)
      class(t), allocatable :: z
   end
end