The following is non-standard and the compiler should probably generate a warning/error with '-pedantic -std=f95', but does not do so with gcc version 4.3.0 20080103 (experimental) [trunk revision 131300] (GCC)
MODULE M1 TYPE T1 INTEGER :: I(3) END TYPE T1 TYPE(T1), PARAMETER :: D1=T1((/1,2,3/)) CONTAINS SUBROUTINE S1(J) INTEGER, INTENT(INOUT) :: J END SUBROUTINE S1 END MODULE M1 USE M1 CALL S1(D1%I(3)) END -- Summary: inout argument with parameter Product: gcc Version: 4.3.0 Status: UNCONFIRMED Severity: normal Priority: P3 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: jv244 at cam dot ac dot uk http://gcc.gnu.org/bugzilla/show_bug.cgi?id=34662