------- Comment #5 from jvdelisle at gcc dot gnu dot org  2010-01-13 03:13 
-------
The problem is here.  Wrong argument passed to gfc_compare_interfaces.

It can't be NULL.  I am testing this patch.

Index: interface.c
===================================================================
--- interface.c (revision 155799)
+++ interface.c (working copy)
@@ -1126,7 +1126,7 @@
        if (p->sym->name == q->sym->name && p->sym->module == q->sym->module)
          continue;

-       if (gfc_compare_interfaces (p->sym, q->sym, NULL, generic_flag, 0,
+       if (gfc_compare_interfaces (p->sym, q->sym, q->sym->name, generic_flag,
0,
                                    NULL, 0))
          {
            if (referenced)


-- 

jvdelisle at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
   Last reconfirmed|2010-01-11 08:32:42         |2010-01-13 03:13:52
               date|                            |


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

Reply via email to