This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/31209] too much indirection for actual pointer procedure
- From: "pault at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 17 Mar 2007 10:18:57 -0000
- Subject: [Bug fortran/31209] too much indirection for actual pointer procedure
- References: <bug-31209-6642@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Comment #1 from pault at gcc dot gnu dot org 2007-03-17 10:18 -------
This fixes it and regtests OK - will submit later on
Index: gcc/fortran/trans-expr.c
===================================================================
*** gcc/fortran/trans-expr.c (revision 122943)
--- gcc/fortran/trans-expr.c (working copy)
*************** gfc_conv_function_call (gfc_se * se, gfc
*** 2078,2083 ****
--- 2078,2084 ----
{
gfc_conv_expr_reference (&parmse, e);
if (fsym && fsym->attr.pointer
+ && fsym->attr.flavor != FL_PROCEDURE
&& e->expr_type != EXPR_NULL)
{
/* Scalar pointer dummy args require an extra level of
Paul
--
pault at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
AssignedTo|unassigned at gcc dot gnu |pault at gcc dot gnu dot org
|dot org |
Status|UNCONFIRMED |ASSIGNED
Ever Confirmed|0 |1
Last reconfirmed|0000-00-00 00:00:00 |2007-03-17 10:18:57
date| |
Summary|wrong code generated with |too much indirection for
|gfortran |actual pointer procedure
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31209