diff options
Diffstat (limited to 'libgomp/testsuite/libgomp.oacc-fortran/combined-directives-1.f90')
| -rw-r--r-- | libgomp/testsuite/libgomp.oacc-fortran/combined-directives-1.f90 | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/libgomp/testsuite/libgomp.oacc-fortran/combined-directives-1.f90 b/libgomp/testsuite/libgomp.oacc-fortran/combined-directives-1.f90 index 94100b2..b980bc9 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/combined-directives-1.f90 +++ b/libgomp/testsuite/libgomp.oacc-fortran/combined-directives-1.f90 @@ -19,9 +19,9 @@ program main end do do i = 1, n - if (a(i) .ne. 3.0) call abort + if (a(i) .ne. 3.0) STOP 1 - if (b(i) .ne. 2.0) call abort + if (b(i) .ne. 2.0) STOP 2 end do !$acc kernels loop copy (a(1:n)) copy (b(1:n)) @@ -31,9 +31,9 @@ program main end do do i = 1, n - if (a(i) .ne. 6.0) call abort + if (a(i) .ne. 6.0) STOP 3 - if (b(i) .ne. 3.0) call abort + if (b(i) .ne. 3.0) STOP 4 end do end program main |