summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/comp.el
diff options
context:
space:
mode:
authorAndrea Corallo <akrl@sdf.org>2020-12-28 11:22:20 +0100
committerAndrea Corallo <akrl@sdf.org>2020-12-28 16:08:38 +0100
commit8a0467e2ef3c29fc0e9aaec7b6436c9a9bb279d6 (patch)
tree4fb65ce00f6a7d1196a1a0d7060a80ef9686dfb2 /lisp/emacs-lisp/comp.el
parentccce15299ba3846f5c74335d6d7bc55aac29e007 (diff)
downloademacs-8a0467e2ef3c29fc0e9aaec7b6436c9a9bb279d6.tar.gz
emacs-8a0467e2ef3c29fc0e9aaec7b6436c9a9bb279d6.tar.bz2
emacs-8a0467e2ef3c29fc0e9aaec7b6436c9a9bb279d6.zip
; lisp/emacs-lisp/comp.el (comp-emit-narg-prologue): Nit.
Diffstat (limited to 'lisp/emacs-lisp/comp.el')
-rw-r--r--lisp/emacs-lisp/comp.el2
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."
(comp-emit `(set-args-to-local ,(comp-slot-n i)))
(comp-emit '(inc-args))
finally (comp-emit '(jump entry_rest_args)))
- (when (not (= minarg nonrest))
+ (when (/= minarg nonrest)
(cl-loop for i from minarg below nonrest
for bb = (intern (format "entry_fallback_%s" i))
for next-bb = (if (= (1+ i) nonrest)