diff options
| author | Mattias Engdegård <mattiase@acm.org> | 2022-02-26 12:49:02 +0100 |
|---|---|---|
| committer | Mattias Engdegård <mattiase@acm.org> | 2022-03-12 17:32:31 +0100 |
| commit | fe65db05f42bcbf755f037575b3c29b74f279bdf (patch) | |
| tree | c184bf57ac6a9bc7489c9c7700dcc3bd4441083d /src/lisp.h | |
| parent | 213483124b4381663efd0dd001037363223ce188 (diff) | |
| download | emacs-fe65db05f42bcbf755f037575b3c29b74f279bdf.tar.gz emacs-fe65db05f42bcbf755f037575b3c29b74f279bdf.tar.bz2 emacs-fe65db05f42bcbf755f037575b3c29b74f279bdf.zip | |
Maintain end of specpdl instead of size
Keep track of the end of specpdl explicitly since that is what we are
comparing against on critical code paths.
* src/eval.c (init_eval_once_for_pdumper, signal_or_quit)
(grow_specpdl_allocation):
* src/fileio.c (Fdo_auto_save):
* src/lisp.h (grow_specpdl):
* src/thread.c (run_thread, Fmake_thread):
* src/thread.h (struct thread_state):
Replace specpdl_size with specpdl_end, according to the equation
specpdl_end = specpdl + specpdl_size.
Diffstat (limited to 'src/lisp.h')
| -rw-r--r-- | src/lisp.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/lisp.h b/src/lisp.h index b99441fa6c1..3c73570babf 100644 --- a/src/lisp.h +++ b/src/lisp.h @@ -3469,7 +3469,7 @@ INLINE void grow_specpdl (void) { specpdl_ptr++; - if (specpdl_ptr == specpdl + specpdl_size) + if (specpdl_ptr == specpdl_end) grow_specpdl_allocation (); } |