1 files changed, 5 insertions, 5 deletions

diff --git a/src/bytecode.c b/src/bytecode.c
index 75f9f1d0ac7..ce075c86afd 100644
--- a/src/bytecode.c
+++ b/src/bytecode.c
@@ -1242,7 +1242,7 @@ exec_byte_code (Lisp_Object fun, ptrdiff_t args_template,
             if (FIXNUMP (v1) && FIXNUMP (v2))
               TOP = BASE_EQ (v1, v2) ? Qt : Qnil;
             else
-              TOP = arithcompare (v1, v2, ARITH_EQUAL);
+              TOP = arithcompare (v1, v2) & Cmp_EQ ? Qt : Qnil;
             NEXT;
           }
 
@@ -1253,7 +1253,7 @@ exec_byte_code (Lisp_Object fun, ptrdiff_t args_template,
             if (FIXNUMP (v1) && FIXNUMP (v2))
               TOP = XFIXNUM (v1) > XFIXNUM (v2) ? Qt : Qnil;
             else
-              TOP = arithcompare (v1, v2, ARITH_GRTR);
+              TOP = arithcompare (v1, v2) & Cmp_GT ? Qt : Qnil;
             NEXT;
           }
 
@@ -1264,7 +1264,7 @@ exec_byte_code (Lisp_Object fun, ptrdiff_t args_template,
             if (FIXNUMP (v1) && FIXNUMP (v2))
               TOP = XFIXNUM (v1) < XFIXNUM (v2) ? Qt : Qnil;
             else
-              TOP = arithcompare (v1, v2, ARITH_LESS);
+              TOP = arithcompare (v1, v2) & Cmp_LT ? Qt : Qnil;
             NEXT;
           }
 
@@ -1275,7 +1275,7 @@ exec_byte_code (Lisp_Object fun, ptrdiff_t args_template,
             if (FIXNUMP (v1) && FIXNUMP (v2))
               TOP = XFIXNUM (v1) <= XFIXNUM (v2) ? Qt : Qnil;
             else
-              TOP = arithcompare (v1, v2, ARITH_LESS_OR_EQUAL);
+              TOP = arithcompare (v1, v2) & (Cmp_LT | Cmp_EQ) ? Qt : Qnil;
             NEXT;
           }
 
@@ -1286,7 +1286,7 @@ exec_byte_code (Lisp_Object fun, ptrdiff_t args_template,
             if (FIXNUMP (v1) && FIXNUMP (v2))
               TOP = XFIXNUM (v1) >= XFIXNUM (v2) ? Qt : Qnil;
             else
-              TOP = arithcompare (v1, v2, ARITH_GRTR_OR_EQUAL);
+              TOP = arithcompare (v1, v2) & (Cmp_GT | Cmp_EQ) ? Qt : Qnil;
             NEXT;
           }