https://gcc.gnu.org/bugzilla/show_bug.cgi?id=71067
--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de>
---
A) correct with parameter :
$ cat z3.f90
program p
integer, parameter :: i = 0
integer :: z(2)
data z /2*i/
print *, z
end
$ gfortran-6 z3.f90
$ a.out
0 0
B) wrong code detected with scalars :
$ cat z5.f90
program p
integer :: a, b, c
data a /b1'/
data b /o1'
data c /z1
end
$ gfortran-6 z5.f90
z5.f90:3:13:
data a /b1'/
1
Error: Symbol ‘b1’ must be a PARAMETER in DATA statement at (1)
z5.f90:4:13:
data b /o1'
1
Error: Symbol ‘o1’ must be a PARAMETER in DATA statement at (1)
z5.f90:5:13:
data c /z1
1
Error: Symbol ‘z1’ must be a PARAMETER in DATA statement at (1)
