https://gcc.gnu.org/bugzilla/show_bug.cgi?id=90506
Vipul Parekh <fortranfan at outlook dot com> changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |fortranfan at outlook dot com
--- Comment #2 from Vipul Parekh <fortranfan at outlook dot com> ---
Here is a variant of the submitted case that also might be of interest here on
account of the internal compiler error (ICE) that occurs; an ICE makes it very
difficult for users.
--- begin console output ---
C:\Temp>type m.f90
module m
type :: t
end type
abstract interface
function Ifun() result(r)
import :: t
class(t), allocatable :: r
end function
end interface
procedure(Ifun), pointer :: pfun => null()
contains
function my_fun() result(r)
class(t), allocatable :: r
r = t()
end function
subroutine sub()
pfun => my_fun
end subroutine
end
C:\Temp>gfortran -c -Wall m.f90
m.f90:17:0:
17 | pfun => my_fun
|
internal compiler error: Segmentation fault
libbacktrace could not find executable to open
Please submit a full bug report,
with preprocessed source if appropriate.
See <https://gcc.gnu.org/bugs/> for instructions.
C:\Temp>
--- end console output ---
