test/util: matches()

test/functional/helpers.lua

@@ -16,6 +16,7 @@ local neq = global_helpers.neq
 local eq = global_helpers.eq
 local ok = global_helpers.ok
 local map = global_helpers.map
+local matches = global_helpers.matches
 local filter = global_helpers.filter
 local dedent = global_helpers.dedent
 local table_flatten = global_helpers.table_flatten
@@ -747,6 +748,7 @@ local module = {
   insert = insert,
   iswin = iswin,
   map = map,
+  matches = matches,
   merge_args = merge_args,
   meth_pcall = meth_pcall,
   meths = meths,

test/helpers.lua

@@ -16,6 +16,12 @@ end
 local function ok(res)
   return assert.is_true(res)
 end
+local function matches(pat, actual)
+  if nil ~= string.match(actual, pat) then
+    return true
+  end
+  error(string.format('Pattern does not match.\nPattern:\n%s\nActual:\n%s', pat, actual))
+end
 
 -- initial_path:  directory to recurse into
 -- re:            include pattern (string)
@@ -572,6 +578,7 @@ return {
   hasenv = hasenv,
   intchar2lua = intchar2lua,
   map = map,
+  matches = matches,
   mergedicts_copy = mergedicts_copy,
   neq = neq,
   ok = ok,