From a2cf65d2030c7856d029e43fec378efe42934400 Mon Sep 17 00:00:00 2001 From: Andrea Corallo Date: Sun, 21 Jul 2019 13:57:51 +0200 Subject: [PATCH] separate code --- lisp/emacs-lisp/comp.el | 6 ++++++ 1 file changed, 6 insertions(+) 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))) -- 2.39.5