aboutsummaryrefslogtreecommitdiff
path: root/src/lisp/core.lisp.in
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-04-10 23:06:58 +0000
committerdos-reis <gdr@axiomatics.org>2011-04-10 23:06:58 +0000
commite663f5f211469940ee2403f7cb18b29e3ab597bb (patch)
tree0c366de4817c8e627a45c6a8e5a6039a0b3b08ca /src/lisp/core.lisp.in
parent4d4f8f3638dfe65d82f2343ce19fc367aa42337c (diff)
downloadopen-axiom-e663f5f211469940ee2403f7cb18b29e3ab597bb.tar.gz
specify linker for ECL
Diffstat (limited to 'src/lisp/core.lisp.in')
-rw-r--r--src/lisp/core.lisp.in12
1 files changed, 7 insertions, 5 deletions
diff --git a/src/lisp/core.lisp.in b/src/lisp/core.lisp.in
index 7f7e6357..f746c4c1 100644
--- a/src/lisp/core.lisp.in
+++ b/src/lisp/core.lisp.in
@@ -853,11 +853,13 @@
(compile-file file :output-file out-file :system-p t
:c-file t :h-file t)
(compile-file file :output-file out-file :system-p t))
- #+:ecl (if (and result (not failure-p)
- (null (c::build-fasl (compile-file-pathname out-file)
- :lisp-files `(,out-file)
- :ld-flags (extra-runtime-libs))))
- (setq result nil))
+ #+:ecl
+ (let ((compiler::*ld* oa-cxx))
+ (if (and result (not failure-p)
+ (null (c::build-fasl (compile-file-pathname out-file)
+ :lisp-files `(,out-file)
+ :ld-flags (extra-runtime-libs))))
+ (setq result nil)))
(cond ((null result)
(|coreError| "compilation of Lisp code failed"))
(failure-p