topic Simplification of FINDLOC with array of size 0 fails in Intel® Fortran Compiler

Simplification of FINDLOC with array of size 0 fails

Harald1 — Tue, 20 Sep 2022 21:29:44 GMT

The following code is rejected by ifort 2021.6.0:

program p ! integer, parameter :: ii(1) = findloc ([integer::1],1) ! works integer, parameter :: ii(1) = findloc ([integer:: ],1) ! fails print *, ii print *, findloc ([integer::],1) ! accepted end

This gives:

% ifort ifort-findloc.f90 ifort-findloc.f90(3): error #6821: A scalar constant is required in this context. integer, parameter :: ii(1) = findloc ([integer:: ],1) ! fails --------------------------------^ compilation aborted for ifort-findloc.f90 (code 1)

It shouldn't be too hard to do the simplification...

Re: Simplification of FINDLOC with array of size 0 fails

Mark_Lewy — Thu, 22 Sep 2022 07:44:24 GMT

I'd argue that this is a compiler bug as

findloc ([integer:: ],1)

looks like a legitimate constant expression (according to MFE 8.4).

I note also that gfortran --warn-all (MSYS2 10.2.0) compiles this without any warnings and produces the desired output.

Re:Simplification of FINDLOC with array of size 0 fails

Barbara_P_Intel — Fri, 23 Sep 2022 16:13:10 GMT

I filed a bug report on this erroneous error message, CMPLRIL0-34931.

Re:Simplification of FINDLOC with array of size 0 fails

Barbara_P_Intel — Tue, 03 Jan 2023 19:48:20 GMT

This FINDLOC() issue is resolved in the latest Fortran compilers that were released in December. Give it a try!

Re: Simplification of FINDLOC with array of size 0 fails

Harald1 — Tue, 03 Jan 2023 21:02:35 GMT

Yes, it is fixed in the latest version. Thanks!