* libcompile librarified
This commit is contained in:
parent
5ae6f6bc76
commit
76023d27c6
BIN
src/ikarus.boot
BIN
src/ikarus.boot
Binary file not shown.
|
@ -11,6 +11,11 @@
|
|||
;;; 6.1: * added case-lambda, dropped lambda
|
||||
;;; 6.0: * basic compiler
|
||||
|
||||
(library (ikarus compiler)
|
||||
(export)
|
||||
(import (scheme))
|
||||
|
||||
|
||||
(let ()
|
||||
|
||||
(define-syntax record-case
|
||||
|
@ -5195,6 +5200,7 @@
|
|||
(lambda args
|
||||
(error 'alt-cogen "disabled for now")))
|
||||
|
||||
|
||||
(define (alt-compile-expr expr)
|
||||
(let* ([p (parameterize ([assembler-output #f])
|
||||
(expand expr))]
|
||||
|
@ -5308,5 +5314,5 @@
|
|||
f)))
|
||||
|
||||
|
||||
)
|
||||
))
|
||||
|
||||
|
|
Loading…
Reference in New Issue