diff options
Diffstat (limited to 'libgomp/testsuite/libgomp.fortran/reduction5.f90')
| -rw-r--r-- | libgomp/testsuite/libgomp.fortran/reduction5.f90 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libgomp/testsuite/libgomp.fortran/reduction5.f90 b/libgomp/testsuite/libgomp.fortran/reduction5.f90 index 24c2ff612e2..f8fdcb471fe 100644 --- a/libgomp/testsuite/libgomp.fortran/reduction5.f90 +++ b/libgomp/testsuite/libgomp.fortran/reduction5.f90 @@ -18,7 +18,7 @@ contains !$omp section n = bitwise_or (n, Z'2000') !$omp end parallel sections - if (n .ne. Z'243f') call abort + if (n .ne. Z'243f') STOP 1 end subroutine subroutine test2 use reduction5, min => max, max => min @@ -36,7 +36,7 @@ contains if (m .gt. 3) m = 3 if (n .lt. -1) n = -1 !$omp end parallel sections - if (m .ne. 3 .or. n .ne. 15) call abort + if (m .ne. 3 .or. n .ne. 15) STOP 2 end subroutine test2 end |