Unexpected error #8583: COARRAY argument of ATOMIC_DEFINE/ATOMIC_REF intrinsic subroutine shall be a coarray with named argument

[FortranFan]

Fyi on a support incident submitted at the Intel Online Service Center:

   use, intrinsic :: iso_fortran_env, only : AI => atomic_int_kind

   integer(kind=AI) :: vali
   integer(kind=AI), save :: foo


   call atomic_ref( atom=foo[1], value=vali )

end

xx>ifort /standard-semantics /Qcoarray p.f90
Intel(R) Visual Fortran Intel(R) 64 Compiler for applications running on Intel(R
) 64, Version 18.0.1.156 Build 20171018
Copyright (C) 1985-2017 Intel Corporation. All rights reserved.

p.f90(6): error #8583: COARRAY argument of ATOMIC_DEFINE/ATOMIC_REF intrinsic su
broutine shall be a coarray. [VALI]
call atomic_ref( atom=foo[1], value=vali )
---------------------------------------^
compilation aborted for p.f90 (code 1)

   use, intrinsic :: iso_fortran_env, only : AI => atomic_int_kind

   integer(kind=AI) :: vali
   integer(kind=AI), save :: foo


   call atomic_define( value=vali, atom=foo[1] )

end

xx>ifort /standard-semantics /Qcoarray p.f90
Intel(R) Visual Fortran Intel(R) 64 Compiler for applications running on Intel(R
) 64, Version 18.0.1.156 Build 20171018
Copyright (C) 1985-2017 Intel Corporation.  All rights reserved.

p.f90(6): error #8583: COARRAY argument of ATOMIC_DEFINE/ATOMIC_REF intrinsic su
broutine shall be a coarray.   [VALI]
   call atomic_define( value=vali, atom=foo[1] )
-----------------------------^
compilation aborted for p.f90 (code 1)

I think Intel Fortran compiler is wrong to issue the above shown error #8583 with the named arguments that include the dummy argument keyword.  I have requested Intel Fortran team to review this.

[Michael_S_17]

I can confirm that gfortran/OpenCoarrays does allow (and does work with) a varying sequence of the named argument list as shown with your example code.
Best Regards

[FortranFan · Accepted solution]

Michael S. wrote:

I can confirm that gfortran/OpenCoarrays does allow (and does work with) a varying sequence of the named argument list as shown with your example code.
Best Regards

@Michael S.,

Thanks much for your feedback on gfortran/OpenCoarrays, hopefully Intel Fortran team will be able to resolve this one quickly.

Best Regards,