diff options
| author | Andrea Corallo | 2020-12-28 11:22:20 +0100 |
|---|---|---|
| committer | Andrea Corallo | 2020-12-28 16:08:38 +0100 |
| commit | 8a0467e2ef3c29fc0e9aaec7b6436c9a9bb279d6 (patch) | |
| tree | 4fb65ce00f6a7d1196a1a0d7060a80ef9686dfb2 | |
| parent | ccce15299ba3846f5c74335d6d7bc55aac29e007 (diff) | |
| download | emacs-8a0467e2ef3c29fc0e9aaec7b6436c9a9bb279d6.tar.gz emacs-8a0467e2ef3c29fc0e9aaec7b6436c9a9bb279d6.zip | |
; lisp/emacs-lisp/comp.el (comp-emit-narg-prologue): Nit.
| -rw-r--r-- | lisp/emacs-lisp/comp.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el index 8ed1427a570..a9caeace65a 100644 --- a/lisp/emacs-lisp/comp.el +++ b/lisp/emacs-lisp/comp.el | |||
| @@ -1633,7 +1633,7 @@ the annotation emission." | |||
| 1633 | (comp-emit `(set-args-to-local ,(comp-slot-n i))) | 1633 | (comp-emit `(set-args-to-local ,(comp-slot-n i))) |
| 1634 | (comp-emit '(inc-args)) | 1634 | (comp-emit '(inc-args)) |
| 1635 | finally (comp-emit '(jump entry_rest_args))) | 1635 | finally (comp-emit '(jump entry_rest_args))) |
| 1636 | (when (not (= minarg nonrest)) | 1636 | (when (/= minarg nonrest) |
| 1637 | (cl-loop for i from minarg below nonrest | 1637 | (cl-loop for i from minarg below nonrest |
| 1638 | for bb = (intern (format "entry_fallback_%s" i)) | 1638 | for bb = (intern (format "entry_fallback_%s" i)) |
| 1639 | for next-bb = (if (= (1+ i) nonrest) | 1639 | for next-bb = (if (= (1+ i) nonrest) |