From 6c5715573f3f081d5840f74474c9e124346656a3 Mon Sep 17 00:00:00 2001 From: bg66 Date: Mon, 26 Mar 2007 05:23:23 +0000 Subject: [PATCH] * Makefile.am (compile-individually): New target. * COMPILE.in (mixi-compile-module): New function. (mixi-examine): Ditto. --- COMPILE.in | 13 ++++++++++++- ChangeLog | 6 ++++++ Makefile.am | 8 ++++++++ 3 files changed, 26 insertions(+), 1 deletion(-) diff --git a/COMPILE.in b/COMPILE.in index 27179a8..5c1610a 100644 --- a/COMPILE.in +++ b/COMPILE.in @@ -7,7 +7,8 @@ (let ((load-path (cons nil load-path)) error-modules) (while modules - (let ((source (expand-file-name (symbol-name (car modules))))) + (let ((source (expand-file-name + (symbol-name (car modules))))) (if (file-newer-than-file-p source (concat source "c")) (condition-case error (byte-compile-file source) @@ -25,6 +26,13 @@ WARNING: the last build, and then reconfigure. WARNING: ---------------------------------------------------------\n\n"))))) +(defun mixi-compile-module () + (let ((load-path (cons nil load-path))) + (let ((source (expand-file-name + (car command-line-args-left)))) + (if (file-newer-than-file-p source (concat source "c")) + (byte-compile-file source))))) + (defun mixi-install-modules (modules dest just-print) (unless (or just-print (file-exists-p dest)) (make-directory dest t)) @@ -51,6 +59,9 @@ (if flag (string-match "^\\(\\(--[^ ]+ \\)+-\\|[^ =-]\\)*n" flag)))) +(defun mixi-examine () + (princ (mapconcat #'symbol-name mixi-modules " "))) + (defun mixi-compile () (mixi-compile-modules mixi-modules)) diff --git a/ChangeLog b/ChangeLog index 82bfef7..fb706bd 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,11 @@ 2007-03-26 OHASHI Akira + * Makefile.am (compile-individually): New target. + * COMPILE.in (mixi-compile-module): New function. + (mixi-examine): Ditto. + +2007-03-26 OHASHI Akira + * COMPILE.in: Rename from `COMPILE'. (mixi-modules): New variable. (mixi-compile): Use it. diff --git a/Makefile.am b/Makefile.am index 79a5c61..135a52a 100644 --- a/Makefile.am +++ b/Makefile.am @@ -19,3 +19,11 @@ package: install-package: package $(XEMACS) $(FLAGS) -l COMPILE -f mixi-install-package $(PACKAGEDIR) + +compile-individually: + @for i in `$(EMACS) $(FLAGS) -l COMPILE -f mixi-examine`; do \ + echo $(EMACS) $(FLAGS) -l COMPILE \ + -f mixi-compile-module $$i; \ + $(EMACS) $(FLAGS) -l COMPILE \ + -f mixi-compile-module $$i; \ + done -- 1.7.10.4