Commit 4e87700b authored by Roland McGrath's avatar Roland McGrath

(Fcall_interactively): Use & PSEUDOVECTOR_SIZE_MASK on `size' field of

compiled byte-code object.
parent 96277b2d
/* Call a Lisp function interactively.
Copyright (C) 1985, 1986, 1993, 1994 Free Software Foundation, Inc.
Copyright (C) 1985, 1986, 1993, 1994, 1995 Free Software Foundation, Inc.
This file is part of GNU Emacs.
......@@ -229,7 +229,7 @@ Otherwise, this is done only if an arg is read using the minibuffer.")
}
else if (COMPILEDP (fun))
{
if (XVECTOR (fun)->size <= COMPILED_INTERACTIVE)
if (XVECTOR (fun)->size & PSEUDOVECTOR_SIZE_MASK <= COMPILED_INTERACTIVE)
goto lose;
specs = XVECTOR (fun)->contents[COMPILED_INTERACTIVE];
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment