Ошибка компиляторов Intel Fortran при параллелизации01.11.2023 15:30

Обнаружил интересную ошибку компиляторов Intel Fortran 2023 года.

Исходный код:

program err

  implicit none

  integer :: s
  integer :: step, i

  step = 32

  do
    s = 0
    do concurrent (i=301:724:step)
      s = s + i
    end do
    print *, s
  end do

end program err

Такой параллельный цикл do concurrent, будучи скомпилирован в smp режиме (т.е. с ключом -fopenmp) даёт в компиляторе ifort случайные результаты, а в компиляторе ifx — нули.

В режиме последовательного выполнения программы всё работает правильно.

Для воспроизведения ошибки необходимы и достаточны следующие условия: Intel, do concurrent с шагом, заданным переменной, -fopenmp.

gfortran такой ошибкой не страдает, но он, впрочем, и не параллелит циклы do concurrent.

Будьте аккуратны.