diff options
author | dos-reis <gdr@axiomatics.org> | 2008-08-17 03:50:35 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2008-08-17 03:50:35 +0000 |
commit | ffb91646c6f11e84fa886aa5abc2de61ba291cc1 (patch) | |
tree | 6381e1c610ffeed10f6705524ad577bb7d3cfa01 /src/interp/daase.lisp | |
parent | 424c4295242245f3232f6171ab2fffca2c248935 (diff) | |
download | open-axiom-ffb91646c6f11e84fa886aa5abc2de61ba291cc1.tar.gz |
* interp/sys-driver.boot (openDatabases): Rename from RESTART0.
(initializeGlobalState): Tidy.
(executeSpadScript): Don't display start up messages.
(compileSpadLibrary): Likewise.
(buildDatabasesHandler): Likewise.
(systemMain): Initialize global states.
* interp/nrunfast.boot: Defin $NRTvec, $monitorNewWorld.
* interp/daase.lisp (|fillDatabasesInCore|): Rename from
RESETHASHTABLES.
(|closeAllDatabaseStreams|): Rename from closeAllDatabases
* interp/util.lisp (build-interpsys): Initialize macro table.
* interp/htcheck.boot: Don't initialize macro table here.
Diffstat (limited to 'src/interp/daase.lisp')
-rw-r--r-- | src/interp/daase.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/daase.lisp b/src/interp/daase.lisp index b422cf01..d0ce7826 100644 --- a/src/interp/daase.lisp +++ b/src/interp/daase.lisp @@ -333,14 +333,14 @@ (list flags file))) -(defun |closeAllDatabases| nil +(defun |closeAllDatabaseStreams| nil (close *interp-stream*) (close *operation-stream*) (close *category-stream*) (close *browse-stream*)) -(defun resethashtables () +(defun |fillDatabasesInCore| nil "set all -hash* to clean values. used to clean up core before saving system" (setq *hascategory-hash* (make-hash-table :test #'equal)) (setq *operation-hash* (make-hash-table)) |