* lisp/emacs-lisp/comp.el (comp-emit-set-call-subr): Improve 263d6c3853
This commit is contained in:
parent
4a6eefb93a
commit
4a7a0c9a9f
1 changed files with 1 additions and 1 deletions
|
@ -1773,7 +1773,7 @@ SP-DELTA is the stack adjustment."
|
|||
(maxarg (cdr arity)))
|
||||
(when (eq maxarg 'unevalled)
|
||||
(signal 'native-ice (list "subr contains unevalled args" subr-name)))
|
||||
(if (not (subrp subr-name))
|
||||
(if (not (subr-primitive-p subr-name))
|
||||
;; The primitive got redefined before the compiler is
|
||||
;; invoked! (bug#61917)
|
||||
(comp-emit-set-call `(callref funcall
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue