topic This seems to be an in Intel® Fortran Compiler

Openmp allocatable type private bug

Patrice_l_ — Fri, 26 Dec 2014 17:17:26 GMT

Hi all,

I think there is a bug , when using an allocatable type in a private list, like the small example below. For this program , I get "allocatable array is already allocated" , without openmp it works well. And No problem with gfortran either.

Thanks.

Pat

program toto
implicit none
type qq
double precision,dimension(:),allocatable :: f
end type
call t()
contains
subroutine t()
type(qq),allocatable :: ff
double precision,dimension(:),allocatable :: f
integer :: i,j
i=0
!$omp parallel sections private(f,ff)
!$omp section 
print *,i
!$omp section
allocate(f(10))
f=2
print *,'f',f
deallocate(f)
!$omp section
allocate(ff)
allocate(ff%f(5))
ff%f=5
print *,'g',ff%f
deallocate(ff)
!$omp end parallel sections
end subroutine
end program toto

Did you mean to make the

TimP — Fri, 26 Dec 2014 20:21:00 GMT

Oops disregard

Add copyin(f,ff) such that

jimdempseyatthecove — Fri, 26 Dec 2014 22:21:25 GMT

Add copyin(f,ff) such that the empty array descriptors are copied to the thread copy of the array descriptor.

Jim Dempsey

With what compiler version,

Martyn_C_Intel — Mon, 05 Jan 2015 17:27:01 GMT

With what compiler version, environment and command line did you see the error?

I tried and your code seemed to work fine for me. I don't see why a copyin clause should be needed, there's no actual data to copy.

Hi ,

Patrice_l_ — Mon, 05 Jan 2015 17:40:47 GMT

Hi ,

I'm using version 15.0.1 and I'm compiling with ifort -O0 -C -g -traceback. The test case is simple so it doesnt trigger the bug without the check. But it does in a more complicated case.

Pat.

Thanks, that allowed me to

Martyn_C_Intel — Mon, 05 Jan 2015 20:49:08 GMT

Thanks, that allowed me to reproduce. I was able to make a smaller test case that gave the error even without -C. This has been escalated to the compiler developers, we'll let you know what they say. It's possible that there might be a link between this issue and the other one that you reported.

Thanks for reporting these problems and for providing clear reproducers.

This seems to be an

Martyn_C_Intel — Tue, 21 Apr 2015 19:33:06 GMT

This seems to be an independent problem. A fix is being targeted for the same update to the version 16.0 beta compiler as for your OpenMP tasking issue, available in about a couple of weeks. If you would like to test the fix in the 16.0 beta compiler, see Steve's post at the top of this forum, (https://software.intel.com/en-us/forums/topic/549312 ) and go to the registration link. Please let us know if it works.

That beta update compiler is

Martyn_C_Intel — Mon, 18 May 2015 23:56:56 GMT

That beta update compiler is now available.

I confirm this bug is fixed

Patrice_l_ — Tue, 19 May 2015 14:10:12 GMT

I confirm this bug is fixed with the intel 16 beta update 1.