------- Comment #3 from eedelman at gcc dot gnu dot org  2005-12-29 20:57 
-------
I think this simple one-liner fixes the bug:

Index: interface.c
===================================================================
--- interface.c (revision 109139)
+++ interface.c (working copy)
@@ -1718,6 +1718,7 @@ gfc_extend_expr (gfc_expr * e)
   e->value.function.actual = actual;
   e->value.function.esym = NULL;
   e->value.function.isym = NULL;
+  e->value.function.name = NULL;

   if (gfc_pure (NULL) && !gfc_pure (sym))
     {


but because of PR 22607, I can't test it properly.


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=25396

Reply via email to