(define* (compile-file file #:key
(output-file #f)
(from (current-language))
- (to 'objcode)
+ (to 'bytecode)
(env (default-environment from))
(opts '())
(canonicalization 'relative))
(define* (read-and-compile port #:key
(from (current-language))
- (to 'objcode)
+ (to 'bytecode)
(env (default-environment from))
(opts '()))
(let ((from (ensure-language from))
(define* (decompile x #:key
(env #f)
- (from 'value)
- (to 'assembly)
+ (from 'tree-il)
+ (to 'scheme)
(opts '()))
(decompile-fold (decompile-passes from to opts)
x