https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68053

--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de> 
---
Accepted and correct, if scalar parameter n is used instead :


$ cat z1s.f90
program p
   integer, parameter :: n = -1
   integer, parameter :: x(1) = 7
   integer, parameter :: z(n:*) = x
   print *, z
end


$ cat z2s.f90
program p
   integer, parameter :: n = -1
   integer, parameter :: x(1, 2) = 7
   integer, parameter :: z(n:*, n:*) = x
   print *, z
end


$ gfortran -g -O0 -Wall -fcheck=all z1s.f90
$ a.out
           7

$ gfortran -g -O0 -Wall -fcheck=all z2s.f90
$ a.out
           7           7

Reply via email to