This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/30792] New: DATA implied-do substring allowed with -std=f95/f2003
- From: "burnus at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 14 Feb 2007 09:38:38 -0000
- Subject: [Bug fortran/30792] New: DATA implied-do substring allowed with -std=f95/f2003
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
The following mini program gives an error in other compilers, but not in
gfortran, we should check whether we need to give an error as well.
Cf.
http://groups.google.com/group/comp.lang.fortran/browse_thread/thread/1cb58e9fed576fbe
---------------------------
CHARACTER string*1025
INTEGER i
DATA (string(i:i),i=1,1025)/1025*'?'/
end
---------------------------
$ g95 foo1.f90
In file foo1.f90:3
DATA (string(i:i),i=1,1025)/1025*'?'/
1
Error: DATA element inside iterator at (1) must be an array element or a scalar
structure component
$ f95 foo1.f90 # NAG
f95 foo1.f90
Error: foo1.f90, line 3: Substring in data-implied-do
detected at )@,
$ sunf95 foo1.f90
DATA (string(i:i),i=1,1025)/1025*'?'/
^
"foo1.f90", Line = 3, Column = 13: ERROR: A DATA implied-DO target must be an
array element or scalar structure component reference.
(It is accepted with "ifort -stand f95 -warn all".)
At a glance, I cannot find this restriction in the Fortran 2003 standard.
We should also check the corrigenda and F95+corrigenda.
http://gcc.gnu.org/wiki/GFortranStandards
--
Summary: DATA implied-do substring allowed with -std=f95/f2003
Product: gcc
Version: 4.3.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: burnus at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=30792