[Bug fortran/33228] Accepts use-associated functions in MODULE PROCEDURE

["burnus at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>]

------- Comment #1 from burnus at gcc dot gnu dot org  2007-08-30 11:44 -------
I have a patch -> accept.

The standard says:

"C1208 (R1206) If MODULE appears in a procedure-stmt, each procedure-name in
that statement shall be accessible in the current scope as a module procedure."
"module procedure (2.2.3.2) : A procedure that is defined by a module
subprogram."

This means the following is correct:

module b
contains
    subroutine foo(a)
      real :: a
    end subroutine foo
end module b
module a
  use b
  implicit none
  interface gen
    module procedure foo
  end interface gen
end module a


-- 

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|UNCONFIRMED                 |ASSIGNED
     Ever Confirmed|0                           |1
   Last reconfirmed|0000-00-00 00:00:00         |2007-08-30 11:44:24
               date|                            |


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