Dear all,
I have another problem: before upgrade to the new version (for example, 11.1.XXX), the project works. After upgraded to the new version, the following error displayed:
error #7859: A SHARABLE or THREADPRIVATE entity is not permitted in a PRIVATE, FIRSTPRIVATE, LASTPRIVATE, SHARED or REDUCTION clause.
However, when I tried to configure an example to reproduce this error, it can be successfully built. Can anyone help me to figure out the solution to this problem?
Thanks,
Zhanghong Tang
module test
integer::icomm=0
!$OMP THREADPRIVATE(icomm)
end module
subroutine FORLIB()
use test
!$omp parallel
icomm=icomm+1
call passi(icomm) ! in my project, the error happened here
print *, 'FORLIB', icomm
!$omp single
icomm=icomm+1
print *, icomm
!$omp end single
!$omp end parallel
end subroutine
subroutine passi(ii)
integer::ii
end subroutine
