Add script to check for byte-compile failures

Just a manual check for now.
This commit is contained in:
Marien Zwart 2024-04-27 21:25:29 +10:00
parent 54c396f24b
commit 68d5ec704b
No known key found for this signature in database
2 changed files with 17 additions and 3 deletions

View file

@ -0,0 +1,15 @@
;; Run with emacs --script
(let ((els))
(dolist (path load-path)
(dolist (el (file-expand-wildcards (expand-file-name "*.el" path)))
(unless (or (string-suffix-p "-pkg.el" el)
(string-suffix-p "-theme.el" el)
(string-suffix-p "-autoloads.el" el)
(file-exists-p (concat el "c"))
(with-temp-buffer
(insert-file-contents el)
;; This is wrong, but close enough for our purposes.
(search-forward "no-byte-compile: t" nil t)))
(push el els))))
(princ (string-join (seq-sort #'string< els) "\n")))

View file

@ -179,9 +179,8 @@
# - xref-js2: upstream bug(?). # - xref-js2: upstream bug(?).
# Error: `add-to-list' can't use lexical var `words'; use `push' or `cl-pushnew' # Error: `add-to-list' can't use lexical var `words'; use `push' or `cl-pushnew'
# - several others, looks like mostly missing (frequently optional) deps. # - several others, looks like mostly missing (frequently optional) deps.
# TODO: add a way of checking for these. #
# Currently I run: # To check for these: `doom-emacs --script build-helpers/byte-compile-check.el`
# set edir (grep 'export emacsWithPackages_siteLisp=' result/bin/.emacs-wrapped | cut -f2 -d=); comm -3 (fd '\.el$' $edir | sort | psub) (fd '\.elc$' $edir | sed -e 's:c$::' | sort | psub ) | grep -E -v -- '-(autoloads|pkg|theme).el$' | xargs grep -L 'no-byte-compile: t'
# TODO: clean up some more load-path clutter? # TODO: clean up some more load-path clutter?
# #