Hi! On 2018-04-19T11:06:18+0200, I wrote: > [...] I have applied the following in trunk > r259491 [...]
> libgomp/ > PR libgomp/85463 > * testsuite/libgomp.oacc-fortran/error_stop-1.f: New file. > * testsuite/libgomp.oacc-fortran/error_stop-2.f: Likewise. > * testsuite/libgomp.oacc-fortran/error_stop-3.f: Likewise. > * testsuite/libgomp.oacc-fortran/stop-1.f: Likewise. > * testsuite/libgomp.oacc-fortran/stop-2.f: Likewise. > * testsuite/libgomp.oacc-fortran/stop-3.f: Likewise. To get rid of some noise in certain variants of libgomp testing that I'm running, I pushed "'libgomp.oacc-fortran/{error_,}stop-{1,2,3}.f': initialize before the checkpoint" to master branch in commit 1e378edd8f038c52914bc6cac8f6dd5a5c4f8a98, releases/gcc-10 branch in commit 96bfb6e1d2dadef180c02d0e006ae72315305e76, releases/gcc-9 branch in commit 62758cf490afdf73f0deeba39aa05583de99b3a4, and releases/gcc-8 branch in commit f4a45e0d85e51bd6550a82f31f70484c03332a4e, see attached. Grüße Thomas ----------------- Mentor Graphics (Deutschland) GmbH, Arnulfstraße 201, 80634 München / Germany Registergericht München HRB 106955, Geschäftsführer: Thomas Heurung, Alexander Walter
>From 1e378edd8f038c52914bc6cac8f6dd5a5c4f8a98 Mon Sep 17 00:00:00 2001 From: Thomas Schwinge <tho...@codesourcery.com> Date: Wed, 6 May 2020 10:05:49 +0200 Subject: [PATCH] 'libgomp.oacc-fortran/{error_,}stop-{1,2,3}.f': initialize before the checkpoint If, for example, GCC is configured such that 'libgomp-plugin-nvptx.so.1' dynamically links against 'libcuda.so.1', but testing is run on a system where there is no 'libcuda.so.1', this produces output such as: PASS: libgomp.oacc-fortran/error_stop-1.f -DACC_DEVICE_TYPE_host=1 -DACC_MEM_SHARED=1 -foffload=disable -O0 (test for excess errors) PASS: libgomp.oacc-fortran/error_stop-1.f -DACC_DEVICE_TYPE_host=1 -DACC_MEM_SHARED=1 -foffload=disable -O0 execution test FAIL: libgomp.oacc-fortran/error_stop-1.f -DACC_DEVICE_TYPE_host=1 -DACC_MEM_SHARED=1 -foffload=disable -O0 output pattern test, is CheCKpOInT libgomp: while loading libgomp-plugin-nvptx.so.1: libcuda.so.1: cannot open shared object file: No such file or directory ERROR STOP Error termination. Backtrace: [...] , should match CheCKpOInT( | |^M)+ERROR STOP ( | |^M)+Error termination.* ..., where after 'CheCKpOInT' we got 'libgomp: while loading [...]' injected before the expected 'ERROR STOP'. libgomp/ * testsuite/libgomp.oacc-fortran/error_stop-1.f: Initialize before the checkpoint. * testsuite/libgomp.oacc-fortran/error_stop-2.f: Likewise. * testsuite/libgomp.oacc-fortran/error_stop-3.f: Likewise. * testsuite/libgomp.oacc-fortran/stop-1.f: Likewise. * testsuite/libgomp.oacc-fortran/stop-2.f: Likewise. * testsuite/libgomp.oacc-fortran/stop-3.f: Likewise. --- libgomp/testsuite/libgomp.oacc-fortran/error_stop-1.f | 4 ++++ libgomp/testsuite/libgomp.oacc-fortran/error_stop-2.f | 4 ++++ libgomp/testsuite/libgomp.oacc-fortran/error_stop-3.f | 4 ++++ libgomp/testsuite/libgomp.oacc-fortran/stop-1.f | 4 ++++ libgomp/testsuite/libgomp.oacc-fortran/stop-2.f | 4 ++++ libgomp/testsuite/libgomp.oacc-fortran/stop-3.f | 4 ++++ 6 files changed, 24 insertions(+) diff --git a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-1.f b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-1.f index a3f54d57bc35..de727749a53f 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-1.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-1.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL ERROR STOP diff --git a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-2.f b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-2.f index 5d5d20d1bc53..475c9cb58507 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-2.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-2.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL ERROR STOP 35 diff --git a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-3.f b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-3.f index edb063b182bc..ab63444ce34f 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-3.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-3.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL ERROR STOP "SiGN" diff --git a/libgomp/testsuite/libgomp.oacc-fortran/stop-1.f b/libgomp/testsuite/libgomp.oacc-fortran/stop-1.f index af267fc08d1d..2c00d2e5bf8c 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/stop-1.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/stop-1.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL STOP diff --git a/libgomp/testsuite/libgomp.oacc-fortran/stop-2.f b/libgomp/testsuite/libgomp.oacc-fortran/stop-2.f index 13c06845c08f..adade54557c2 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/stop-2.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/stop-2.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL STOP 35 diff --git a/libgomp/testsuite/libgomp.oacc-fortran/stop-3.f b/libgomp/testsuite/libgomp.oacc-fortran/stop-3.f index 3bd7446571de..157e369d4e7e 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/stop-3.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/stop-3.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL STOP "SiGN" -- 2.26.2
>From 96bfb6e1d2dadef180c02d0e006ae72315305e76 Mon Sep 17 00:00:00 2001 From: Thomas Schwinge <tho...@codesourcery.com> Date: Wed, 6 May 2020 10:05:49 +0200 Subject: [PATCH] 'libgomp.oacc-fortran/{error_,}stop-{1,2,3}.f': initialize before the checkpoint If, for example, GCC is configured such that 'libgomp-plugin-nvptx.so.1' dynamically links against 'libcuda.so.1', but testing is run on a system where there is no 'libcuda.so.1', this produces output such as: PASS: libgomp.oacc-fortran/error_stop-1.f -DACC_DEVICE_TYPE_host=1 -DACC_MEM_SHARED=1 -foffload=disable -O0 (test for excess errors) PASS: libgomp.oacc-fortran/error_stop-1.f -DACC_DEVICE_TYPE_host=1 -DACC_MEM_SHARED=1 -foffload=disable -O0 execution test FAIL: libgomp.oacc-fortran/error_stop-1.f -DACC_DEVICE_TYPE_host=1 -DACC_MEM_SHARED=1 -foffload=disable -O0 output pattern test, is CheCKpOInT libgomp: while loading libgomp-plugin-nvptx.so.1: libcuda.so.1: cannot open shared object file: No such file or directory ERROR STOP Error termination. Backtrace: [...] , should match CheCKpOInT( | |^M)+ERROR STOP ( | |^M)+Error termination.* ..., where after 'CheCKpOInT' we got 'libgomp: while loading [...]' injected before the expected 'ERROR STOP'. libgomp/ * testsuite/libgomp.oacc-fortran/error_stop-1.f: Initialize before the checkpoint. * testsuite/libgomp.oacc-fortran/error_stop-2.f: Likewise. * testsuite/libgomp.oacc-fortran/error_stop-3.f: Likewise. * testsuite/libgomp.oacc-fortran/stop-1.f: Likewise. * testsuite/libgomp.oacc-fortran/stop-2.f: Likewise. * testsuite/libgomp.oacc-fortran/stop-3.f: Likewise. (cherry picked from commit 1e378edd8f038c52914bc6cac8f6dd5a5c4f8a98) --- libgomp/testsuite/libgomp.oacc-fortran/error_stop-1.f | 4 ++++ libgomp/testsuite/libgomp.oacc-fortran/error_stop-2.f | 4 ++++ libgomp/testsuite/libgomp.oacc-fortran/error_stop-3.f | 4 ++++ libgomp/testsuite/libgomp.oacc-fortran/stop-1.f | 4 ++++ libgomp/testsuite/libgomp.oacc-fortran/stop-2.f | 4 ++++ libgomp/testsuite/libgomp.oacc-fortran/stop-3.f | 4 ++++ 6 files changed, 24 insertions(+) diff --git a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-1.f b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-1.f index a3f54d57bc35..de727749a53f 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-1.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-1.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL ERROR STOP diff --git a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-2.f b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-2.f index 5d5d20d1bc53..475c9cb58507 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-2.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-2.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL ERROR STOP 35 diff --git a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-3.f b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-3.f index edb063b182bc..ab63444ce34f 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-3.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-3.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL ERROR STOP "SiGN" diff --git a/libgomp/testsuite/libgomp.oacc-fortran/stop-1.f b/libgomp/testsuite/libgomp.oacc-fortran/stop-1.f index af267fc08d1d..2c00d2e5bf8c 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/stop-1.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/stop-1.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL STOP diff --git a/libgomp/testsuite/libgomp.oacc-fortran/stop-2.f b/libgomp/testsuite/libgomp.oacc-fortran/stop-2.f index 13c06845c08f..adade54557c2 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/stop-2.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/stop-2.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL STOP 35 diff --git a/libgomp/testsuite/libgomp.oacc-fortran/stop-3.f b/libgomp/testsuite/libgomp.oacc-fortran/stop-3.f index 3bd7446571de..157e369d4e7e 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/stop-3.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/stop-3.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL STOP "SiGN" -- 2.26.2
>From 62758cf490afdf73f0deeba39aa05583de99b3a4 Mon Sep 17 00:00:00 2001 From: Thomas Schwinge <tho...@codesourcery.com> Date: Wed, 6 May 2020 10:05:49 +0200 Subject: [PATCH] 'libgomp.oacc-fortran/{error_,}stop-{1,2,3}.f': initialize before the checkpoint If, for example, GCC is configured such that 'libgomp-plugin-nvptx.so.1' dynamically links against 'libcuda.so.1', but testing is run on a system where there is no 'libcuda.so.1', this produces output such as: PASS: libgomp.oacc-fortran/error_stop-1.f -DACC_DEVICE_TYPE_host=1 -DACC_MEM_SHARED=1 -foffload=disable -O0 (test for excess errors) PASS: libgomp.oacc-fortran/error_stop-1.f -DACC_DEVICE_TYPE_host=1 -DACC_MEM_SHARED=1 -foffload=disable -O0 execution test FAIL: libgomp.oacc-fortran/error_stop-1.f -DACC_DEVICE_TYPE_host=1 -DACC_MEM_SHARED=1 -foffload=disable -O0 output pattern test, is CheCKpOInT libgomp: while loading libgomp-plugin-nvptx.so.1: libcuda.so.1: cannot open shared object file: No such file or directory ERROR STOP Error termination. Backtrace: [...] , should match CheCKpOInT( | |^M)+ERROR STOP ( | |^M)+Error termination.* ..., where after 'CheCKpOInT' we got 'libgomp: while loading [...]' injected before the expected 'ERROR STOP'. libgomp/ * testsuite/libgomp.oacc-fortran/error_stop-1.f: Initialize before the checkpoint. * testsuite/libgomp.oacc-fortran/error_stop-2.f: Likewise. * testsuite/libgomp.oacc-fortran/error_stop-3.f: Likewise. * testsuite/libgomp.oacc-fortran/stop-1.f: Likewise. * testsuite/libgomp.oacc-fortran/stop-2.f: Likewise. * testsuite/libgomp.oacc-fortran/stop-3.f: Likewise. (cherry picked from commit 1e378edd8f038c52914bc6cac8f6dd5a5c4f8a98) --- libgomp/testsuite/libgomp.oacc-fortran/error_stop-1.f | 4 ++++ libgomp/testsuite/libgomp.oacc-fortran/error_stop-2.f | 4 ++++ libgomp/testsuite/libgomp.oacc-fortran/error_stop-3.f | 4 ++++ libgomp/testsuite/libgomp.oacc-fortran/stop-1.f | 4 ++++ libgomp/testsuite/libgomp.oacc-fortran/stop-2.f | 4 ++++ libgomp/testsuite/libgomp.oacc-fortran/stop-3.f | 4 ++++ 6 files changed, 24 insertions(+) diff --git a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-1.f b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-1.f index 4965e674c27b..a995d955fc23 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-1.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-1.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL ERROR STOP diff --git a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-2.f b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-2.f index 7103fdb5d8ed..426c15abcdf2 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-2.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-2.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL ERROR STOP 35 diff --git a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-3.f b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-3.f index 9c217f14ea1b..bef01e6d505b 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-3.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-3.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL ERROR STOP "SiGN" diff --git a/libgomp/testsuite/libgomp.oacc-fortran/stop-1.f b/libgomp/testsuite/libgomp.oacc-fortran/stop-1.f index af267fc08d1d..2c00d2e5bf8c 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/stop-1.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/stop-1.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL STOP diff --git a/libgomp/testsuite/libgomp.oacc-fortran/stop-2.f b/libgomp/testsuite/libgomp.oacc-fortran/stop-2.f index 13c06845c08f..adade54557c2 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/stop-2.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/stop-2.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL STOP 35 diff --git a/libgomp/testsuite/libgomp.oacc-fortran/stop-3.f b/libgomp/testsuite/libgomp.oacc-fortran/stop-3.f index 3bd7446571de..157e369d4e7e 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/stop-3.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/stop-3.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL STOP "SiGN" -- 2.26.2
>From f4a45e0d85e51bd6550a82f31f70484c03332a4e Mon Sep 17 00:00:00 2001 From: Thomas Schwinge <tho...@codesourcery.com> Date: Wed, 6 May 2020 10:05:49 +0200 Subject: [PATCH] 'libgomp.oacc-fortran/{error_,}stop-{1,2,3}.f': initialize before the checkpoint If, for example, GCC is configured such that 'libgomp-plugin-nvptx.so.1' dynamically links against 'libcuda.so.1', but testing is run on a system where there is no 'libcuda.so.1', this produces output such as: PASS: libgomp.oacc-fortran/error_stop-1.f -DACC_DEVICE_TYPE_host=1 -DACC_MEM_SHARED=1 -foffload=disable -O0 (test for excess errors) PASS: libgomp.oacc-fortran/error_stop-1.f -DACC_DEVICE_TYPE_host=1 -DACC_MEM_SHARED=1 -foffload=disable -O0 execution test FAIL: libgomp.oacc-fortran/error_stop-1.f -DACC_DEVICE_TYPE_host=1 -DACC_MEM_SHARED=1 -foffload=disable -O0 output pattern test, is CheCKpOInT libgomp: while loading libgomp-plugin-nvptx.so.1: libcuda.so.1: cannot open shared object file: No such file or directory ERROR STOP Error termination. Backtrace: [...] , should match CheCKpOInT( | |^M)+ERROR STOP ( | |^M)+Error termination.* ..., where after 'CheCKpOInT' we got 'libgomp: while loading [...]' injected before the expected 'ERROR STOP'. libgomp/ * testsuite/libgomp.oacc-fortran/error_stop-1.f: Initialize before the checkpoint. * testsuite/libgomp.oacc-fortran/error_stop-2.f: Likewise. * testsuite/libgomp.oacc-fortran/error_stop-3.f: Likewise. * testsuite/libgomp.oacc-fortran/stop-1.f: Likewise. * testsuite/libgomp.oacc-fortran/stop-2.f: Likewise. * testsuite/libgomp.oacc-fortran/stop-3.f: Likewise. (cherry picked from commit 1e378edd8f038c52914bc6cac8f6dd5a5c4f8a98) --- libgomp/testsuite/libgomp.oacc-fortran/error_stop-1.f | 4 ++++ libgomp/testsuite/libgomp.oacc-fortran/error_stop-2.f | 4 ++++ libgomp/testsuite/libgomp.oacc-fortran/error_stop-3.f | 4 ++++ libgomp/testsuite/libgomp.oacc-fortran/stop-1.f | 4 ++++ libgomp/testsuite/libgomp.oacc-fortran/stop-2.f | 4 ++++ libgomp/testsuite/libgomp.oacc-fortran/stop-3.f | 4 ++++ 6 files changed, 24 insertions(+) diff --git a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-1.f b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-1.f index 4965e674c27b..a995d955fc23 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-1.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-1.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL ERROR STOP diff --git a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-2.f b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-2.f index 7103fdb5d8ed..426c15abcdf2 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-2.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-2.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL ERROR STOP 35 diff --git a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-3.f b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-3.f index 9c217f14ea1b..bef01e6d505b 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/error_stop-3.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/error_stop-3.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL ERROR STOP "SiGN" diff --git a/libgomp/testsuite/libgomp.oacc-fortran/stop-1.f b/libgomp/testsuite/libgomp.oacc-fortran/stop-1.f index af267fc08d1d..2c00d2e5bf8c 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/stop-1.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/stop-1.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL STOP diff --git a/libgomp/testsuite/libgomp.oacc-fortran/stop-2.f b/libgomp/testsuite/libgomp.oacc-fortran/stop-2.f index 13c06845c08f..adade54557c2 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/stop-2.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/stop-2.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL STOP 35 diff --git a/libgomp/testsuite/libgomp.oacc-fortran/stop-3.f b/libgomp/testsuite/libgomp.oacc-fortran/stop-3.f index 3bd7446571de..157e369d4e7e 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/stop-3.f +++ b/libgomp/testsuite/libgomp.oacc-fortran/stop-3.f @@ -3,6 +3,10 @@ PROGRAM MAIN IMPLICIT NONE +! Initialize before the checkpoint, in case this produces any output. +!$ACC PARALLEL +!$ACC END PARALLEL + PRINT *, "CheCKpOInT" !$ACC PARALLEL STOP "SiGN" -- 2.26.2