kiss-lang/kiss
1
0
Fork 0
Code Issues 4 Pull Requests Actions Packages Projects Releases Wiki Activity

variadic intersect() function

Browse Source
This commit is contained in:
Nat Quayle Nelson
2022-02-10 12:34:18 -07:00
parent b34b0308a2
commit 84da50b807
4 changed files with 43 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/test/cases/BasicTestCase.hx
View File

@@ -335,6 +335,10 @@ class BasicTestCase extends Test {
function testContains() {
_testContains();
}
function testIntersect() {
_testIntersect();
}
}
class BasicObject {

22
src/test/cases/BasicTestCase.kiss
View File

@@ -605,4 +605,26 @@
(assert !(contains "abc" "z"))
(assert (contains [1 2 3] 1))
(assert !(contains [1 2 3] 5))
(Assert.pass))
(function _testIntersect []
(let [intersection2d
(for i (the Array<Array<Dynamic>> (intersect (.split "abc" "") (.split "xyz" ""))) (i.join ""))
intersection3d
(for i (the Array<Array<Dynamic>> (intersect (.split "abc" "") (.split "xyz" "") (.split "123" ""))) (i.join ""))]
(assert (contains intersection2d "ax"))
(assert (contains intersection2d "ay"))
(assert (contains intersection2d "az"))
(assert (contains intersection2d "bx"))
(assert (contains intersection2d "by"))
(assert (contains intersection2d "bz"))
(assert (contains intersection2d "cx"))
(assert (contains intersection2d "cy"))
(assert (contains intersection2d "cz"))
(assert (contains intersection3d "ax1"))
(assert (contains intersection3d "ax3"))
(assert (contains intersection3d "bx3"))
(assert (contains intersection3d "cy1"))
(assert (contains intersection3d "cy3"))
)
(Assert.pass))