diff options
| author | Andreas Schwab | 2001-12-07 12:32:21 +0000 |
|---|---|---|
| committer | Andreas Schwab | 2001-12-07 12:32:21 +0000 |
| commit | 54defd0d1e9c69719e628a25c64a89ae0eb0ad0d (patch) | |
| tree | c49f7820d07265f90b611509fd660d752f0dfe2d /src/alloc.c | |
| parent | 9d113d9d5846e0a0c34af85f22b8a9cf8ac7c78f (diff) | |
| download | emacs-54defd0d1e9c69719e628a25c64a89ae0eb0ad0d.tar.gz emacs-54defd0d1e9c69719e628a25c64a89ae0eb0ad0d.zip | |
(inhibit_garbage_collection): Don't exceed value an int can hold.
Diffstat (limited to 'src/alloc.c')
| -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 | |||
| 4012 | inhibit_garbage_collection () | 4012 | inhibit_garbage_collection () |
| 4013 | { | 4013 | { |
| 4014 | int count = specpdl_ptr - specpdl; | 4014 | int count = specpdl_ptr - specpdl; |
| 4015 | specbind (Qgc_cons_threshold, make_number (MOST_POSITIVE_FIXNUM)); | 4015 | int nbits = min (VALBITS, BITS_PER_INT); |
| 4016 | |||
| 4017 | specbind (Qgc_cons_threshold, make_number (((EMACS_INT) 1 << (nbits - 1)) - 1)); | ||
| 4016 | return count; | 4018 | return count; |
| 4017 | } | 4019 | } |
| 4018 | 4020 | ||