[Bug fortran/45456] [4.6 Regression] [OOP] Bogus pointer initialization error on pointer-valued TBP
janus at gcc dot gnu dot org
gcc-bugzilla@gcc.gnu.org
Mon Aug 30 20:36:00 GMT 2010
------- Comment #1 from janus at gcc dot gnu dot org 2010-08-30 20:36 -------
Here' the fix:
Index: resolve.c
===================================================================
--- resolve.c (revision 163648)
+++ resolve.c (working copy)
@@ -1083,7 +1083,8 @@
comp->name);
}
- if (!comp->attr.pointer || cons->expr->expr_type == EXPR_NULL)
+ if (!comp->attr.pointer || comp->attr.proc_pointer
+ || cons->expr->expr_type == EXPR_NULL)
continue;
a = gfc_expr_attr (cons->expr);
--
janus at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
AssignedTo|unassigned at gcc dot gnu |janus at gcc dot gnu dot org
|dot org |
Status|UNCONFIRMED |ASSIGNED
Ever Confirmed|0 |1
Last reconfirmed|0000-00-00 00:00:00 |2010-08-30 20:36:16
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=45456
More information about the Gcc-bugs
mailing list