diff options
author | Andy Wingo <wingo@pobox.com> | 2013-10-31 14:17:30 +0100 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2013-10-31 14:17:30 +0100 |
commit | b73a2ee01773d910d82074a818c3955b45a6e6e1 (patch) | |
tree | 32c45887a5de512f43ea810fe31b016983cc7fb2 /module/system/base | |
parent | 30b7cf9df0f51bc2a3553396dc368c197eab4d8d (diff) |
Default to compiling to RTL
* module/ice-9/eval-string.scm (eval-string)
* module/language/tree-il/spec.scm (tree-il)
* module/scripts/compile.scm (compile)
* module/system/base/compile.scm (compile-file, read-and-compile)
* module/system/repl/common.scm (repl-compile, repl-prepare-eval-thunk):
Default to compiling to RTL.
* module/language/rtl/spec.scm (rtl->value): Add value compiler.
Diffstat (limited to 'module/system/base')
-rw-r--r-- | module/system/base/compile.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/module/system/base/compile.scm b/module/system/base/compile.scm index 82d75c778..b932e6437 100644 --- a/module/system/base/compile.scm +++ b/module/system/base/compile.scm @@ -133,7 +133,7 @@ (define* (compile-file file #:key (output-file #f) (from (current-language)) - (to 'objcode) + (to 'rtl) (env (default-environment from)) (opts '()) (canonicalization 'relative)) @@ -207,7 +207,7 @@ (define* (read-and-compile port #:key (from (current-language)) - (to 'objcode) + (to 'rtl) (env (default-environment from)) (opts '())) (let ((from (ensure-language from)) |