Clean-up warnings for non native builds

* lisp/emacs-lisp/comp-common.el (native-comp-enable-subr-trampolines)
(comp-installed-trampolines-h, comp-subr-arities-h)
(native-comp-eln-load-path, comp-native-version-dir)
(comp-deferred-pending-h, comp--no-native-compile): Silence
warning.
(comp-el-to-eln-rel-filename, native-elisp-load)
(comp--release-ctxt, comp--init-ctxt)
(comp--compile-ctxt-to-file, comp-el-to-eln-filename)
(comp--install-trampoline): Declare function.
* lisp/emacs-lisp/comp.el : Update.
This commit is contained in:
Andrea Corallo 2023-11-09 17:00:22 +01:00
parent 5d171d26c0
commit 13a1797d5b
2 changed files with 17 additions and 17 deletions

View file

@ -29,6 +29,23 @@
(eval-when-compile (require 'cl-lib))
;; These variables and functions are defined in comp.c
(defvar native-comp-enable-subr-trampolines)
(defvar comp-installed-trampolines-h)
(defvar comp-subr-arities-h)
(defvar native-comp-eln-load-path)
(defvar comp-native-version-dir)
(defvar comp-deferred-pending-h)
(defvar comp--no-native-compile)
(declare-function comp-el-to-eln-rel-filename "comp.c")
(declare-function native-elisp-load "comp.c")
(declare-function comp--release-ctxt "comp.c")
(declare-function comp--init-ctxt "comp.c")
(declare-function comp--compile-ctxt-to-file "comp.c")
(declare-function comp-el-to-eln-filename "comp.c")
(declare-function comp--install-trampoline "comp.c")
(defgroup comp-common nil
"Emacs Lisp native compiler common code."
:group 'lisp)

View file

@ -37,23 +37,6 @@
(require 'comp-common)
(require 'comp-cstr)
;; These variables and functions are defined in comp.c
(defvar native-comp-enable-subr-trampolines)
(defvar comp-installed-trampolines-h)
(defvar comp-subr-arities-h)
(defvar native-comp-eln-load-path)
(defvar comp-native-version-dir)
(defvar comp-deferred-pending-h)
(defvar comp--no-native-compile)
(declare-function comp-el-to-eln-rel-filename "comp.c")
(declare-function native-elisp-load "comp.c")
(declare-function comp--release-ctxt "comp.c")
(declare-function comp--init-ctxt "comp.c")
(declare-function comp--compile-ctxt-to-file "comp.c")
(declare-function comp-el-to-eln-filename "comp.c")
(declare-function comp--install-trampoline "comp.c")
(defgroup comp nil
"Emacs Lisp native compiler."
:group 'lisp)