When I compile the module listed below, gfortran produces the message:

c1.f90:14.18:
     ENTRY cx_radc(r, z)
                 1
Internal Error at (1):
insert_bbt(): Duplicate key found!

   MODULE complex

     TYPE cx
       REAL :: real, imag
     END TYPE cx

     INTERFACE OPERATOR  (+)
       MODULE PROCEDURE cx_cadr, cx_radc
     END INTERFACE

     CONTAINS

     FUNCTION cx_cadr(z, r)
     ENTRY cx_radc(r, z)
       REAL             :: cx_cadr, cx_radc
       TYPE (cx), INTENT(IN) :: z
       REAL, INTENT(IN) :: r
       cx_cadr = z%real
     END FUNCTION cx_cadr
   END MODULE complex


-- 
           Summary: insert_bbt(): Duplicate key found!
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: michael dot a dot richmond at nasa dot gov


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

Reply via email to