mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-05 19:31:02 -08:00
Code Issues Projects Releases Wiki Activity

basic funcall

Browse source
This commit is contained in:
Andrea Corallo 2019-07-14 11:15:18 +02:00 • committed by Andrea Corallo
parent ac297b67bb
commit e1d9454215
2 changed files with 44 additions and 41 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/emacs-lisp/comp.el
View file

@ -314,7 +314,9 @@ If the calle function is known to have a return type propagate it."
:constant arg)
,(comp-slot))))
(byte-varbind)
(byte-call)
(byte-call
(comp-stack-adjust (- arg))
(comp-emit-set-call `(callref Ffuncall ,(1+ arg) ,(comp-sp))))
(byte-unbind)
(byte-pophandler)
(byte-pushconditioncase)