1 files changed, 1 insertions, 1 deletions

diff --git a/src/bytecode.c b/src/bytecode.c
index 74a94859aba..4207ff0b71f 100644
--- a/src/bytecode.c
+++ b/src/bytecode.c
@@ -1327,7 +1327,7 @@ exec_byte_code (Lisp_Object fun, ptrdiff_t args_template,
             Lisp_Object v1 = TOP;
             intmax_t res;
             if (FIXNUMP (v1) && FIXNUMP (v2)
-                && !INT_MULTIPLY_WRAPV (XFIXNUM (v1), XFIXNUM (v2), &res)
+                && !ckd_mul (&res, XFIXNUM (v1), XFIXNUM (v2))
                 && !FIXNUM_OVERFLOW_P (res))
               TOP = make_fixnum (res);
             else