[Bug fortran/20892] dummy procedure can't be generic

["fxcoudert at gcc dot gnu dot org" <gcc-bugzilla@gcc.gnu.org>]

------- Comment #3 from fxcoudert at gcc dot gnu dot org  2006-05-21 20:49 -------
Proposed patch (wording from the g95 error message). With that patch, compiling
the testcase is a bit noisy (additional errors after the first error message),
I'll try to find a cleaner solution.



Index: interface.c
===================================================================
--- interface.c (revision 113849)
+++ interface.c (working copy)
@@ -217,6 +217,13 @@
          && gfc_add_generic (&sym->attr, sym->name, NULL) == FAILURE)
        return MATCH_ERROR;

+      if (sym->attr.dummy)
+       {
+         gfc_error ("Dummy procedure '%s' at %C cannot have a "
+                    "generic interface", sym->name);
+         return MATCH_ERROR;
+       }
+
       current_interface.sym = gfc_new_block = sym;
       break;



-- 

fxcoudert at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |fxcoudert at gcc dot gnu dot
                   |                            |org
         AssignedTo|unassigned at gcc dot gnu   |fxcoudert at gcc dot gnu dot
                   |dot org                     |org
             Status|NEW                         |ASSIGNED
           Keywords|                            |patch
   Last reconfirmed|2005-12-31 19:59:59         |2006-05-21 20:49:21
               date|                            |


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