diff options
| author | Arun Isaac | 2021-10-04 15:54:22 +0530 |
|---|---|---|
| committer | Arun Isaac | 2021-10-04 15:54:22 +0530 |
| commit | 2d9df0fc90e96a39ace2446341cf8cbf7be33c29 (patch) | |
| tree | 897d2f6ca6f9941e007a88b9659cfc3b58003347 | |
| parent | b0aa4a95eaa088d90984024582babf749eb8fae7 (diff) | |
| download | ccwl-2d9df0fc90e96a39ace2446341cf8cbf7be33c29.tar.gz ccwl-2d9df0fc90e96a39ace2446341cf8cbf7be33c29.tar.lz ccwl-2d9df0fc90e96a39ace2446341cf8cbf7be33c29.zip | |
tests: Remove stray syntax-lambda** form.
* tests/utils.scm: Remove stray syntax-lambda** form.
| -rw-r--r-- | tests/utils.scm | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/tests/utils.scm b/tests/utils.scm index be0e87f..07e02f8 100644 --- a/tests/utils.scm +++ b/tests/utils.scm @@ -86,9 +86,6 @@ (list a b foo bar)) #'1 #'2 #'#:foo #'123 #'#:bar #'1 #'2 #'3))) -((syntax-lambda** (a b #:key foo #:key* bar) - (list a b foo bar)) - #'1 #'2 #'#:foo #'123 #'#:bar #'1 #'2 #'3) (test-assert "syntax-lambda** with default values" (equal? (list #'1 #'2 #'123 9 #'(321 456) '(7) '(3 2 1)) ((syntax-lambda** (foo aal #:key vale (pal 9) #:key* naal (irandu 7) (sol 3 2 1)) |