diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/dec_logical_xor_1.f90')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/dec_logical_xor_1.f90 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/testsuite/gfortran.dg/dec_logical_xor_1.f90 b/gcc/testsuite/gfortran.dg/dec_logical_xor_1.f90 index d10fa19892a..e443e337cc4 100644 --- a/gcc/testsuite/gfortran.dg/dec_logical_xor_1.f90 +++ b/gcc/testsuite/gfortran.dg/dec_logical_xor_1.f90 @@ -22,7 +22,7 @@ do i = 1,2 if ( neqv_out .neqv. lxor_out ) then print *, "(",in1,in2,") .neqv.: ",neqv_out," .xor.: ",lxor_out - call abort() + STOP 1 endif ! make sure we didn't break xor() intrinsic @@ -31,7 +31,7 @@ do i = 1,2 if ( ixor_out .ne. ieor_out ) then print *, "(",in1,in2,") ieor(): ",ieor_out," xor(): ",ixor_out - call abort() + STOP 2 endif enddo |