Steve,
The error for the test
program p
integer, parameter :: sh(2) = [2, 2]
integer, parameter :: a(2,2) = reshape([1, 2, 3, 4], -sh)
print *, a
end
is
pr68153_2.f90:2:34:
integer, parameter :: sh(2) = [2, 2]
1
Error: 'shape' argument of 'reshape
Le 01/11/2015 20:24, Steve Kargl a écrit :
The attached patch enhances the check of the shape argument
when it is a named constant. See the testcase for example.
Built and regression tested on i386-*-freebsd. OK to commit?
Looks good, yes. Thanks.
Mikael
The attached patch enhances the check of the shape argument
when it is a named constant. See the testcase for example.
Built and regression tested on i386-*-freebsd. OK to commit?
2015-11-01 Steven G. Kargl
PR fortran/68153
* check.c (gfc_check_reshape): Improve check for val
