From 663e2b3f88f9be61399e06dfc0b76700f90c6ca6 Mon Sep 17 00:00:00 2001
From: Dmitry Antipov
Date: Sun, 5 Aug 2012 19:47:28 +0400
Subject: Generalize common compile-time constants. * lisp.h (header_size,
 bool_header_size, word_size): Now here. (struct Lisp_Vector): Add comment.
 (struct Lisp_Bool_Vector): Move up to define handy constants. (VECSIZE,
 PSEUDOVECSIZE): Simplify. (SAFE_ALLOCA_LISP): Use new constant.  Adjust
 indentation. * buffer.c, buffer.h, bytecode.c, callint.c, eval.c, fns.c: *
 font.c, fontset.c, keyboard.c, keymap.c, macros.c, menu.c: * msdos.c,
 w32menu.c, w32term.h, window.c, xdisp.c, xfaces.c: * xfont.c, xmenu.c: Use
 word_size where appropriate.

---
 src/bytecode.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/bytecode.c')

diff --git a/src/bytecode.c b/src/bytecode.c
index 523d56bc97b..49369de33e9 100644
--- a/src/bytecode.c
+++ b/src/bytecode.c
@@ -536,7 +536,7 @@ exec_byte_code (Lisp_Object bytestr, Lisp_Object vector, Lisp_Object maxdepth,
   stack.byte_string = bytestr;
   stack.pc = stack.byte_string_start = SDATA (bytestr);
   stack.constants = vector;
-  if (MAX_ALLOCA / sizeof (Lisp_Object) <= XFASTINT (maxdepth))
+  if (MAX_ALLOCA / word_size <= XFASTINT (maxdepth))
     memory_full (SIZE_MAX);
   top = alloca ((XFASTINT (maxdepth) + 1) * sizeof *top);
 #if BYTE_MAINTAIN_TOP
-- 
cgit v1.2.1