From bb0496e7e55a7fca89c51eb0b85dcfa6904ea3ec Mon Sep 17 00:00:00 2001 From: Andrea Corallo Date: Tue, 24 Mar 2020 18:47:39 +0000 Subject: [PATCH] * comp.c (emit_mvar_access): Fix speed 1 compilation At speed 1 propagate does not run and all mvars are allocated in array 0. --- src/comp.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/comp.c b/src/comp.c index 3205a29a104..d72d6acc8ef 100644 --- a/src/comp.c +++ b/src/comp.c @@ -388,7 +388,7 @@ emit_mvar_access (Lisp_Object mvar) EMACS_INT arr_idx = XFIXNUM (CALL1I (comp-mvar-array-idx, mvar)); EMACS_INT slot_n = XFIXNUM (mvar_slot); - if (comp.func_has_non_local || !SPEED) + if (comp.func_has_non_local || (SPEED < 2)) return comp.arrays[arr_idx][slot_n]; else { -- 2.39.5