diff options
| author | Andrea Corallo | 2024-05-16 07:42:14 +0200 |
|---|---|---|
| committer | Andrea Corallo | 2024-05-16 07:53:48 +0200 |
| commit | 1b622ff66e32e09fb679b4d371c3be951bf7f000 (patch) | |
| tree | 017a6d1800724d2bf520b56890cfa4a0fd4f883b | |
| parent | 59b889885d1f18b9325bd0db3458d3537e6b5f2a (diff) | |
| download | emacs-1b622ff66e32e09fb679b4d371c3be951bf7f000.tar.gz emacs-1b622ff66e32e09fb679b4d371c3be951bf7f000.zip | |
* Fix bootstrap with checking enabled
* lisp/emacs-lisp/comp.el (comp--limplify-top-level): Set function
safety.
| -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." | |||
| 1669 | ;; the last function being | 1669 | ;; the last function being |
| 1670 | ;; registered. | 1670 | ;; registered. |
| 1671 | :frame-size 2 | 1671 | :frame-size 2 |
| 1672 | :speed (comp-ctxt-speed comp-ctxt))) | 1672 | :speed (comp-ctxt-speed comp-ctxt) |
| 1673 | :safety (comp-ctxt-safety comp-ctxt))) | ||
| 1673 | (comp-func func) | 1674 | (comp-func func) |
| 1674 | (comp-pass (make-comp-limplify | 1675 | (comp-pass (make-comp-limplify |
| 1675 | :curr-block (make--comp-block-lap -1 0 'top-level) | 1676 | :curr-block (make--comp-block-lap -1 0 'top-level) |