Improve (groups)

2020-12-05 18:46:24 -07:00
parent 7ff7bab555
commit 1805b396bf
3 changed files with 21 additions and 5 deletions
--- a/kiss/src/test/cases/BasicTestCase.kiss
+++ b/kiss/src/test/cases/BasicTestCase.kiss
@@ -115,10 +115,10 @@
    (the Int 5))

 (defun myGroups1 []
-    (Prelude.groups [1 2 3 4] 2))
+    (groups [1 2 3 4] 2))

 (defun myGroups2 []
-    (Prelude.groups [1 2 3 4] 3 true))
+    (groups [1 2 3 4] 3 Keep))

 (defun _testLet []
    (let [a 5