[Bug fortran/20885] New: error needed
jv244 at cam dot ac dot uk
gcc-bugzilla@gcc.gnu.org
Fri Apr 8 16:02:00 GMT 2005
The following is non-standard and the compiler should probably generate a
warning/error with '-pedantic -std=f95'
INTEGER, DIMENSION(2,2) :: D=RESHAPE((/1,2,3,4/),(/2,2/))
CALL TT(D,10)
write(6,*) D
CALL TT(D,11)
write(6,*) D
CONTAINS
RECURSIVE SUBROUTINE TT (D,I)
INTEGER, DIMENSION(2,2), INTENT(INOUT) :: D
INTEGER, INTENT(INOUT) :: I
IF (I>0) CALL TT(TRANSPOSE(D),I-1)
END SUBROUTINE
END
--
Summary: error needed
Product: gcc
Version: 4.1.0
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: jv244 at cam dot ac dot uk
CC: gcc-bugs at gcc dot gnu dot org
GCC target triplet: i686-pc-linux-gnu
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=20885
More information about the Gcc-bugs
mailing list