This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug middle-end/40194] fortran rules for optimizing
- From: "jv244 at cam dot ac dot uk" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 19 May 2009 10:01:44 -0000
- Subject: [Bug middle-end/40194] fortran rules for optimizing
- References: <bug-40194-6642@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Comment #1 from jv244 at cam dot ac dot uk 2009-05-19 10:01 -------
OK, updated testcase, while the argument still holds for the previous code,
this was the intended code, and the generated code is even worse:
INTEGER FUNCTION F1()
INTEGER :: I1
INTEGER, TARGET :: I2
INTEGER, POINTER :: IP
INTERFACE
SUBROUTINE S(I1,IP)
INTEGER,INTENT(IN) :: I1
INTEGER, POINTER :: IP
END SUBROUTINE S
END INTERFACE
I1=1
I2=1
IP=>I2
CALL S(I1,IP)
IP=2
F1=I1
END FUNCTION F1
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40194