From a86453e2ccabdcb59303a02ff805cf609a2bb493 Mon Sep 17 00:00:00 2001 From: Tobias Burnus Date: Wed, 30 Oct 2019 11:44:54 +0000 Subject: =?UTF-8?q?libgomp/testsuite=20=E2=80=93=20use=20'stop'?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit libgomp/ * testsuite/libgomp.fortran/: Replace 'STOP' by 'stop'. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@277609 138bc75d-0d04-0410-961f-82ee72b054a4 --- libgomp/testsuite/libgomp.fortran/omp_atomic4.f90 | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'libgomp/testsuite/libgomp.fortran/omp_atomic4.f90') diff --git a/libgomp/testsuite/libgomp.fortran/omp_atomic4.f90 b/libgomp/testsuite/libgomp.fortran/omp_atomic4.f90 index c4cb5cf9de9..75da9f39400 100644 --- a/libgomp/testsuite/libgomp.fortran/omp_atomic4.f90 +++ b/libgomp/testsuite/libgomp.fortran/omp_atomic4.f90 @@ -28,10 +28,10 @@ d = d / 2.0 d2 = d !$omp end atomic - if (a2 .ne. 1 .or. b2 .ne. -16 .or. c2 .ne. 3 .or. d2 .ne. 2) STOP 1 + if (a2 .ne. 1 .or. b2 .ne. -16 .or. c2 .ne. 3 .or. d2 .ne. 2) stop 1 !$omp atomic read a2 = a !$omp atomic read c2 = c - if (a2 .ne. 5 .or. b2 .ne. -16 .or. c2 .ne. 6 .or. d2 .ne. 2) STOP 2 + if (a2 .ne. 5 .or. b2 .ne. -16 .or. c2 .ne. 6 .or. d2 .ne. 2) stop 2 end -- cgit v1.2.3