diff options
Diffstat (limited to 'tests/012')
| -rw-r--r-- | tests/012/compile.tl | 3 | ||||
| -rw-r--r-- | tests/012/lambda.tl | 2 |
2 files changed, 3 insertions, 2 deletions
diff --git a/tests/012/compile.tl b/tests/012/compile.tl index 9b22d92a..b79d92f4 100644 --- a/tests/012/compile.tl +++ b/tests/012/compile.tl @@ -10,5 +10,6 @@ (when (path-exists-p exf) (file-append-string %expected-file% (file-get-string exf)))) - (compile-file `@f.tl` "temp.tlo") + (with-compile-opts (nil unused) + (compile-file `@f.tl` "temp.tlo")) (remove-path "temp.tlo")) diff --git a/tests/012/lambda.tl b/tests/012/lambda.tl index 47b03e4b..ec3b2cae 100644 --- a/tests/012/lambda.tl +++ b/tests/012/lambda.tl @@ -126,7 +126,7 @@ [(lambda (x y : (a 3) (b 4) . r) (list x y a b r)) 1 2 0 0 . vc] (1 2 0 0 (: : : :)) [(lambda (x y : (a 3) (b 4) . r) (list x y a b r)) 1 2 0 0 5 . vc] (1 2 0 0 (5 : : : :))) -(test (functionp (lambda (: (n n)))) t) +(test (functionp (lambda (: (n n)) n)) t) (defvarl n) |