diff options
| author | dos-reis <gdr@axiomatics.org> | 2008-08-15 09:20:22 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2008-08-15 09:20:22 +0000 |
| commit | a2f39f13bed2d39accb83cbb7f9e3336b2c92c1c (patch) | |
| tree | 08d31ef32d2acb81c52ef96cc3dcf12820e72b87 /src/lisp | |
| parent | 78e524ef8c2135d112f880695af20b1b818011cd (diff) | |
| download | open-axiom-a2f39f13bed2d39accb83cbb7f9e3336b2c92c1c.tar.gz | |
* lisp/core.lisp.in (|$StandardLinking|): New. Export.
* lisp/Makefile.in (edit): Update.
* interp/daase.lisp: Don't load initial databases when
--system-algebra.
* interp/Makefile.pamphlet (${SAVESYS}): Build with --system-algebra.
Diffstat (limited to 'src/lisp')
| -rw-r--r-- | src/lisp/Makefile.in | 1 | ||||
| -rw-r--r-- | src/lisp/core.lisp.in | 9 |
2 files changed, 10 insertions, 0 deletions
diff --git a/src/lisp/Makefile.in b/src/lisp/Makefile.in index 4ca6535e..5c5233fd 100644 --- a/src/lisp/Makefile.in +++ b/src/lisp/Makefile.in @@ -143,6 +143,7 @@ edit = sed \ -e 's|@LIBEXT[@]|$(LIBEXT)|g' \ -e 's|@oa_c_runtime_extra[@]|$(oa_c_runtime_extra)|g' \ -e 's|@oa_base_lisp_linkset[@]|$(base_lisp_objects)|g' \ + -e 's|@oa_standard_linking[@]|$(oa_standard_linking)|g' \ -e 's|@void_type[@]|$(void_type)|g' \ -e 's|@char_type[@]|$(char_type)|g' \ -e 's|@int_type[@]|$(int_type)|g' \ diff --git a/src/lisp/core.lisp.in b/src/lisp/core.lisp.in index 1339de0f..27f0dd41 100644 --- a/src/lisp/core.lisp.in +++ b/src/lisp/core.lisp.in @@ -79,6 +79,7 @@ "$systemInstallationDirectory" "$NativeTypeTable" "$LispOptimizeOptions" + "$StandardLinking" "getOptionValue" "getCommandLineArguments" @@ -135,6 +136,14 @@ ;; -*- Hosting Lisp System -*- ;; +;; True means that the base Lisp system uses conventional C-style +;; program linking model, whereby programs are constructed by linking +;; separately compiled units. By constrast, many Lisp systems build +;; executable programs by loading FASLs into core and dumping the resulting +;; image on disk. +(defconstant |$StandardLinking| + (eq '@oa_standard_linking@ 'yes)) + ;; Almost every supported Lisp use dynamic link for FFI. ;; ECL's support is partial. GCL-2.6.x hasn't discovered it yet. (defconstant |$useDynamicLink| |