diff options
author | Reuben Thomas <rrt@sc3d.org> | 2010-07-30 19:55:15 +0100 |
---|---|---|
committer | Reuben Thomas <rrt@sc3d.org> | 2010-07-30 19:55:15 +0100 |
commit | 4b0c49c6603536bbfc3d0c52a9751c86b3b43305 (patch) | |
tree | 498214faf662ec531b78a7ccb5961859c2ac4563 /test | |
parent | 6139778cc0579f2f64dc0a1e67dc6868a5040364 (diff) | |
download | lrexlib-4b0c49c6603536bbfc3d0c52a9751c86b3b43305.tar.gz |
Add test for execution flags.
Diffstat (limited to 'test')
-rwxr-xr-x | test/gnu_sets.lua | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/test/gnu_sets.lua b/test/gnu_sets.lua index cd8f689..8dd5833 100755 --- a/test/gnu_sets.lua +++ b/test/gnu_sets.lua @@ -30,9 +30,23 @@ local function set_f_gmatch (lib, flg) { {"abA", "a"}, {{"a",N}, {"A",N} } }, } end + +local function set_f_match (lib, flg) +return { + Name = "Function match", + Func = lib.match, + --{subj, patt, st,cf,ef}, { results } + { {"abcd", ".+", 5}, { N } }, -- failing st + { {"abc", "^abc"}, {"abc" } }, -- anchor + { {"^abc", "^abc", N,N,flg.NOTBOL}, { N } }, -- anchor + ef +} +end + return function (libname) local lib = require (libname) + local flags = lib.flags () return { + set_f_match (lib, flags), set_f_gmatch (lib), } end |