diff options
Diffstat (limited to 'module/language/cps/compile-bytecode.scm')
| -rw-r--r-- | module/language/cps/compile-bytecode.scm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/module/language/cps/compile-bytecode.scm b/module/language/cps/compile-bytecode.scm index c07db2621..c92c15d01 100644 --- a/module/language/cps/compile-bytecode.scm +++ b/module/language/cps/compile-bytecode.scm @@ -29,7 +29,6 @@ #:use-module (language cps) #:use-module (language cps dfg) #:use-module (language cps primitives) - #:use-module (language cps reify-primitives) #:use-module (language cps renumber) #:use-module (language cps slot-allocation) #:use-module (system vm assembler) @@ -443,7 +442,7 @@ (compile-entry))))) (define (compile-bytecode exp env opts) - (let* ((exp (renumber (reify-primitives exp))) + (let* ((exp (renumber exp)) (asm (make-assembler))) (match exp (($ $program funs) |