diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/deferred_type_proc_pointer_1.f90')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/deferred_type_proc_pointer_1.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/deferred_type_proc_pointer_1.f90 b/gcc/testsuite/gfortran.dg/deferred_type_proc_pointer_1.f90 index 3fc055e0e9c..ed4ca6ec4a4 100644 --- a/gcc/testsuite/gfortran.dg/deferred_type_proc_pointer_1.f90 +++ b/gcc/testsuite/gfortran.dg/deferred_type_proc_pointer_1.f90 @@ -18,7 +18,7 @@ contains subroutine doIt() type(t) :: x x%ppt => deferred_len - if ("abc" /= x%ppt()) call abort() + if ("abc" /= x%ppt()) STOP 1 end subroutine doIt end module test |