[Bug fortran/42804] ICE with -fcheck=bounds and type bound procedure call on array element
janus at gcc dot gnu dot org
gcc-bugzilla@gcc.gnu.org
Tue Jan 19 17:46:00 GMT 2010
------- Comment #8 from janus at gcc dot gnu dot org 2010-01-19 17:46 -------
Here is the fix for PPCs, curing both the "must be scalar" error from the last
comment as well as the missing-locus ICE (which, as expected, did appear also
for PPCs after the other thing was fixed):
Index: gcc/fortran/resolve.c
===================================================================
--- gcc/fortran/resolve.c (revision 156040)
+++ gcc/fortran/resolve.c (working copy)
@@ -4831,11 +4832,12 @@ extract_ppc_passed_object (gfc_expr *e)
po->expr_type = EXPR_VARIABLE;
po->symtree = e->symtree;
po->ref = gfc_copy_ref (e->ref);
+ po->where = e->where;
/* Remove PPC reference. */
ref = &po->ref;
while ((*ref)->next)
- (*ref) = (*ref)->next;
+ ref = &(*ref)->next;
gfc_free_ref_list (*ref);
*ref = NULL;
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=42804
More information about the Gcc-bugs
mailing list