diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/array_function_5.f90')
-rw-r--r-- | gcc/testsuite/gfortran.dg/array_function_5.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/array_function_5.f90 b/gcc/testsuite/gfortran.dg/array_function_5.f90 index 9c95f800517..c5e5aa0de3a 100644 --- a/gcc/testsuite/gfortran.dg/array_function_5.f90 +++ b/gcc/testsuite/gfortran.dg/array_function_5.f90 @@ -13,5 +13,5 @@ program bug matB=matmul(transpose(0.5*matA),matA) matC = transpose(0.5*matA) matC = matmul(matC, matA) - if (any(matB.ne.matC)) call abort() + if (any(matB.ne.matC)) STOP 1 end program bug |