This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
PR16404 - test3 : a standard question.
- From: Paul Thomas <paulthomas2 at wanadoo dot fr>
- To: Tobias dot Schlueter at Physik dot Uni-Muenchen dot DE,"'fortran at gcc dot gnu dot org'" <fortran at gcc dot gnu dot org>
- Date: Wed, 07 Sep 2005 17:36:02 +0200
- Subject: PR16404 - test3 : a standard question.
- References: <1126092500.431eced4ea7ab@www.cip.physik.uni-muenchen.de>
Tobias,
Am I mistaken or did you have a patch which addressed number 3 in that PR? I
couldn't find it, and we still accept that code.
test2 reveals that I should have quotes around the common block names in
the error messages - this is now done and tested.
An extension of test3 reveals that
! test 3
REAL :: A = 42.0
REAL, TARGET :: B
real, pointer :: c
EQUIVALENCE(A,B)
c => b
print *, c
END
works fine. Do I forbid it as in ifort? -
[prt@localhost mytests]# ifort test3.f90
fortcom: Error: test3.f90, line 3: An equivalence-object shall not have
the TARGET attribute. [B]
REAL, TARGET :: B
------------------^
compilation aborted for test3.f90 (code 1)
or do I conditionally forbid it with -std=f95?
Richard, what is your opinion, please?
Regards
Paul T