diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/alloc_comp_class_2.f90')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/alloc_comp_class_2.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/alloc_comp_class_2.f90 b/gcc/testsuite/gfortran.dg/alloc_comp_class_2.f90 index 71862818951..5aff3381650 100644 --- a/gcc/testsuite/gfortran.dg/alloc_comp_class_2.f90 +++ b/gcc/testsuite/gfortran.dg/alloc_comp_class_2.f90 @@ -23,7 +23,7 @@ contains subroutine cdall(desc) type(desc_type), intent(out) :: desc - if (allocated(desc%indxmap)) call abort() + if (allocated(desc%indxmap)) STOP 1 end subroutine cdall end program |