https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85536
Bug ID: 85536
Summary: ICE on procedure pointer assignment for subroutine
with procedure pointer argument
Product: gcc
Version: 4.8.5
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: dev-zero at gentoo dot org
Target Milestone: ---
Given the following minimal code:
module m
implicit none
abstract interface
subroutine parser(nextParser)
procedure(parser), pointer :: nextParser
end subroutine
end interface
contains
subroutine parseA(nextParser)
procedure(parser), pointer :: nextParser
end subroutine
end module
program main
use m
procedure(parser), pointer :: parse => parseA
end program
I get the following ICE, with GNU Fortran (Gentoo Hardened 7.3.0-r2 p1.2)
7.3.0:
$ gfortran-7.3.0 -o ice_minimal_rep ice_minimal_rep.f90
gfortran: internal compiler error: Segmentation fault (program f951)
Please submit a full bug report,
with preprocessed source if appropriate.
See <https://bugs.gentoo.org/> for instructions.
respectively with GNU Fortran (SUSE Linux) 8.0.1 20180406 (experimental) [trunk
revision 259162]:
$ gfortran-8 -o ice_minimal_rep ice_minimal_rep.f90
gfortran-8: internal compiler error: Segmentation fault signal terminated
program f951
Please submit a full bug report,
with preprocessed source if appropriate.
See <http://bugs.opensuse.org/> for instructions.
or with GNU Fortran (SUSE Linux) 4.8.5:
$ gfortran -o ice_minimal_rep ice_minimal_rep.f90
gfortran: internal compiler error: Segmentation fault (program f951)
Please submit a full bug report,
with preprocessed source if appropriate.
See <http://bugs.opensuse.org/> for instructions.
