diff options
| -rw-r--r-- | src/alloc.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/alloc.c b/src/alloc.c index 6a47b872d23..731391a779b 100644 --- a/src/alloc.c +++ b/src/alloc.c @@ -4012,7 +4012,9 @@ int inhibit_garbage_collection () { int count = specpdl_ptr - specpdl; - specbind (Qgc_cons_threshold, make_number (MOST_POSITIVE_FIXNUM)); + int nbits = min (VALBITS, BITS_PER_INT); + + specbind (Qgc_cons_threshold, make_number (((EMACS_INT) 1 << (nbits - 1)) - 1)); return count; } |