diff options
Diffstat (limited to 'libgomp/testsuite/libgomp.oacc-fortran/routine-1.f90')
| -rw-r--r-- | libgomp/testsuite/libgomp.oacc-fortran/routine-1.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libgomp/testsuite/libgomp.oacc-fortran/routine-1.f90 b/libgomp/testsuite/libgomp.oacc-fortran/routine-1.f90 index 3390515..6a57321 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/routine-1.f90 +++ b/libgomp/testsuite/libgomp.oacc-fortran/routine-1.f90 @@ -17,7 +17,7 @@ end do !$acc end parallel do i = 1, n - if (a(i) .ne. fact(i)) call abort + if (a(i) .ne. fact(i)) STOP 1 end do end recursive function fact (x) result (res) |