From: Tobias Burnus Date: Fri, 20 Dec 2019 09:30:24 +0000 (+0100) Subject: Fix testsuite-fallout of OpenACC deep-copy patch X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=211c667faf4edff934894776ac0f8c81fe1b1708;p=gcc.git Fix testsuite-fallout of OpenACC deep-copy patch gcc/testsuite/ * gfortran.dg/goacc/data-clauses.f95: Remove now obsolete dg-error. From-SVN: r279634 --- diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index ee072abf7a8..77730594a00 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2019-12-20 Tobias Burnus + + * gfortran.dg/goacc/data-clauses.f95: Remove now + obsolete dg-error. + 2019-12-20 Jakub Jelinek PR target/92841 @@ -8,11 +13,11 @@ 2019-12-19 Julian Brown - * gfortran.dg/goacc/derived-types.f90: New test. - * gfortran.dg/goacc/derived-types-2.f90: New test. - * gfortran.dg/goacc/derived-types-3.f90: New test. - * gfortran.dg/goacc/data-clauses.f95: Adjust for expected errors. - * gfortran.dg/goacc/enter-exit-data.f95: Likewise. + * gfortran.dg/goacc/derived-types.f90: New test. + * gfortran.dg/goacc/derived-types-2.f90: New test. + * gfortran.dg/goacc/derived-types-3.f90: New test. + * gfortran.dg/goacc/data-clauses.f95: Adjust for expected errors. + * gfortran.dg/goacc/enter-exit-data.f95: Likewise. 2019-12-19 Julian Brown Cesar Philippidis diff --git a/gcc/testsuite/gfortran.dg/goacc/data-clauses.f95 b/gcc/testsuite/gfortran.dg/goacc/data-clauses.f95 index cc68e408e1f..fe32f1eaf08 100644 --- a/gcc/testsuite/gfortran.dg/goacc/data-clauses.f95 +++ b/gcc/testsuite/gfortran.dg/goacc/data-clauses.f95 @@ -111,9 +111,9 @@ contains !$acc end data - !$acc parallel no_create (tip) ! { dg-error "POINTER" } + !$acc parallel no_create (tip) !$acc end parallel - !$acc parallel no_create (tia) ! { dg-error "ALLOCATABLE" } + !$acc parallel no_create (tia) !$acc end parallel !$acc parallel deviceptr (i) no_create (i) ! { dg-error "multiple clauses" } !$acc end parallel @@ -132,7 +132,7 @@ contains !$acc end data - !$acc parallel present (tip) ! { dg-error "POINTER" } + !$acc parallel present (tip) !$acc end parallel !$acc parallel present (tia) !$acc end parallel