diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/associate_11.f90')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/associate_11.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/associate_11.f90 b/gcc/testsuite/gfortran.dg/associate_11.f90 index 3ef31f48fa1..3f2c7d80ca0 100644 --- a/gcc/testsuite/gfortran.dg/associate_11.f90 +++ b/gcc/testsuite/gfortran.dg/associate_11.f90 @@ -13,7 +13,7 @@ program bug call foo(a) end associate ! write(*,*) i - if (i(1) /= 2) call abort + if (i(1) /= 2) STOP 1 contains subroutine foo(v) integer, dimension(*) :: v |