[Bug fortran/54195] New: [4.8 Regression][OOP] IMPORT fails with GENERIC TBP: "is already present in the interface"

burnus at gcc dot gnu.org gcc-bugzilla@gcc.gnu.org
Tue Aug 7 15:44:00 GMT 2012


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

             Bug #: 54195
           Summary: [4.8 Regression][OOP] IMPORT fails with GENERIC TBP:
                    "is already present in the interface"
    Classification: Unclassified
           Product: gcc
           Version: 4.8.0
            Status: UNCONFIRMED
          Keywords: rejects-valid
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned@gcc.gnu.org
        ReportedBy: burnus@gcc.gnu.org
                CC: damian@rouson.net, janus@gcc.gnu.org


Reported by Damian at http://gcc.gnu.org/ml/fortran/2012-08/msg00041.html

The following program fails with:
    generic :: operator(-) => unary
                             1
Error: Entity 'unary' at (1) is already present in the interface

It works if one replaces "IMPORT :: foo" by "IMPORT".


module import_clashes_with_generic
  type ,abstract :: foo
  contains
    procedure :: unary
    generic :: operator(-) => unary
  end type

  abstract interface
    integer function bar()
      import :: foo
    end function
  end interface
contains
  integer function unary(rhs)
    class(foo) ,intent(in) :: rhs
  end function
end module



More information about the Gcc-bugs mailing list