diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/der_array_1.f90')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/der_array_1.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/der_array_1.f90 b/gcc/testsuite/gfortran.dg/der_array_1.f90 index 00dc7a5c2b3..703b151a8b6 100644 --- a/gcc/testsuite/gfortran.dg/der_array_1.f90 +++ b/gcc/testsuite/gfortran.dg/der_array_1.f90 @@ -26,7 +26,7 @@ program der_array_1 v = t((/1, 2/), reshape (f, (/m/)), d, e); if (any (v%a .ne. (/1, 2/)) .or. any (v%b .ne. (/3, 4/)) & .or. any (v%c .ne. d) .or. .not. associated (v%p, e)) & - call abort () + STOP 1 deallocate(e) end program |