diff options
author | Julian Brown <julian@codesourcery.com> | 2021-02-09 12:00:14 -0800 |
---|---|---|
committer | Julian Brown <julian@codesourcery.com> | 2021-02-09 19:16:28 -0800 |
commit | f7fb2f662fe12f327ece8b034ab76b36fdca4696 (patch) | |
tree | d8e4dc3de583af8ccaba0431d265ccebf60cd74d /gcc | |
parent | b0fb2720d88d680af18981a2097397196b505a1f (diff) | |
download | gcc-f7fb2f662fe12f327ece8b034ab76b36fdca4696.zip gcc-f7fb2f662fe12f327ece8b034ab76b36fdca4696.tar.gz gcc-f7fb2f662fe12f327ece8b034ab76b36fdca4696.tar.bz2 |
openacc: Add XFAILs [PR98979]
This patch adds some XFAILs for PR98979 until the patch to fix them has
been approved. See:
https://gcc.gnu.org/pipermail/gcc-patches/2021-February/564711.html
gcc/testsuite/
PR fortran/98979
* gfortran.dg/goacc/array-with-dt-2.f90: Add expected errors.
* gfortran.dg/goacc/derived-chartypes-1.f90: Skip ICEing test.
* gfortran.dg/goacc/derived-chartypes-2.f90: Likewise.
libgomp/
PR fortran/98979
* testsuite/libgomp.oacc-fortran/array-stride-dt-1.f90: Add expected
errors.
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/testsuite/gfortran.dg/goacc/array-with-dt-2.f90 | 5 | ||||
-rw-r--r-- | gcc/testsuite/gfortran.dg/goacc/derived-chartypes-1.f90 | 3 | ||||
-rw-r--r-- | gcc/testsuite/gfortran.dg/goacc/derived-chartypes-2.f90 | 3 |
3 files changed, 9 insertions, 2 deletions
diff --git a/gcc/testsuite/gfortran.dg/goacc/array-with-dt-2.f90 b/gcc/testsuite/gfortran.dg/goacc/array-with-dt-2.f90 index 807580d..e4a6f31 100644 --- a/gcc/testsuite/gfortran.dg/goacc/array-with-dt-2.f90 +++ b/gcc/testsuite/gfortran.dg/goacc/array-with-dt-2.f90 @@ -4,7 +4,8 @@ end type t type(t), allocatable :: b(:) -!$acc update host(b(::2)) -!$acc update host(b(1)%A(::3,::4)) +! TODO: Remove expected errors when this is supported. +!$acc update host(b(::2)) ! { dg-error "Stride should not be specified for array section in MAP clause" } +!$acc update host(b(1)%A(::3,::4)) ! { dg-error "Stride should not be specified for array section in MAP clause" } end diff --git a/gcc/testsuite/gfortran.dg/goacc/derived-chartypes-1.f90 b/gcc/testsuite/gfortran.dg/goacc/derived-chartypes-1.f90 index e4d360e..f7aafbf 100644 --- a/gcc/testsuite/gfortran.dg/goacc/derived-chartypes-1.f90 +++ b/gcc/testsuite/gfortran.dg/goacc/derived-chartypes-1.f90 @@ -1,3 +1,6 @@ +! This currently ICEs. Avoid that. +! { dg-skip-if "PR98979" { *-*-* } } + type :: type1 character(len=35) :: a end type type1 diff --git a/gcc/testsuite/gfortran.dg/goacc/derived-chartypes-2.f90 b/gcc/testsuite/gfortran.dg/goacc/derived-chartypes-2.f90 index cca6443..e22fc67 100644 --- a/gcc/testsuite/gfortran.dg/goacc/derived-chartypes-2.f90 +++ b/gcc/testsuite/gfortran.dg/goacc/derived-chartypes-2.f90 @@ -1,3 +1,6 @@ +! This currently ICEs. Avoid that. +! { dg-skip-if "PR98979" { *-*-* } } + type :: type1 character(len=35,kind=4) :: a end type type1 |