diff options
| author | Andrea Corallo <acorallo@gnu.org> | 2024-05-16 07:42:14 +0200 |
|---|---|---|
| committer | Andrea Corallo <acorallo@gnu.org> | 2024-05-16 07:53:48 +0200 |
| commit | 1b622ff66e32e09fb679b4d371c3be951bf7f000 (patch) | |
| tree | 017a6d1800724d2bf520b56890cfa4a0fd4f883b /lisp/emacs-lisp/comp.el | |
| parent | 59b889885d1f18b9325bd0db3458d3537e6b5f2a (diff) | |
| download | emacs-1b622ff66e32e09fb679b4d371c3be951bf7f000.tar.gz emacs-1b622ff66e32e09fb679b4d371c3be951bf7f000.tar.bz2 emacs-1b622ff66e32e09fb679b4d371c3be951bf7f000.zip | |
* Fix bootstrap with checking enabled
* lisp/emacs-lisp/comp.el (comp--limplify-top-level): Set function
safety.
Diffstat (limited to 'lisp/emacs-lisp/comp.el')
| -rw-r--r-- | lisp/emacs-lisp/comp.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el index 83ca480616f..4c76f95a0e9 100644 --- a/lisp/emacs-lisp/comp.el +++ b/lisp/emacs-lisp/comp.el @@ -1669,7 +1669,8 @@ into the C code forwarding the compilation unit." ;; the last function being ;; registered. :frame-size 2 - :speed (comp-ctxt-speed comp-ctxt))) + :speed (comp-ctxt-speed comp-ctxt) + :safety (comp-ctxt-safety comp-ctxt))) (comp-func func) (comp-pass (make-comp-limplify :curr-block (make--comp-block-lap -1 0 'top-level) |