------- Comment #9 from pault at gcc dot gnu dot org 2008-09-10 12:26 ------- (In reply to comment #3) > reduced: > > MODULE M1 > INTERFACE putaline > MODULE PROCEDURE S1,S2 > END INTERFACE > CONTAINS > SUBROUTINE S1(I) > END SUBROUTINE > SUBROUTINE S2(F) > END SUBROUTINE > END MODULE > > MODULE M2 > USE M1 > CONTAINS > SUBROUTINE S3 > CALL putaline() > CONTAINS > SUBROUTINE putaline(x) > character, optional :: x > END SUBROUTINE > END SUBROUTINE > END MODULE > > USE M2 > CALL S3 > END >
I believe that this is valid, as you say. Paul -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=37445