aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/ChangeLog5
-rw-r--r--src/boot/translator.boot3
2 files changed, 7 insertions, 1 deletions
diff --git a/src/ChangeLog b/src/ChangeLog
index 4d6e26a8..279725d7 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,10 @@
2008-10-09 Gabriel Dos Reis <gdr@cs.tamu.edu>
+ * boot/translator.boot (loadNativeModule): Don't save loaded
+ shared objects.
+
+2008-10-09 Gabriel Dos Reis <gdr@cs.tamu.edu>
+
* algebra/domain.spad.pamphlet (ConstructorKinid): New domain.
(Constructor): Likewise.
* algebra/Makefile.pamphlet (axiom_algebra_layer_0): Include
diff --git a/src/boot/translator.boot b/src/boot/translator.boot
index 5358d91b..66cf4b56 100644
--- a/src/boot/translator.boot
+++ b/src/boot/translator.boot
@@ -872,7 +872,8 @@ associateRequestWithFileType(Option '"compile", '"boot",
++ Load native dynamically linked module
loadNativeModule m ==
%hasFeature KEYWORD::SBCL =>
- FUNCALL(bfColonColon("SB-ALIEN","LOAD-SHARED-OBJECT"),m)
+ FUNCALL(bfColonColon("SB-ALIEN","LOAD-SHARED-OBJECT"),m,
+ KEYWORD::DONT_-SAVE, true)
%hasFeature KEYWORD::CLISP =>
EVAL [bfColonColon("FFI","DEFAULT-FOREIGN-LIBRARY"), m]
%hasFeature KEYWORD::ECL =>