diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/class_19.f03')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/class_19.f03 | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/testsuite/gfortran.dg/class_19.f03 b/gcc/testsuite/gfortran.dg/class_19.f03 index ff84dc44901..8ae48fa1b06 100644 --- a/gcc/testsuite/gfortran.dg/class_19.f03 +++ b/gcc/testsuite/gfortran.dg/class_19.f03 @@ -20,11 +20,11 @@ subroutine foo_checkit() type(foo_outer),allocatable :: try2 class(foo_outer), allocatable :: try3 - if (allocated(try%int)) call abort() + if (allocated(try%int)) STOP 1 allocate(foo_outer :: try3) - if (allocated(try3%int)) call abort() + if (allocated(try3%int)) STOP 2 allocate(try2) - if (allocated(try2%int)) call abort() + if (allocated(try2%int)) STOP 3 end subroutine foo_checkit end module foo_mod |