Revert "* lisp/emacs-lisp/comp.el (comp-emit-set-call-subr): Improve..."
This reverts commit 4a7a0c9a9f
.
These patch series caused a number of regression and more analysis is
required.
This commit is contained in:
parent
4ec4f614c7
commit
8b66d8abd0
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 (subr-primitive-p subr-name))
|
||||
(if (not (subrp subr-name))
|
||||
;; The primitive got redefined before the compiler is
|
||||
;; invoked! (bug#61917)
|
||||
(comp-emit-set-call `(callref funcall
|
||||
|
|
Loading…
Add table
Reference in a new issue