mirror of
https://github.com/SpaceVim/SpaceVim.git
synced 2025-02-04 18:50:05 +08:00
62 lines
1.8 KiB
Lua
62 lines
1.8 KiB
Lua
|
local assert = require('luassert.assert')
|
||
|
|
local match = require ('luassert.match')
|
||
|
|
local s = require('say')
|
||
|
|
|
||
|
|
local function none(state, arguments, level)
|
||
|
|
local level = (level or 1) + 1
|
||
|
|
local argcnt = arguments.n
|
||
|
|
assert(argcnt > 0, s("assertion.internal.argtolittle", { "none", 1, tostring(argcnt) }), level)
|
||
|
|
for i = 1, argcnt do
|
||
|
|
assert(match.is_matcher(arguments[i]), s("assertion.internal.badargtype", { 1, "none", "matcher", type(arguments[i]) }), level)
|
||
|
|
end
|
||
|
|
|
||
|
|
return function(value)
|
||
|
|
for _, matcher in ipairs(arguments) do
|
||
|
|
if matcher(value) then
|
||
|
|
return false
|
||
|
|
end
|
||
|
|
end
|
||
|
|
return true
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
local function any(state, arguments, level)
|
||
|
|
local level = (level or 1) + 1
|
||
|
|
local argcnt = arguments.n
|
||
|
|
assert(argcnt > 0, s("assertion.internal.argtolittle", { "any", 1, tostring(argcnt) }), level)
|
||
|
|
for i = 1, argcnt do
|
||
|
|
assert(match.is_matcher(arguments[i]), s("assertion.internal.badargtype", { 1, "any", "matcher", type(arguments[i]) }), level)
|
||
|
|
end
|
||
|
|
|
||
|
|
return function(value)
|
||
|
|
for _, matcher in ipairs(arguments) do
|
||
|
|
if matcher(value) then
|
||
|
|
return true
|
||
|
|
end
|
||
|
|
end
|
||
|
|
return false
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
local function all(state, arguments, level)
|
||
|
|
local level = (level or 1) + 1
|
||
|
|
local argcnt = arguments.n
|
||
|
|
assert(argcnt > 0, s("assertion.internal.argtolittle", { "all", 1, tostring(argcnt) }), level)
|
||
|
|
for i = 1, argcnt do
|
||
|
|
assert(match.is_matcher(arguments[i]), s("assertion.internal.badargtype", { 1, "all", "matcher", type(arguments[i]) }), level)
|
||
|
|
end
|
||
|
|
|
||
|
|
return function(value)
|
||
|
|
for _, matcher in ipairs(arguments) do
|
||
|
|
if not matcher(value) then
|
||
|
|
return false
|
||
|
|
end
|
||
|
|
end
|
||
|
|
return true
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
assert:register("matcher", "none_of", none)
|
||
|
|
assert:register("matcher", "any_of", any)
|
||
|
|
assert:register("matcher", "all_of", all)
|