has function set for pairs

2025-12-16 14:11:16 +07:00 · 2025-06-16 04:55:46 +07:00
parent 1e9005e468
commit 4f33796b97
2 changed files with 186 additions and 23 deletions
--- a/develop/testing/pairs_tests.lua
+++ b/develop/testing/pairs_tests.lua
@@ -6,3 +6,69 @@ do
    local p2, s2 = evo.unpair(pair1)
    assert(p1 == p2 and s1 == s2)
 end
+
+do
+    local p, s1, s2 = evo.id(3)
+
+    local e1 = evo.id()
+    evo.set(e1, evo.pair(p, s1), 11)
+
+    local e12 = evo.id()
+    evo.set(e12, evo.pair(p, s1), 21)
+    evo.set(e12, evo.pair(p, s2), 42)
+
+    assert(evo.has(e1, evo.pair(p, s1)))
+    assert(evo.get(e1, evo.pair(p, s1)) == 11)
+    assert(evo.has(e12, evo.pair(p, s1)))
+    assert(evo.get(e12, evo.pair(p, s1)) == 21)
+
+    assert(not evo.has(e1, evo.pair(p, s2)))
+    assert(evo.get(e1, evo.pair(p, s2)) == nil)
+    assert(evo.has(e12, evo.pair(p, s2)))
+    assert(evo.get(e12, evo.pair(p, s2)) == 42)
+
+    assert(evo.has(e1, evo.pair(p, evo.ANY)))
+    assert(evo.has(e1, evo.pair(evo.ANY, s1)))
+    assert(not evo.has(e1, evo.pair(evo.ANY, s2)))
+    assert(evo.has(e12, evo.pair(p, evo.ANY)))
+    assert(evo.has(e12, evo.pair(evo.ANY, s1)))
+    assert(evo.has(e12, evo.pair(evo.ANY, s2)))
+
+    assert(not evo.has_all(e1, evo.pair(evo.ANY, s1), evo.pair(evo.ANY, s2)))
+    assert(evo.has_any(e1, evo.pair(evo.ANY, s1), evo.pair(evo.ANY, s2)))
+    assert(evo.has_all(e12, evo.pair(evo.ANY, s1), evo.pair(evo.ANY, s2)))
+    assert(evo.has_any(e12, evo.pair(evo.ANY, s1), evo.pair(evo.ANY, s2)))
+end
+
+do
+    local p1, p2, s = evo.id(3)
+
+    local e1 = evo.id()
+    evo.set(e1, evo.pair(p1, s), 11)
+
+    local e12 = evo.id()
+    evo.set(e12, evo.pair(p1, s), 21)
+    evo.set(e12, evo.pair(p2, s), 42)
+
+    assert(evo.has(e1, evo.pair(p1, s)))
+    assert(evo.get(e1, evo.pair(p1, s)) == 11)
+    assert(evo.has(e12, evo.pair(p1, s)))
+    assert(evo.get(e12, evo.pair(p1, s)) == 21)
+
+    assert(not evo.has(e1, evo.pair(p2, s)))
+    assert(evo.get(e1, evo.pair(p2, s)) == nil)
+    assert(evo.has(e12, evo.pair(p2, s)))
+    assert(evo.get(e12, evo.pair(p2, s)) == 42)
+
+    assert(evo.has(e1, evo.pair(p1, evo.ANY)))
+    assert(not evo.has(e1, evo.pair(p2, evo.ANY)))
+    assert(evo.has(e1, evo.pair(evo.ANY, s)))
+    assert(evo.has(e12, evo.pair(p1, evo.ANY)))
+    assert(evo.has(e12, evo.pair(p2, evo.ANY)))
+    assert(evo.has(e12, evo.pair(evo.ANY, s)))
+
+    assert(not evo.has_all(e1, evo.pair(p1, evo.ANY), evo.pair(p2, evo.ANY)))
+    assert(evo.has_any(e1, evo.pair(p1, evo.ANY), evo.pair(p2, evo.ANY)))
+    assert(evo.has_all(e12, evo.pair(p1, evo.ANY), evo.pair(p2, evo.ANY)))
+    assert(evo.has_any(e12, evo.pair(p1, evo.ANY), evo.pair(p2, evo.ANY)))
+end