This is the mail archive of the gcc-bugs@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

[Bug fortran/34660] elemental and dummy procedure



------- Comment #2 from burnus at gcc dot gnu dot org  2008-01-04 22:39 -------
C1277 All dummy arguments of an elemental procedure shall be scalar dummy data
objects and shall not have the POINTER or ALLOCATABLE attribute.


Index: gcc/fortran/resolve.c
===================================================================
--- gcc/fortran/resolve.c       (revision 131328)
+++ gcc/fortran/resolve.c       (working copy)
@@ -225,6 +225,14 @@ resolve_formal_arglist (gfc_symbol *proc
                         &sym->declared_at);
              continue;
            }
+
+         if (sym->attr.flavor == FL_PROCEDURE)
+           {
+             gfc_error ("Dummy procedure '%s' not allowed in elemental "
+                        "procedure '%s' at %L", sym->name, proc->name,
+                        &sym->declared_at);
+             continue;
+           }
        }

       /* Each dummy shall be specified to be scalar.  */


-- 

burnus at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
         AssignedTo|unassigned at gcc dot gnu   |burnus at gcc dot gnu dot
                   |dot org                     |org
             Status|NEW                         |ASSIGNED
   Last reconfirmed|2008-01-04 07:23:09         |2008-01-04 22:39:11
               date|                            |


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


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]