diff options
Diffstat (limited to 'libgomp')
| -rw-r--r-- | libgomp/testsuite/libgomp.oacc-fortran/array-stride-dt-1.f90 | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/libgomp/testsuite/libgomp.oacc-fortran/array-stride-dt-1.f90 b/libgomp/testsuite/libgomp.oacc-fortran/array-stride-dt-1.f90 index f04d76d..6125070 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/array-stride-dt-1.f90 +++ b/libgomp/testsuite/libgomp.oacc-fortran/array-stride-dt-1.f90 @@ -24,8 +24,9 @@ end do b(1)%A(:,:) = 5 -!$acc update device(b(::2)) -!$acc update device(b(1)%A(::3,::4)) +! TODO: Remove expected errors once this is supported. +!$acc update device(b(::2)) ! { dg-error "Stride should not be specified for array section in MAP clause" } +!$acc update device(b(1)%A(::3,::4)) ! { dg-error "Stride should not be specified for array section in MAP clause" } do i=1,20 !$acc exit data copyout(b(i)%A) |