variadic zip. Close #9

2021-07-12 16:17:38 -06:00
parent 0a9a53bed1
commit 8d0273ab61
4 changed files with 42 additions and 24 deletions
--- a/src/test/cases/BasicTestCase.kiss
+++ b/src/test/cases/BasicTestCase.kiss
@@ -122,7 +122,8 @@
    (try (begin (zip [1 3] [2] Throw) (Assert.fail))
        (catch [error] (Assert.pass)))
    (try (begin (zip [1] [2 4] Throw) (Assert.fail))
-        (catch [error] (Assert.pass))))
+        (catch [error] (Assert.pass)))
+    (Assert.equals (.toString [[1 2 3] [2 null 3]]) (.toString (zip [1 2] [2] [3 3] Keep))))

 (defun _testLet []
    (let [a 5