From 2b064c780cdcb4a7bb832e11d4a166954c485ac5 Mon Sep 17 00:00:00 2001
From: Andrea Corallo <akrl@sdf.org>
Date: Mon, 11 May 2020 19:21:01 +0100
Subject: [PATCH] * Fix speed 2 bootstrap

	(comp-call-optim-func): Do nothing if the function name is
	unknown.
---
 lisp/emacs-lisp/comp.el | 1 +
 1 file changed, 1 insertion(+)

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)
-- 
2.39.5