diff options
-rw-r--r-- | module/language/tree-il/spec.scm | 2 |
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 |