NiL
sigprocmask(op, &mask, NiL);
matchprint(match, nmatch, nsub, NiL, test);
extract(tabs, spec, re, s, ans, msg, NiL, NiL, 0, 0, skip, level, test);
report("failed", "regfree", re, NiL, -1, msg, flags, test);
if (regerror(REG_VERSIONID, NiL, pat, sizeof(pat)) > 0)
bad("out of space [discipline string stream]\n", NiL, NiL, 0, 0);
#ifndef NiL
bad("too many fields\n", NiL, NiL, 0, 0);
bad("NIL spec\n", NiL, NiL, 0, 0);
bad("nmatch must be < 100\n", NiL, NiL, 0, 0);
bad("locale must be nested\n", NiL, NiL, 0, 0);
bad("locale nesting not supported\n", NiL, NiL, 0, 0);
bad("locale field expected\n", NiL, NiL, 0, 0);
bad("invalid {...} nesting\n", NiL, NiL, 0, 0);
bad("bad spec\n", spec, NiL, 0, test);
bad("too few fields\n", NiL, NiL, 0, test);
bad("NIL answer\n", NiL, NiL, 0, test);
extract(tabs, line, re, s, ans, msg, NiL, NiL, 0, 0, skip, level, test|TEST_OK);
cret = regsubcomp(&preg, p, NiL, 0, 0);
cret = regsubcomp(&preg, p, NiL, 0, 0);
if (catchfree(&preg, flags, tabs, line, re, s, ans, msg, NiL, NiL, 0, 0, skip, level, test))
catchfree(&preg, flags, tabs, line, re, s, ans, msg, NiL, NiL, 0, 0, skip, level, test);
skip = extract(tabs, line, re, s, ans, msg, "OK", NiL, 0, 0, skip, level, test|TEST_DELIMIT);
report("re_nsub incorrect", fun, re, NiL, -1, msg, flags, test);
skip = extract(tabs, line, re, s, ans, msg, "OK", NiL, 0, 0, skip, level, test|TEST_DELIMIT);
report("failed", fun, re, NiL, -1, msg, flags, test);
catchfree(&preg, flags, tabs, line, re, s, ans, msg, NiL, NiL, 0, 0, skip, level, test);
skip = extract(tabs, line, re, s, ans, msg, codes[got].name, NiL, 0, 0, skip, level, test|TEST_DELIMIT);
report("failed", fun, re, NiL, -1, msg, flags, test);
skip = extract(tabs, line, re, s, ans, msg, codes[got].name, NiL, 0, 0, skip, level, test|TEST_DELIMIT);
report("failed: invalid error code", NiL, re, NiL, -1, msg, flags, test);
skip = extract(tabs, line, re, s, ans, msg, codes[got].name, NiL, 0, 0, skip, level, test|TEST_DELIMIT);
report("should fail and did", fun, re, NiL, -1, msg, flags, test);
skip = extract(tabs, line, re, s, ans, msg, "NOMATCH", NiL, 0, 0, skip, level, test|TEST_DELIMIT);
skip = extract(tabs, line, re, s, ans, msg, NiL, match, nmatch, nsub, skip, level, test|TEST_DELIMIT);
skip = extract(tabs, line, re, s, ans, msg, "NOMATCH", NiL, 0, nsub, skip, level, test|TEST_DELIMIT);
skip = extract(tabs, line, re, s, ans, msg, NiL, match, nmatch, nsub, skip, level, test|TEST_DELIMIT);
matchprint(match, nmatch, nsub, NiL, test);
skip = extract(tabs, line, re, s, ans, msg, NiL, NiL, 0, 0, skip, level, test);
report("failed: no match but match array assigned", NiL, re, s, nstr, msg, flags, test);
matchprint(match, nmatch, nsub, NiL, test);
if (catchfree(&preg, flags, tabs, line, re, s, ans, msg, NiL, NiL, 0, 0, skip, level, test))
skip = extract(tabs, line, re, s, ans, msg, NiL, match, nmatch, nsub, skip, level, test|TEST_OK);
skip = extract(tabs, line, re, s, ans, msg, NiL, match, nmatch, nsub, skip, level, test|TEST_DELIMIT);
if (catchfree(&preg, flags, tabs, line, re, s, ans, msg, NiL, NiL, 0, 0, skip, level, test))
report(comment, NiL, re, s, len, NiL, 0, test);
bad("invalid C \\ escape\n", s - 1, NiL, 0, 0);
bad("out of space [discipline string]\n", NiL, NiL, 0, 0);
report("callout failed", NiL, re, s, len, NiL, flags, test);
report("failed: match was", NiL, re, s, len, NiL, flags, test);
report("failed: match was", NiL, re, s, len, NiL, flags, test);
report("failed: overran match array", NiL, re, s, len, NiL, flags, test);
matchprint(match, nmatch + 1, nsub, NiL, test);