summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gfortran.dg/implicit_10.f90
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/testsuite/gfortran.dg/implicit_10.f90')
-rw-r--r--gcc/testsuite/gfortran.dg/implicit_10.f904
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/testsuite/gfortran.dg/implicit_10.f90 b/gcc/testsuite/gfortran.dg/implicit_10.f90
index 4bb14939173..ab251f5dfa5 100644
--- a/gcc/testsuite/gfortran.dg/implicit_10.f90
+++ b/gcc/testsuite/gfortran.dg/implicit_10.f90
@@ -26,7 +26,7 @@
INTEGER i
dimension di(5)
i = 1
- if (fun(di(i),1,2).NE.5) call abort()
+ if (fun(di(i),1,2).NE.5) STOP 1
call sub(di(i),i)
- if (i.NE.4) call abort()
+ if (i.NE.4) STOP 2
end