mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-20 13:00:51 -07:00
Code Issues Projects Releases Wiki Activity

* bytecode.c (exec_byte_code): Don't use XVECTOR before CHECK_VECTOR.

Browse source
This commit is contained in:
Paul Eggert 2011-04-23 22:30:24 -07:00
parent c38918db05
commit 0df1eac54f
2 changed files with 9 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/bytecode.c
View file

@ -444,7 +444,7 @@ exec_byte_code (Lisp_Object bytestr, Lisp_Object vector, Lisp_Object maxdepth,
/* Lisp_Object v1, v2; */
Lisp_Object *vectorp;
#ifdef BYTE_CODE_SAFE
int const_length = XVECTOR (vector)->size;
int const_length;
Lisp_Object *stacke;
int bytestr_length;
#endif
@ -466,6 +466,10 @@ exec_byte_code (Lisp_Object bytestr, Lisp_Object vector, Lisp_Object maxdepth,
CHECK_VECTOR (vector);
CHECK_NUMBER (maxdepth);
#ifdef BYTE_CODE_SAFE
const_length = XVECTOR (vector)->size;
#endif
if (STRING_MULTIBYTE (bytestr))
/* BYTESTR must have been produced by Emacs 20.2 or the earlier
because they produced a raw 8-bit string for byte-code and now