From: Andrea Corallo <andrea_corallo@yahoo.it>
Date: Sun, 21 Jul 2019 11:57:51 +0000 (+0200)
Subject: separate code
X-Git-Tag: emacs-28.0.90~2727^2~1326
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a2cf65d2030c7856d029e43fec378efe42934400;p=emacs.git

separate code
---

diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index 62b80a0a5ac..877111653bc 100644
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -121,6 +121,9 @@ LIMPLE basic block.")
   (type nil
         :documentation "When non nil is used for type propagation."))
 
+
+;;; Limplification pass specific code.
+
 (cl-defstruct (comp-limplify (:copier nil))
   "Support structure used during limplification."
   (sp 0 :type 'fixnum
@@ -659,6 +662,9 @@ the annotation emission."
       (cl-prettyprint (comp-func-ir func)))
     func))
 
+
+;;; Entry points.
+
 (defun native-compile (fun)
   "FUN is the function definition to be compiled into native code."
   (if-let ((f (symbol-function fun)))