The following code fails
[/Users/fca] more test.f
subroutine test(bbb)
implicit double precision (A-H,O-Z)
double precision blob(100),bbb(100)
data blob /100*-1/
save blob
do j=1,100
blob(j)=bbb(j)
enddo
end
[/Users/fca] /opt/gcc-4_0/bin/gfortran -c -fno-automatic test.f
In file test.f:3
double precision blob(100),bbb(100)
1
Error: Duplicate SAVE attribute specified at (1)
Two remarks.
- Non-contraddictory declarations should not cause compilation to fail (see
with double precision)
- A compiler switch should not turn valid code into non-compilable code
--
Summary: -fno-automatic does not accept legal save statements
Product: gcc
Version: 4.1.0
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: federico dot carminati at cern dot ch
CC: gcc-bugs at gcc dot gnu dot org
GCC host triplet: Darwin 8.2.0 Power Macintosh powerpc
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=23677
