tests: Test gears.matcher "rule_every".

tests/examples/text/gears/matcher/types.lua

@@ -0,0 +1,62 @@
+--DOC_HIDE --DOC_NO_USAGE
+local gears = {matcher = require("gears.matcher")} --DOC_HIDE
+
+
+    local matcher = gears.matcher()
+
+    matcher:append_rule( "my.source", {
+        rule = {
+            my_any_rule = true,
+        },
+        rule_every = {
+            every1 = {1, 42},
+            every2 = {2, 42},
+            every3 = {3, 42},
+        },
+        except = {
+            except1 = 1,
+        },
+        properties = {
+            was_a_match = true,
+        },
+    })
+
+    local candidate1 = {
+        my_any_rule = true,
+        every1      = 1,
+        every2      = 2,
+        every3      = 3,
+        was_a_match = false,
+    }
+
+--DOC_NEWLINE
+
+    local candidate2 = {
+        every2      = 2,
+        was_a_match = false,
+    }
+
+--DOC_NEWLINE
+
+    local candidate3 = {
+        my_any_rule = true,
+        was_a_match = false,
+        every1      = 1,
+        every2      = 2,
+        every3      = 3,
+        except1     = 1,
+    }
+
+
+--DOC_NEWLINE
+
+    matcher:apply(candidate1)
+    matcher:apply(candidate2)
+    matcher:apply(candidate3)
+
+--DOC_NEWLINE
+
+    -- Only candidate1 fits all criteria.
+    assert(candidate1.was_a_match == true )
+    assert(candidate2.was_a_match == false)
+    assert(candidate3.was_a_match == false)