MODULE TT
INTERFACE M
 MODULE PROCEDURE M1,M2
END INTERFACE
CONTAINS
 SUBROUTINE M1(I,*)
   INTEGER :: I
   RETURN 1
 END SUBROUTINE
 SUBROUTINE M2(I,J)
   INTEGER :: I,J
 END SUBROUTINE
END MODULE

USE TT
  CALL M(1,*2)
  write(6,*) "Hi"
2 CONTINUE
END


-- 
           Summary: [4.5 Regression] ICE with alternate returns
           Product: gcc
           Version: 4.5.0
            Status: UNCONFIRMED
          Keywords: ice-on-valid-code
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: jv244 at cam dot ac dot uk
OtherBugsDependingO 32834
             nThis:


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

Reply via email to