logistic-bot/nix-doom-emacs-unstraightened
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Add script to check for byte-compile failures

Browse source 
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
Download patch file Download diff file Expand all files Collapse all files

15
build-helpers/byte-compile-check.el Executable file
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")))