[Bug fortran/40006] allow type cheating for procedures with an implicit interface

[jv244 at cam dot ac dot uk]

------- Comment #4 from jv244 at cam dot ac dot uk  2009-05-02 13:56 -------
a further case to hide behind an eventual switch

SUBROUTINE S3(a)
 REAL :: a(*)
END SUBROUTINE

SUBROUTINE T3(a)
 REAL, DIMENSION(:) :: a
 CALL S3(a(1))
END SUBROUTINE T3


-- 


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