WARNING: the last build, and then reconfigure.
WARNING: ---------------------------------------------------------\n\n")))))
+(defun riece-compile-module ()
+ (let ((load-path (cons nil load-path)))
+ (let ((source (expand-file-name
+ (concat (car command-line-args-left) ".el"))))
+ (if (file-newer-than-file-p source (concat source "c"))
+ (byte-compile-file source)))))
+
(defun riece-install-modules (modules dest just-print)
(unless (or just-print (file-exists-p dest))
(make-directory dest t))
(if flag
(string-match "^\\(\\(--[^ ]+ \\)+-\\|[^ =-]\\)*n" flag))))
+(defun riece-examine ()
+ (princ (mapconcat #'symbol-name riece-modules " ")))
+
(defun riece-compile ()
(riece-compile-modules riece-modules))
2005-08-12 Daiki Ueno <ueno@unixuser.org>
+ * COMPILE (riece-compile-module): New function.
+ (riece-examine): New function.
+
+ * Makefile.am (compile-individually): New rule.
+
* riece-log.el (riece-log-file-name-regexp): New constant.
(riece-log-get-file): Add 2nd argument coding-system.
(riece-log-get-files): Add 2nd argument time.
check-local:
$(EMACS) $(FLAGS) -l COMPILE -f riece-test lunit-report.xml
+
+compile-individually:
+ @for i in `$(EMACS) $(FLAGS) -l COMPILE -f riece-examine`; do \
+ echo $(EMACS) $(FLAGS) -l COMPILE \
+ -f riece-compile-module $$i; \
+ $(EMACS) $(FLAGS) -l COMPILE \
+ -f riece-compile-module $$i; \
+ done