diff options
author | Andrea Corallo <akrl@sdf.org> | 2020-03-24 18:47:39 +0000 |
---|---|---|
committer | Andrea Corallo <akrl@sdf.org> | 2020-03-24 18:47:39 +0000 |
commit | bb0496e7e55a7fca89c51eb0b85dcfa6904ea3ec (patch) | |
tree | 3ce9ccdb51c8c33402c535abb7b79cf5886c48ea /src/comp.c | |
parent | 4acc4ac66753ff1556be907f2611b48ffc3fc79c (diff) | |
download | emacs-bb0496e7e55a7fca89c51eb0b85dcfa6904ea3ec.tar.gz emacs-bb0496e7e55a7fca89c51eb0b85dcfa6904ea3ec.tar.bz2 emacs-bb0496e7e55a7fca89c51eb0b85dcfa6904ea3ec.zip |
* comp.c (emit_mvar_access): Fix speed 1 compilation
At speed 1 propagate does not run and all mvars are allocated in array
0.
Diffstat (limited to 'src/comp.c')
-rw-r--r-- | src/comp.c | 2 |
1 files changed, 1 insertions, 1 deletions
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 { |