diff options
| author | Rose Hogenson <rhogenson@posteo.net> | 2022-07-24 20:29:19 -0700 |
|---|---|---|
| committer | Rose Hogenson <rhogenson@posteo.net> | 2022-07-24 20:29:19 -0700 |
| commit | ac23fca796d6dc6fc7aab0ac5bdf8987aa490761 (patch) | |
| tree | 05280a50eb2f9fb4229bb0e9d2be037ca4aa3d5c /csc/macros-test.csc | |
| parent | Fix some bugs in the compare library. (diff) | |
| download | chromatopelma-ac23fca796d6dc6fc7aab0ac5bdf8987aa490761.tar.zst | |
Write a test for codegen.
I'm not sure yet how to test regalloc.
Diffstat (limited to 'csc/macros-test.csc')
| -rw-r--r-- | csc/macros-test.csc | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/csc/macros-test.csc b/csc/macros-test.csc index d1b8d2c..b2e2f3f 100644 --- a/csc/macros-test.csc +++ b/csc/macros-test.csc @@ -15,7 +15,6 @@ %library-ref %sequence call? - constant-expression constant? define-syntax? if? @@ -249,7 +248,7 @@ (test builtin-case-lambda-defines (assert-equal (make-lambda (list (test-ref 'x)) #f - (make-letrec #t '(a b) #f + (make-letrec #t '(a b) (list (gensym) (gensym)) (list (make-constant 6) (test-ref 'a)) (make-sequence (make-constant #f) (make-constant 7)))) |