[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
feature/native-comp bb0496e 3/3: * comp.c (emit_mvar_access): Fix speed
From: |
Andrea Corallo |
Subject: |
feature/native-comp bb0496e 3/3: * comp.c (emit_mvar_access): Fix speed 1 compilation |
Date: |
Tue, 24 Mar 2020 13:37:47 -0400 (EDT) |
branch: feature/native-comp
commit bb0496e7e55a7fca89c51eb0b85dcfa6904ea3ec
Author: Andrea Corallo <address@hidden>
Commit: Andrea Corallo <address@hidden>
* 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 3205a29..d72d6ac 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
{