comp: don't require 'warnings' in comp-run

* lisp/emacs-lisp/comp-run.el (warnings): Don't require.
(warning-suppress-types): Wave warning.
* lisp/emacs-lisp/warnings.el (warning-suppress-types): Autoload it.
This commit is contained in:
Andrea Corallo 2023-10-25 23:50:39 +02:00
parent 4bb1863567
commit 93cc43a23c
2 changed files with 3 additions and 1 deletions

View file

@ -32,7 +32,6 @@
;;; Code:
(eval-when-compile (require 'cl-lib))
(require 'warnings)
(defgroup comp-run nil
"Emacs Lisp native compiler runtime."
@ -243,6 +242,8 @@ processes from `comp-async-compilations'"
(defvar comp-last-scanned-async-output nil)
(make-variable-buffer-local 'comp-last-scanned-async-output)
;; From warnings.el
(defvar warning-suppress-types)
(defun comp-accept-and-process-async-output (process)
"Accept PROCESS output and check for diagnostic messages."
(if native-comp-async-report-warnings-errors