diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/select_type_6.f03')
-rw-r--r-- | gcc/testsuite/gfortran.dg/select_type_6.f03 | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/testsuite/gfortran.dg/select_type_6.f03 b/gcc/testsuite/gfortran.dg/select_type_6.f03 index 3b3c08e2296..b9fb64a5219 100644 --- a/gcc/testsuite/gfortran.dg/select_type_6.f03 +++ b/gcc/testsuite/gfortran.dg/select_type_6.f03 @@ -27,12 +27,12 @@ type is(t3) mt3%j = 2*mt2%i print *,mt3%j - if (mt3%j /= 10) call abort() + if (mt3%j /= 10) STOP 1 class default - call abort() + STOP 2 end select class default - call abort() + STOP 3 end select end |