summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--module/language/tree-il/spec.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/module/language/tree-il/spec.scm b/module/language/tree-il/spec.scm
index 169f5a067..511a2e29c 100644
--- a/module/language/tree-il/spec.scm
+++ b/module/language/tree-il/spec.scm
@@ -43,7 +43,7 @@
(if (match (memq #:cps? opts)
((_ cps? . _) cps?)
(#f (<= 1 optimization-level)))
- (cons 'cps (load-compiler 'compile-bytecode))
+ (cons 'cps (load-compiler 'compile-cps))
(cons 'bytecode (load-compiler 'compile-bytecode))))
(define-language tree-il