]> code.delx.au - gnu-emacs/blobdiff - src/bytecode.c
* src/bytecode.c (FETCH) [BYTE_CODE_SAFE]: Check the bytecode wasn't
[gnu-emacs] / src / bytecode.c
index f489c74a1440d1649918b2f7a91ad7de222bcd5d..ca6681f21e95d0dbde078cd498534dfc824e51d1 100644 (file)
@@ -388,7 +388,11 @@ unmark_byte_stack (void)
 \f
 /* Fetch the next byte from the bytecode stream.  */
 
+#ifdef BYTE_CODE_SAFE
+#define FETCH (eassert (stack.byte_string_start == SDATA (stack.byte_string)), *stack.pc++)
+#else
 #define FETCH *stack.pc++
+#endif
 
 /* Fetch two bytes from the bytecode stream and make a 16-bit number
    out of them.  */