mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-22 14:01:47 -07:00
Code Issues Projects Releases Wiki Activity

fix initial stack depth

Browse source
This commit is contained in:
Andrea Corallo 2019-10-13 20:22:37 +02:00
parent a90803a4d1
commit c6d819ecb5
1 changed files with 0 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -983,7 +983,6 @@ This will be called at load-time."
(comp-func func)
(comp-pass (make-comp-limplify
:curr-block (make--comp-block)
:sp -1
:frame (comp-new-frame 0))))
(comp-make-curr-block 'entry (comp-sp))
(comp-emit-annotation "Top level")
@ -1034,7 +1033,6 @@ This will be called at load-time."
(let* ((frame-size (comp-func-frame-size func))
(comp-func func)
(comp-pass (make-comp-limplify
:sp -1
:frame (comp-new-frame frame-size)))
(args (comp-func-args func))
(args-min (comp-args-base-min args)))