Mercurial > emacs
comparison src/alloc.c @ 46293:1fb8f75062c6
Use macro SPECPDL_INDEX.
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Thu, 11 Jul 2002 14:18:02 +0000 |
parents | 3f111801efb4 |
children | fed6b815dbeb |
comparison
equal
deleted
inserted
replaced
46292:712d0161e499 | 46293:1fb8f75062c6 |
---|---|
4018 /* Temporarily prevent garbage collection. */ | 4018 /* Temporarily prevent garbage collection. */ |
4019 | 4019 |
4020 int | 4020 int |
4021 inhibit_garbage_collection () | 4021 inhibit_garbage_collection () |
4022 { | 4022 { |
4023 int count = specpdl_ptr - specpdl; | 4023 int count = SPECPDL_INDEX (); |
4024 int nbits = min (VALBITS, BITS_PER_INT); | 4024 int nbits = min (VALBITS, BITS_PER_INT); |
4025 | 4025 |
4026 specbind (Qgc_cons_threshold, make_number (((EMACS_INT) 1 << (nbits - 1)) - 1)); | 4026 specbind (Qgc_cons_threshold, make_number (((EMACS_INT) 1 << (nbits - 1)) - 1)); |
4027 return count; | 4027 return count; |
4028 } | 4028 } |