bug about "EOSHIFT" using Fortran in Community Edi

Yesterday, I found a bug with the function “EOSHIFT (ARRAY, SHIFT [, BOUNDARY, DIM]” by using Fortran , when the SHIFT = 0 , the ARRAY should not be changed. However, in this edition, the values in ARRAY will be changed to 0.

Hi willkong,

Do you have a reproducing example you could post or send to PGI Customer Service (trs@pgroup.com)?

Thanks,
Mat

Yes, a example as follows

        PROGRAM MAIN
        IMPLICIT NONE
        INTEGER :: I, A(5)
        
        DO I =1,5
            A(I) = I
        ENDDO
        
        A(1:5) = EOSHIFT(A(1:5),0)
        PRINT *, A
        
        END PROGRAM

======================================
ifort : 1 2 3 4 5
gfortran : 1 2 3 4 5
pgfortran : 0 0 0 0 0

Great, thanks!

I’ve added a problem report (TPR#26667) and sent to our compiler engineers for further investigation.

-Mat