summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gfortran.dg/comma.f
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/testsuite/gfortran.dg/comma.f')
-rw-r--r--gcc/testsuite/gfortran.dg/comma.f6
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/testsuite/gfortran.dg/comma.f b/gcc/testsuite/gfortran.dg/comma.f
index 08c45179528..15a58fe0a8c 100644
--- a/gcc/testsuite/gfortran.dg/comma.f
+++ b/gcc/testsuite/gfortran.dg/comma.f
@@ -7,13 +7,13 @@
write(11,'(a)') ",,"
rewind(11)
read(11,*)stuff, stuff2
- if (stuff.ne.1.0) call abort()
- if (stuff2.ne.2.0) call abort()
+ if (stuff.ne.1.0) STOP 1
+ if (stuff2.ne.2.0) STOP 2
rewind (11)
write(11,'(a)') ","
rewind(11)
read(11,*)stuff
- if (stuff.ne.1.0) call abort()
+ if (stuff.ne.1.0) STOP 3
close(11, status='delete')
end