This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/40045] ICE with type extension and -fdump-parse-tree
- From: "burnus at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 6 May 2009 14:39:21 -0000
- Subject: [Bug fortran/40045] ICE with type extension and -fdump-parse-tree
- References: <bug-40045-16146@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Comment #2 from burnus at gcc dot gnu dot org 2009-05-06 14:39 -------
Regarding the segfault, valgrind shows:
==14376== Invalid read of size 1
==14376== by 0x616A4F7: fprintf (in /lib64/libc-2.9.so)
==14376== by 0x4B4BF1: show_typebound (dump-parse-tree.c:693)
The line is:
fprintf (dumpfile, "PASS(%s)", st->n.tb->pass_arg);
and the interesting question is: Why is it called? There are no type-bound
procedures (and also no components [except of t2%t]. Thus why is
if (!st->n.tb)
return;
not working?
* * *
Related problem: The following gives: show_code_node(): Bad statement code
type t
procedure(), nopass, pointer :: p
end type t
type(t) m
!external bar
!m%p => bar
call m%p()
end
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40045