https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68153
--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de>
---
Detected, but pointing to the line before :
$ cat z3.f90
program p
integer, parameter :: sh(2) = [2, 2]
integer, parameter :: a(2,2) = reshape([1, 2, 3, 4], -sh)
print *, a
end
$ gfortran -g -O0 -Wall -fcheck=all z3.f90
z3.f90:2:34:
integer, parameter :: sh(2) = [2, 2]
1
Error: 'shape' argument of 'reshape' intrinsic at (1) has negative element (-2)
