src/backend/generator/driver.scm


1
2
3
4
5
6
7
8
9

(define-module (backend generator driver)
  #:use-module (backend generator allocate)
  #:export (tacky->assembly))


(define (tacky->assembly n)
  (eval (expansion->allocate
         (eval n (resolve-module '(backend generator expansion))))
        (resolve-module '(backend generator assembly))))