diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/class_allocate_21.f90')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/class_allocate_21.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/class_allocate_21.f90 b/gcc/testsuite/gfortran.dg/class_allocate_21.f90 index a8ed291f8df..122d7cd652d 100644 --- a/gcc/testsuite/gfortran.dg/class_allocate_21.f90 +++ b/gcc/testsuite/gfortran.dg/class_allocate_21.f90 @@ -15,7 +15,7 @@ implicit none x%i = reshape([( i, i = 1, 9 )], [3, 3]) allocate(z(9), source=reshape(x, (/ 9 /))) - if (any( z%i /= [( i, i = 1, 9 )])) call abort() + if (any( z%i /= [( i, i = 1, 9 )])) STOP 1 deallocate (x, z) end |