http://gcc.gnu.org/bugzilla/show_bug.cgi?id=54443
--- Comment #2 from Dominique d'Humieres <dominiq at lps dot ens.fr> 2012-09-01
00:30:05 UTC ---
Compiling the following reduced test
program class_test
type hashnode
! character(12) :: name
character(4) :: htype
end type hashnode
class(hashnode), pointer :: hfirst,hcur,hp
select type(hp%htype)
end program class_test
gives an internal compiler error: Segmentation fault with trunk, but the error
pr54443_red.f90:8.25:
select type(hp%htype)
1
Error: Selector in SELECT TYPE at (1) is not a named variable; use
associate-name=>
if I uncomment the line character(12) :: name, while it still gives an ICE with
4.7.1.
The backtrace for trunk is
Program received signal EXC_BAD_ACCESS, Could not access memory.
Reason: 13 at address: 0x0000000000000000
gfc_match_select_type () at ../../work/gcc/fortran/match.c:5438
5438 && (strcmp (CLASS_DATA (expr1)->name, "_data") == 0)
(gdb) bt
#0 gfc_match_select_type () at ../../work/gcc/fortran/match.c:5438
#1 0x0000000100078fea in match_word (subr=<value temporarily unavailable, due
to optimizations>, old_locus=0x100ea35e0) at ../../work/gcc/fortran/parse.c:67
#2 0x000000014180f750 in ?? ()
Previous frame inner to this frame (gdb could not unwind past this frame)
