diff options
Diffstat (limited to 'libgomp/testsuite/libgomp.fortran')
-rw-r--r-- | libgomp/testsuite/libgomp.fortran/target-print-1-nvptx.f90 | 11 | ||||
-rw-r--r-- | libgomp/testsuite/libgomp.fortran/target-print-1.f90 | 6 |
2 files changed, 15 insertions, 2 deletions
diff --git a/libgomp/testsuite/libgomp.fortran/target-print-1-nvptx.f90 b/libgomp/testsuite/libgomp.fortran/target-print-1-nvptx.f90 new file mode 100644 index 00000000000..a89c9c33484 --- /dev/null +++ b/libgomp/testsuite/libgomp.fortran/target-print-1-nvptx.f90 @@ -0,0 +1,11 @@ +! Ensure that write on the offload device works, nvptx offloading variant. + +! This doesn't compile: for nvptx offloading we're using a minimal libgfortran +! configuration. +! { dg-do link } ! ..., but still apply 'dg-do run' options. +! { dg-xfail-if "minimal libgfortran" { offload_target_nvptx } } + +! Skip duplicated testing. +! { dg-skip-if "separate file" { ! offload_target_nvptx } } + +include 'target-print-1.f90' diff --git a/libgomp/testsuite/libgomp.fortran/target-print-1.f90 b/libgomp/testsuite/libgomp.fortran/target-print-1.f90 index c71a0952483..327bb22cb6d 100644 --- a/libgomp/testsuite/libgomp.fortran/target-print-1.f90 +++ b/libgomp/testsuite/libgomp.fortran/target-print-1.f90 @@ -1,8 +1,10 @@ -! Ensure that printf on the offload device works. +! Ensure that write on the offload device works. ! { dg-do run } ! { dg-output "The answer is 42(\n|\r\n|\r)+" } -! { dg-xfail-if "no write for nvidia" { openacc_nvidia_accel_selected } } + +! Separate file 'target-print-1-nvptx.f90' for nvptx offloading. +! { dg-skip-if "separate file" { offload_target_nvptx } } program main implicit none |