diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/bounds_check_15.f90')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/bounds_check_15.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/bounds_check_15.f90 b/gcc/testsuite/gfortran.dg/bounds_check_15.f90 index 947ffb2f4b4..5576af97684 100644 --- a/gcc/testsuite/gfortran.dg/bounds_check_15.f90 +++ b/gcc/testsuite/gfortran.dg/bounds_check_15.f90 @@ -23,7 +23,7 @@ contains do i = 1, size (mnem_list) if (mnem_list(i) /= "") then j = j + 1 - if (j > len (ml)/8) call abort () + if (j > len (ml)/8) STOP 1 ml((j-1)*8+1:(j-1)*8+8) = mnem_list(i) end if end do |