From 619e0f19b389388caa93b5f9b3966f79b0305a1b Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Fri, 7 Oct 2011 18:39:12 -0700 Subject: [PATCH] * bytecode.c (exec_byte_code): Do not unnecessarily grow ptrdiff_t to EMACS_INT. --- src/bytecode.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/bytecode.c b/src/bytecode.c index 4a414b41712..ed85d54d789 100644 --- a/src/bytecode.c +++ b/src/bytecode.c @@ -503,14 +503,14 @@ exec_byte_code (Lisp_Object bytestr, Lisp_Object vector, Lisp_Object maxdepth, if (INTEGERP (args_template)) { - EMACS_INT at = XINT (args_template); + ptrdiff_t at = XINT (args_template); int rest = at & 128; int mandatory = at & 127; - EMACS_INT nonrest = at >> 8; + ptrdiff_t nonrest = at >> 8; eassert (mandatory <= nonrest); if (nargs <= nonrest) { - EMACS_INT i; + ptrdiff_t i; for (i = 0 ; i < nargs; i++, args++) PUSH (*args); if (nargs < mandatory) -- 2.39.2