Generalize common compile-time constants.

[bpt/emacs.git] / src / callint.c

diff --git a/src/callint.c b/src/callint.c
index 4b53b5d..51d0a5f 100644 (file)
--- a/src/callint.c
+++ b/src/callint.c
@@ -465,7 +465,7 @@ invoke it.  If KEYS is omitted or nil, the return value of
     }
 
   if (min (MOST_POSITIVE_FIXNUM,
-          min (PTRDIFF_MAX, SIZE_MAX) / sizeof (Lisp_Object))
+          min (PTRDIFF_MAX, SIZE_MAX) / word_size)
       < nargs)
     memory_full (SIZE_MAX);