diff options
| author | dos-reis <gdr@axiomatics.org> | 2008-08-14 05:15:19 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2008-08-14 05:15:19 +0000 |
| commit | 737be2084042a41c9f818660b0eac0ba43254c9e (patch) | |
| tree | 4b312e4ee989cba9e642f68251a15e490bdbb65c | |
| parent | 26c1f12d4d829f293ee9265690ddfb451119df1e (diff) | |
| download | open-axiom-737be2084042a41c9f818660b0eac0ba43254c9e.tar.gz | |
* interp/sys-driver.boot (buildDatabasesHandler): New.
Install it as handler for --build-databases.
* etc/Makefile.in ($(openaxiom_databases)): Adjust.
| -rw-r--r-- | src/ChangeLog | 6 | ||||
| -rw-r--r-- | src/etc/Makefile.in | 3 | ||||
| -rw-r--r-- | src/interp/sys-driver.boot | 10 |
3 files changed, 16 insertions, 3 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index a6f67eaf..3e175c66 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,9 @@ +2008-08-14 Gabriel Dos Reis <gdr@cs.tamu.edu> + + * interp/sys-driver.boot (buildDatabasesHandler): New. + Install it as handler for --build-databases. + * etc/Makefile.in ($(openaxiom_databases)): Adjust. + 2008-08-13 Gabriel Dos Reis <gdr@cs.tamu.edu> * interp/Makefile.pamphlet (OBJS): Don't include union.$(FASLEXT) diff --git a/src/etc/Makefile.in b/src/etc/Makefile.in index 11cddbbe..876618a3 100644 --- a/src/etc/Makefile.in +++ b/src/etc/Makefile.in @@ -59,8 +59,7 @@ stamp: $(openaxiom_databases) $(axiom_target_bindir)/asq$(EXEEXT) \ $(openaxiom_databases): ../algebra/*.NRLIB/code.$(FASLEXT) @ echo rebuilding databases... cp $(axiom_src_docdir)/topics.data ../algebra - (cd ../algebra ; \ - echo ')lisp (make-databases nil)' | $(INTERPSYS) ) + (cd ../algebra && $(INTERPSYS) --build-databases) mkdir -p $(axiom_targetdir)/algebra cp -p ../algebra/*.daase $(axiom_targetdir)/algebra cp -p ../algebra/libdb.text $(axiom_targetdir)/algebra diff --git a/src/interp/sys-driver.boot b/src/interp/sys-driver.boot index 4a97d76e..593244f3 100644 --- a/src/interp/sys-driver.boot +++ b/src/interp/sys-driver.boot @@ -175,7 +175,8 @@ restart() == RESTART0() readSpadProfileIfThere() spad() - + +--% initializeGlobalState() == REROOT() @@ -224,3 +225,10 @@ compileSpadLibrary(progname,options,file) == associateRequestWithFileType(Option '"compile", '"spad", function compileSpadLibrary) + +buildDatabasesHandler(prog,options,args) == + initializeGlobalState() + MAKE_-DATABASES args + coreQuit(errorCount() > 0 => 1; 0) + +installDriver(Option '"build-databases",function buildDatabasesHandler) |