emacs - 如何强制字节编译elisp中的目录

Question

如何在不关心 elisp 源代码中的任何内容的情况下强制对目录进行字节编译（与交互式目录相同：C-u 0 M-x byte-recompile-directory但在源代码中）？

需要我写一些类似的东西：

(defun byte-compile-directory-recursively (directory)
  (dolist (file (directory-files directory t "\\w+"))
    (if (file-directory-p file)
        (byte-compile-directory-recursively file)
      (if (string-match "\\.el$" file)
          (byte-compile-file file)))))

? 任何帮助表示赞赏。

Answer 1

相信你正在寻找(byte-recompile-directory directory 0)。