From: Andrea Corallo <akrl@sdf.org>
Date: Sun, 13 Oct 2019 18:22:37 +0000 (+0200)
Subject: fix initial stack depth
X-Git-Tag: emacs-28.0.90~2727^2~1081
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c6d819ecb5dafddb7b4dffa4c84f5264a3061d53;p=emacs.git

fix initial stack depth
---

diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index adda0537a6e..fd37d1645a2 100644
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -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)))