(j3.2006) STAT= and integer kind

[Tobias Burnus]

Malcolm Cohen wrote:
>> in the current TS18508 draft from May, the collectives take for the STAT
>> argument a default-kind integer. On the other hand, 14-173r2 suggest to
>> add a STAT= to the atomic intrinsics which can be any integer kind.
> The TS is providing an update to F2008.  One would therefore expect it to be
> consistent with F2008, and it is.
>
> 14-173r2 is a new feature in F2015.

I find this a bit surprising as it refers to N2013, which is the N2007 
(= DTS 18508) ballot.

Taking this literally means that TS18508 will contain
ATOMIC_ADD (ATOM, VALUE) and ATOMIC_ADD (ATOM, VALUE, OLD)

while 14-173r2 will modify this incompatibly for Fortran 2015 to

ATOMIC_ADD (ATOM, VALUE[,STAT]) and ATOMIC_ADD_FETCH (ATOM, VALUE, OLD[, 
STAT])

I assume that won't happen. Thus, how do you intent to integrate 
14-173r2 into TS18508? Only by doing the _FETCH change without adding 
the STAT?

> How features in the TS interact with this or any other new features that are in F2015 is something that will need to be
> addressed when the TS is integrated into F2015.  It cannot be addressed prior to that unless you are going to actually put the entire feature into the TS ... which in this case would not make sense.

Hmm, but F2008 also supports nondefault-kind integers for STAT=, see, 
e.g., "R628 stat-variable is scalar-int-variable". Admittedly, many 
(all?) of the STATUS= arguments of the intrinsics use a default-kind 
integer.

Tobias