diff options
author | dos-reis <gdr@axiomatics.org> | 2008-03-10 05:21:00 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2008-03-10 05:21:00 +0000 |
commit | 6cd03930cf6d06aeb22d8a03f88e21aed3741846 (patch) | |
tree | 9afeca88d3d16cad78167df6e8936c0a70724b4c /src/interp/daase.lisp | |
parent | 6134f0731a2f170fd76b08b435f7a813ee74b806 (diff) | |
download | open-axiom-6cd03930cf6d06aeb22d8a03f88e21aed3741846.tar.gz |
* lisp/core.lisp.in ("$faslType"): Export.
* interp/sys-driver.boot (algebraBootstrapDir): New.
* interp/lisplib.boot (findModule): New.
(loadLib): Use it.
* interp/daase.lisp (localdatabase): Make sure loadable modules
have proper extensions.
* interp/sys-utility.boot (existingFile?): New.
Diffstat (limited to 'src/interp/daase.lisp')
-rw-r--r-- | src/interp/daase.lisp | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/interp/daase.lisp b/src/interp/daase.lisp index ea9bebd3..00525246 100644 --- a/src/interp/daase.lisp +++ b/src/interp/daase.lisp @@ -924,7 +924,8 @@ (dolist (file libs) (|addInputLibrary| (truename file))) (dolist (file (nreverse nrlibs)) (setq key (pathname-name (first (last (pathname-directory file))))) - (setq object (concatenate 'string (directory-namestring file) "code")) + (setq object (concatenate 'string (directory-namestring file) + "code." |$faslType|)) (localnrlib key file object make-database? noexpose)) (dolist (file (nreverse asys)) (setq object |