summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gfortran.dg/typebound_assignment_5.f03
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/testsuite/gfortran.dg/typebound_assignment_5.f03')
-rw-r--r--gcc/testsuite/gfortran.dg/typebound_assignment_5.f032
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/typebound_assignment_5.f03 b/gcc/testsuite/gfortran.dg/typebound_assignment_5.f03
index 63df50f9127..f176b841fc0 100644
--- a/gcc/testsuite/gfortran.dg/typebound_assignment_5.f03
+++ b/gcc/testsuite/gfortran.dg/typebound_assignment_5.f03
@@ -36,7 +36,7 @@
allocate (foobar(2))
foobar = [bar(1), bar(2)]
- if (any(foobar%i /= [1, 2])) call abort
+ if (any(foobar%i /= [1, 2])) STOP 1
end program
! { dg-final { scan-tree-dump-not "_gfortran_internal_pack" "original" } }