diff options
| author | Gabriel Dos Reis <gdr@axiomatics.org> | 2016-01-16 13:47:40 -0800 |
|---|---|---|
| committer | Gabriel Dos Reis <gdr@axiomatics.org> | 2016-01-16 13:47:40 -0800 |
| commit | b2eb2e7744d9947f6b5cf61c917014d9d5a4da7d (patch) | |
| tree | b1da457baf0a9e187e733c41a3daa30c4f594c4d /src/interp/daase.lisp | |
| parent | 7a0c86e9fcbccd980eb5d0a94fb0d6d6c1a7b0d6 (diff) | |
| download | open-axiom-b2eb2e7744d9947f6b5cf61c917014d9d5a4da7d.tar.gz | |
Reduce dependencies on databases to catgeory.daase during algebra build
Diffstat (limited to 'src/interp/daase.lisp')
| -rw-r--r-- | src/interp/daase.lisp | 12 |
1 files changed, 0 insertions, 12 deletions
diff --git a/src/interp/daase.lisp b/src/interp/daase.lisp index ed761760..3e799091 100644 --- a/src/interp/daase.lisp +++ b/src/interp/daase.lisp @@ -640,18 +640,10 @@ (operation (setq stream *operation-stream*) (setq data (gethash constructor *operation-hash*))) - (constructormodemap - (setq stream *interp-stream*) - (when struct - (setq data (|dbConstructorModemap| struct)))) (constructorcategory (setq stream *interp-stream*) (when struct (setq data (|dbCategory| struct)))) - (operationalist - (setq stream *interp-stream*) - (when struct - (setq data (|dbOperations| struct)))) (modemaps (setq stream *interp-stream*) (when struct @@ -712,12 +704,8 @@ (setf (gethash constructor *operation-hash*) data)) (hascategory (setf (gethash constructor |$HasCategoryTable|) data)) - (constructormodemap - (setf (|dbConstructorModemap| struct) data)) (constructorcategory (setf (|dbCategory| struct) data)) - (operationalist - (setf (|dbOperations| struct) data)) (modemaps (setf (|dbModemaps| struct) data)) (object |