Adjust 'gfortran.dg/goacc/privatization-1-*' [PR103576, PR103697]
authorThomas Schwinge <thomas@codesourcery.com>
Tue, 14 Dec 2021 06:03:52 +0000 (07:03 +0100)
committerThomas Schwinge <thomas@codesourcery.com>
Tue, 14 Dec 2021 06:17:18 +0000 (07:17 +0100)
commit228d64af4e244faabab5c47506920a1bde85d74e
tree1bd61fe7f2852055eecd5ff8434c3fb409ed6000
parent7f1239cb43fad3293cf5bcd3678d1cba128d04c6
Adjust 'gfortran.dg/goacc/privatization-1-*' [PR103576, PR103697]

... for the recent commit 494ebfa7c9aacaeb6ec1fccc47a0e49f31eb2bb8
"Fortran: Handle compare in OpenMP atomic", which changes the GIMPLE IR
such that a temporary is no longer used; 'original' dump:

             x = *a;
    -        {
    -          integer(kind=4) D.4237;
    -
    -          D.4237 = *a;
               #pragma omp atomic relaxed
    -            &y = D.4237;
    -        }
    +          &y = *a;
           }

(I'm not familiar to comment whether that's correct; but it appears that the
difference again disappears in later compiler passes.)

These OpenACC test cases verify behavior re OpenACC privatization levels, and
have to be adjusted accordingly.

gcc/testsuite/
PR fortran/103576
PR testsuite/103697
* gfortran.dg/goacc/privatization-1-compute-loop.f90: Adjust.
* gfortran.dg/goacc/privatization-1-compute.f90: Likewise.
* gfortran.dg/goacc/privatization-1-routine_gang-loop.f90:
Likewise.
* gfortran.dg/goacc/privatization-1-routine_gang.f90: Likewise.
gcc/testsuite/gfortran.dg/goacc/privatization-1-compute-loop.f90
gcc/testsuite/gfortran.dg/goacc/privatization-1-compute.f90
gcc/testsuite/gfortran.dg/goacc/privatization-1-routine_gang-loop.f90
gcc/testsuite/gfortran.dg/goacc/privatization-1-routine_gang.f90