diff options
| author | bd <bdunahu@operationnull.com> | 2025-01-29 22:11:47 -0500 |
|---|---|---|
| committer | bd <bdunahu@operationnull.com> | 2025-01-29 22:11:47 -0500 |
| commit | a27138cd3fb680b616c04fed02b73d630b681451 (patch) | |
| tree | ffbdc54a80046a27f38a5d804d667ed66a51ebf9 /src/backend/generator/driver.scm | |
| parent | 64a11c10aeb8ea331a9408708cf85b6750524d61 (diff) | |
Add fixup rules new binary operators
Diffstat (limited to 'src/backend/generator/driver.scm')
| -rw-r--r-- | src/backend/generator/driver.scm | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/src/backend/generator/driver.scm b/src/backend/generator/driver.scm index ac060f7..6625388 100644 --- a/src/backend/generator/driver.scm +++ b/src/backend/generator/driver.scm @@ -3,10 +3,7 @@ #:export (tacky->assembly)) -;; (define (tacky->assembly n) -;; (eval (expansion->allocate -;; (eval n (resolve-module '(backend generator expansion)))) -;; (resolve-module '(backend generator assembly)))) - (define (tacky->assembly n) - (eval n (resolve-module '(backend generator expansion)))) + (eval (expansion->allocate + (eval n (resolve-module '(backend generator expansion)))) + (resolve-module '(backend generator assembly)))) |