[Omp] segmentation fault with private variable

[Julien Taillard]

Dear all,

I have a segmentation fault when I execute this code with more than 1
thread with xlf_90 compiler.
Is there any restriction in data size for private variable in OpenMP or
have you got any idea of the problem ?

If I remove m2Inst,  it works fine...

PROGRAM testInitTab

        INTEGER :: p0
        INTEGER  :: OMP_GET_THREAD_NUM
        INTEGER , DIMENSION(0:999 , 0:999) :: matrix1Inst
        INTEGER , DIMENSION(0:999 , 0:999) :: matrix2Inst
        INTEGER , DIMENSION(0:999 , 0:999) :: Cinst

        INTEGER , DIMENSION(0:499 , 0:999) :: inAInst
        INTEGER, DIMENSION(0:999,0:499) :: inBInst
        INTEGER, DIMENSION(0:499,0:499) :: m2Inst

        !$OMP PARALLEL PRIVATE(p0,inAInst,inBInst,m2Inst)
SHARED(matrix1Inst ,matrix2Inst ,Cinst)

        p0=OMP_GET_THREAD_NUM()

        PRINT *, "Hello from ",p0

        !$OMP BARRIER

        inAInst = 0
        inBInst = 0
        m2Inst =0

        !$OMP END PARALLEL
END PROGRAM testInitTab



Best regards,
Julien