topic Hard to say, the Fortran in Intel® Fortran Compiler

class pointer problem with Intel 2020 compiler

Vu__Phuong — Thu, 07 May 2020 14:16:03 GMT

It seems the Intel 2020 Fortran compiler has screwed up the handling of class pointer inside a parallel region. The following code snippet example works fine with Intel 2019 compiler and gfortran.

Program main
type, abstract :: abstype
   integer :: me=0
end type abstype

type, extends(abstype) :: type1
end type type1

type(type1), target :: t1
class(abstype), pointer :: base
integer ix, iy, nx, ny

nx = 2
ny = 2

base => t1

select type(base)
class is (type1)
print *, base%me
!$omp parallel do default(shared) private(iy,ix)
do iy = 1,ny
   do ix = 1,nx
   print *, ix, iy, base%me
   enddo
enddo

class default
end select

print *, "DONE"

end Program

maybe related to https:/

Ferdinand_T_ — Fri, 08 May 2020 00:56:21 GMT

maybe related to https://software.intel.com/node/852132

Thanks for the note. It

Vu__Phuong — Fri, 08 May 2020 02:29:35 GMT

Thanks for the note. It could be related (meaning the same code path in the compiler) although I think my situation is more well defined that your situation since I am not doing the select inside a parallel region and in my example when you run it with OMP_NUM_THREADS=1 it always works. Did they give you an idea when your issue may be fixed?

I opened a new bug report.

Ron_Green — Fri, 08 May 2020 23:52:22 GMT

I opened a new bug report. This code is different enough from the other forum thread.

CMPLRIL0-32859

You asked about a date for fix. Hard to say, the Fortran developers have a lot of work between now and 2021. Were I you, I would use 19.0.x for now.

Thank you Ron.

Vu__Phuong — Sat, 09 May 2020 00:50:16 GMT

Thank you Ron.

Yes, we are staying with the 19.x compiler for now since it would take a lot of work to change our codes to work around this issue because it is a pretty common construct for us.

Hard to say, the Fortran

JohnNichols — Sat, 09 May 2020 16:08:15 GMT

Hard to say, the Fortran developers have a lot of work between now and 2021.

----------------------------------------------------------------------------------------------------------

I cannot remember the book - but in some famous novel -- the author wrote that he would love to look into the minds of a particular group -- Fortran Compiler writers must be such a group.

Re:class pointer problem with Intel 2020 compiler

Barbara_P_Intel — Thu, 14 Oct 2021 17:08:01 GMT

I apologize for not notifying you sooner, but this bug was fixed in an earlier version of the 2021.x.x compiler that is available in the oneAPI HPC Toolkit. 2021.4.0 is the current release.

Can you try the current release that was made available on October 1 and let me know how it works for you?