diff options
| author | Andrea Corallo | 2019-11-16 15:23:28 +0100 |
|---|---|---|
| committer | Andrea Corallo | 2020-01-01 11:38:05 +0100 |
| commit | 4bb671f1c6adb6cbdcf90abe73967c24e5296372 (patch) | |
| tree | cc93b592089b5a61984288fbf7d5031b1e1ffcf2 /src | |
| parent | 11b34169f802908348e99d0a52b9c50a64028964 (diff) | |
| download | emacs-4bb671f1c6adb6cbdcf90abe73967c24e5296372.tar.gz emacs-4bb671f1c6adb6cbdcf90abe73967c24e5296372.zip | |
fix emit_limple_call_ref for 0 args case
Diffstat (limited to 'src')
| -rw-r--r-- | src/comp.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/comp.c b/src/comp.c index 9f1317ef70a..d05d17bd010 100644 --- a/src/comp.c +++ b/src/comp.c | |||
| @@ -1139,7 +1139,9 @@ emit_limple_call_ref (Lisp_Object insn, bool direct) | |||
| 1139 | 1139 | ||
| 1140 | Lisp_Object callee = FIRST (insn); | 1140 | Lisp_Object callee = FIRST (insn); |
| 1141 | EMACS_INT nargs = XFIXNUM (Flength (CDR (insn))); | 1141 | EMACS_INT nargs = XFIXNUM (Flength (CDR (insn))); |
| 1142 | EMACS_INT base_ptr = XFIXNUM (CALL1I (comp-mvar-slot, SECOND (insn))); | 1142 | EMACS_INT base_ptr = 0; |
| 1143 | if (nargs) | ||
| 1144 | base_ptr = XFIXNUM (CALL1I (comp-mvar-slot, SECOND (insn))); | ||
| 1143 | return emit_call_ref (callee, nargs, comp.frame[base_ptr], direct); | 1145 | return emit_call_ref (callee, nargs, comp.frame[base_ptr], direct); |
| 1144 | } | 1146 | } |
| 1145 | 1147 | ||