[Bug fortran/19359] New: [gfortran] MODULE PROCEDURE interface improperly resolved

[steven at gcc dot gnu dot org]

The following valid code from a SPEC benchmark candidate results 
in an error because bar_ is not resolved to bar: 
 
     1  MODULE fubar 
     2     IMPLICIT NONE 
     3     PRIVATE bar_ 
     4     INTERFACE bar_ 
     5        MODULE PROCEDURE bar 
     6     END INTERFACE 
     7  CONTAINS 
     8     SUBROUTINE foo(i) 
     9        INTEGER :: i 
    10        i = bar_(i) 
    11     END SUBROUTINE foo 
    12     FUNCTION bar (i) 
    13       INTEGER :: i, bar 
    14       bar = i 
    15     END FUNCTION bar 
    16  END MODULE fubar 
 
 
 In file f.F90:13 
 
      i = bar_(i) 
             1 
Error: Symbol 'bar_' at (1) has no IMPLICIT type

-- 
           Summary: [gfortran] MODULE PROCEDURE interface improperly
                    resolved
           Product: gcc
           Version: 4.0.0
            Status: UNCONFIRMED
          Keywords: rejects-valid
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: steven at gcc dot gnu dot org
                CC: aj at suse dot de,gcc-bugs at gcc dot gnu dot org


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