| Message ID | 20230712134207.123424-1-julian@codesourcery.com |
|---|---|
| State | New |
| Headers | show |
| Series | [og13] OpenACC: Vector length warning fixes for implicit mapping/declare create tests | expand |
diff --git a/libgomp/testsuite/libgomp.oacc-c-c++-common/implicit-mapping-1.c b/libgomp/testsuite/libgomp.oacc-c-c++-common/implicit-mapping-1.c index 4825e875998..ed0ab94cd8f 100644 --- a/libgomp/testsuite/libgomp.oacc-c-c++-common/implicit-mapping-1.c +++ b/libgomp/testsuite/libgomp.oacc-c-c++-common/implicit-mapping-1.c @@ -12,6 +12,7 @@ int main(void) #pragma acc enter data copyin(arr[30:10]) #pragma acc serial +/* { dg-warning {using .vector_length \(32\)., ignoring 1} "" { target openacc_nvidia_accel_selected } .-1 } */ { arr[33] = 66; } diff --git a/libgomp/testsuite/libgomp.oacc-fortran/declare-create-1.f90 b/libgomp/testsuite/libgomp.oacc-fortran/declare-create-1.f90 index 9e7e60f1440..057b5eb958a 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/declare-create-1.f90 +++ b/libgomp/testsuite/libgomp.oacc-fortran/declare-create-1.f90 @@ -11,6 +11,7 @@ use m mint = 0 !$acc serial +! { dg-warning {using .vector_length \(32\)., ignoring 1} "" { target openacc_nvidia_accel_selected } .-1 } mint = 5 !$acc end serial diff --git a/libgomp/testsuite/libgomp.oacc-fortran/declare-create-2.f90 b/libgomp/testsuite/libgomp.oacc-fortran/declare-create-2.f90 index 675f6902775..dd7c9798fba 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/declare-create-2.f90 +++ b/libgomp/testsuite/libgomp.oacc-fortran/declare-create-2.f90 @@ -13,6 +13,7 @@ allocate(mint) mint = 0 !$acc serial +! { dg-warning {using .vector_length \(32\)., ignoring 1} "" { target openacc_nvidia_accel_selected } .-1 } mint = 5 !$acc end serial diff --git a/libgomp/testsuite/libgomp.oacc-fortran/declare-create-3.f90 b/libgomp/testsuite/libgomp.oacc-fortran/declare-create-3.f90 index 16651cb1f5e..7cceaa5f8a3 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/declare-create-3.f90 +++ b/libgomp/testsuite/libgomp.oacc-fortran/declare-create-3.f90 @@ -13,6 +13,7 @@ allocate(mint(1:20)) mint = 0 !$acc serial +! { dg-warning {using .vector_length \(32\)., ignoring 1} "" { target openacc_nvidia_accel_selected } .-1 } mint = 5 !$acc end serial diff --git a/libgomp/testsuite/libgomp.oacc-fortran/nonlexical-assumed-size-1.f90 b/libgomp/testsuite/libgomp.oacc-fortran/nonlexical-assumed-size-1.f90 index 4b61e1cee9b..8b173c72d88 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/nonlexical-assumed-size-1.f90 +++ b/libgomp/testsuite/libgomp.oacc-fortran/nonlexical-assumed-size-1.f90 @@ -19,6 +19,7 @@ integer :: arr(*) !$acc enter data copyin(arr(1:10)) !$acc serial +! { dg-warning {using .vector_length \(32\)., ignoring 1} "" { target openacc_nvidia_accel_selected } .-1 } arr(5) = 5 !$acc end serial diff --git a/libgomp/testsuite/libgomp.oacc-fortran/nonlexical-assumed-size-2.f90 b/libgomp/testsuite/libgomp.oacc-fortran/nonlexical-assumed-size-2.f90 index daf7089915f..659fe8e3c06 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/nonlexical-assumed-size-2.f90 +++ b/libgomp/testsuite/libgomp.oacc-fortran/nonlexical-assumed-size-2.f90 @@ -30,6 +30,7 @@ integer :: arr(*) ! overwritten. !$acc serial +! { dg-warning {using .vector_length \(32\)., ignoring 1} "" { target openacc_nvidia_accel_selected } .-1 } ! This access is then done via the on-target pointer. arr(5) = 5 !$acc end serial