https://gcc.gnu.org/bugzilla/show_bug.cgi?id=97408
Tobias Burnus <burnus at gcc dot gnu.org> changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |burnus at gcc dot gnu.org
Keywords| |rejects-valid
Summary|Diagnose non-constant KIND |Handle ac-do-variable KIND
|argument to intrinsics |argument to intrinsics
--- Comment #2 from Tobias Burnus <burnus at gcc dot gnu.org> ---
I have asked at J3 about the 'kind=' and Malcolm Cohen stated:
"Yes it is a constant expression.
"It is actually very clear, as item (12) it “what can go into a constant
expression” is
"“an *ac-do-variable* within an array constructor where each scalar-int-expr of
the corresponding ac-implied-do-control is a constant expression”"
I asked for the following program:
use iso_fortran_env
integer, parameter :: n1 = minval(integer_kinds)
integer, parameter :: n2 = maxval(integer_kinds)
integer, parameter :: A(*) = [integer :: (int(A=i, kind=i), i=n1,n2,n2-n1)]
print *, A
end
