diff options
| author | Andrea Corallo | 2020-03-24 18:47:39 +0000 |
|---|---|---|
| committer | Andrea Corallo | 2020-03-24 18:47:39 +0000 |
| commit | bb0496e7e55a7fca89c51eb0b85dcfa6904ea3ec (patch) | |
| tree | 3ce9ccdb51c8c33402c535abb7b79cf5886c48ea /src | |
| parent | 4acc4ac66753ff1556be907f2611b48ffc3fc79c (diff) | |
| download | emacs-bb0496e7e55a7fca89c51eb0b85dcfa6904ea3ec.tar.gz 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')
| -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) | |||
| 388 | 388 | ||
| 389 | EMACS_INT arr_idx = XFIXNUM (CALL1I (comp-mvar-array-idx, mvar)); | 389 | EMACS_INT arr_idx = XFIXNUM (CALL1I (comp-mvar-array-idx, mvar)); |
| 390 | EMACS_INT slot_n = XFIXNUM (mvar_slot); | 390 | EMACS_INT slot_n = XFIXNUM (mvar_slot); |
| 391 | if (comp.func_has_non_local || !SPEED) | 391 | if (comp.func_has_non_local || (SPEED < 2)) |
| 392 | return comp.arrays[arr_idx][slot_n]; | 392 | return comp.arrays[arr_idx][slot_n]; |
| 393 | else | 393 | else |
| 394 | { | 394 | { |