diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 5 | ||||
| -rw-r--r-- | src/boot/translator.boot | 3 |
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 => |