#:use-module (system base pmatch)
#:use-module (language tree-il)
#:use-module (language tree-il compile-cps)
- #:use-module (language tree-il eval)
#:export (tree-il))
(define (write-tree-il exp . port)
#:printer write-tree-il
#:parser parse-tree-il
#:joiner join
- #:compilers `((value . ,compile-value)
- (cps . ,compile-cps))
+ #:compilers `((cps . ,compile-cps))
#:for-humans? #f
)