diff options
| author | Tobias Burnus <tobias@codesourcery.com> | 2019-10-30 11:44:54 +0000 |
|---|---|---|
| committer | Tobias Burnus <tobias@codesourcery.com> | 2019-10-30 11:44:54 +0000 |
| commit | a86453e2ccabdcb59303a02ff805cf609a2bb493 (patch) | |
| tree | 3d67d31fb84a86189d94374d510305b5a9a2e34b /libgomp/testsuite/libgomp.fortran/omp_atomic4.f90 | |
| parent | 639a0928d8f593a312e66a079e44726d57b631f0 (diff) | |
libgomp/testsuite – use 'stop'
libgomp/
* testsuite/libgomp.fortran/: Replace 'STOP' by 'stop'.
git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@277609 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgomp/testsuite/libgomp.fortran/omp_atomic4.f90')
| -rw-r--r-- | libgomp/testsuite/libgomp.fortran/omp_atomic4.f90 | 4 |
1 files changed, 2 insertions, 2 deletions
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 |