diff options
| author | Andrea Corallo <akrl@sdf.org> | 2020-05-11 19:21:01 +0100 |
|---|---|---|
| committer | Andrea Corallo <akrl@sdf.org> | 2020-05-15 20:06:49 +0100 |
| commit | 2b064c780cdcb4a7bb832e11d4a166954c485ac5 (patch) | |
| tree | 3998a0408f6a49ef01fd39f33d9d38b1ad44febe /lisp/emacs-lisp/comp.el | |
| parent | e5b24b85a25000499186fc3a48f39eed586d5a3f (diff) | |
| download | emacs-2b064c780cdcb4a7bb832e11d4a166954c485ac5.tar.gz emacs-2b064c780cdcb4a7bb832e11d4a166954c485ac5.tar.bz2 emacs-2b064c780cdcb4a7bb832e11d4a166954c485ac5.zip | |
* Fix speed 2 bootstrap
(comp-call-optim-func): Do nothing if the function name is
unknown.
Diffstat (limited to 'lisp/emacs-lisp/comp.el')
| -rw-r--r-- | lisp/emacs-lisp/comp.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el index 94ffc2d1778..d546218940b 100644 --- a/lisp/emacs-lisp/comp.el +++ b/lisp/emacs-lisp/comp.el @@ -1994,6 +1994,7 @@ Backward propagate array placement properties." (cl-loop with self = (comp-func-name comp-func) for b being each hash-value of (comp-func-blocks comp-func) + when self ;; FIXME add proper anonymous lambda support. do (cl-loop for insn-cell on (comp-block-insns b) for insn = (car insn-cell) |