1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-24 06:20:43 -08:00

rename entry block

This commit is contained in:
Andrea Corallo 2019-07-10 02:36:49 +02:00 committed by Andrea Corallo
parent 24f80e510f
commit 30ba6d2532

View file

@ -291,7 +291,7 @@ VAL is known at compile time."
:frame (comp-limple-frame-new-frame frame-size))) :frame (comp-limple-frame-new-frame frame-size)))
(comp-limple ())) (comp-limple ()))
;; Prologue ;; Prologue
(comp-push-block 'prologue) (comp-push-block 'entry)
(cl-loop for i below (comp-args-mandatory (comp-func-args func)) (cl-loop for i below (comp-args-mandatory (comp-func-args func))
do (progn do (progn
(cl-incf (comp-sp)) (cl-incf (comp-sp))