external bar
call bar(a=5)
end

The "a=" is invalid as there is no explicit interface.

"12.4 Procedure reference"
"R1220 actual-arg-spec is [ keyword = ] actual-arg"
"C1225 (R1220) The keyword = shall not appear if the interface of the procedure
is implicit in the scoping unit."

Found at:
http://groups.google.com/group/comp.lang.fortran/browse_thread/thread/543563d67446fbea/

Other compilers show:

Error: Procedure with a keyword argument at (1) does not have an explicit
interface
Error: Keyword arguments are invalid without an explicit interface.
Error: Keyword argument requires an explicit interface
Error: An actual argument keyword is being used when an explicit interface is
not known.


-- 
           Summary: Implicit procedure with keyword=argument is accepted
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Keywords: accepts-invalid
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: burnus at gcc dot gnu dot org


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

Reply via email to