Allow custom matchers. Closes #8.

Author: ryanplusplus

spec/mach_spec.lua

@@ -643,4 +643,19 @@ describe('The mach library', function()
       end)
     end)
   end)
+
+  it('should allow custom matchers to be used', function()
+    local function always_matches() return true end
+    local function never_matches() return false end
+
+    f:should_be_called_with(mach.match({ a = 1, b = 2 }, always_matches)):when(function()
+      f({ a = 11, b = 22 })
+    end)
+
+    should_fail(function()
+      f:should_be_called_with(mach.match({ a = 1, b = 2 }, never_matches)):when(function()
+        f({ a = 1, b = 2 })
+      end)
+    end)
+  end)
 end)

src/mach.lua

@@ -92,8 +92,8 @@ function mach.mock_object(o, name)
   return mocked
 end
 
-function mach.match(value)
-  return setmetatable({ value = value, matcher = default_matcher }, mach_match)
+function mach.match(value, matcher)
+  return setmetatable({ value = value, matcher = matcher or default_matcher }, mach_match)
 end
 
 return setmetatable(mach, { __call = function(_, ...) return Expectation(...) end })