diff options
| author | Andreas Schwab <schwab@suse.de> | 2001-12-07 12:32:21 +0000 |
|---|---|---|
| committer | Andreas Schwab <schwab@suse.de> | 2001-12-07 12:32:21 +0000 |
| commit | 54defd0d1e9c69719e628a25c64a89ae0eb0ad0d (patch) | |
| tree | c49f7820d07265f90b611509fd660d752f0dfe2d | |
| parent | 9d113d9d5846e0a0c34af85f22b8a9cf8ac7c78f (diff) | |
| download | emacs-54defd0d1e9c69719e628a25c64a89ae0eb0ad0d.tar.gz | |
(inhibit_garbage_collection): Don't exceed value an int can hold.
| -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; } |