diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/pr35944-2.f90')
-rw-r--r-- | gcc/testsuite/gfortran.dg/pr35944-2.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/pr35944-2.f90 b/gcc/testsuite/gfortran.dg/pr35944-2.f90 index 976332ded00..f2de2f4cd7c 100644 --- a/gcc/testsuite/gfortran.dg/pr35944-2.f90 +++ b/gcc/testsuite/gfortran.dg/pr35944-2.f90 @@ -10,6 +10,6 @@ QDA1 = MOD (1.1_k*(QDA(1)-5.0_k), P=(QDA-2.5_k)) DO i = 1, 10 QVAL = MOD (1.1_k*(QDA(1)-5.0_k), P=(QDA(i)-2.5_k)) - if (qval /= qda1(i)) call abort + if (qval /= qda1(i)) STOP 1 enddo end |