sbool mmo2_match(MMOPattern pattern, S s) {
  ret mmo2_match(pattern, s, false, false);
}

sbool mmo2_match(MMOPattern pattern, S s, bool startOfLine, bool endOfLine) {
  ifdef mmo2_match_debug
    printFunctionCall mmo2_match_debug(pattern, s, startOfLine, endOfLine);
  endifdef
  if (pattern == null) false;
  S s2 = trim(s);
  if (pattern cast MMOPattern.StartOfLine)
    ret mmo2_match(pattern.p, s2, true, endOfLine);
  if (pattern cast MMOPattern.EndOfLine)
    ret mmo2_match(pattern.p, s2, startOfLine, true);
  if (pattern cast MMOPattern.Phrase) {
    S p = pattern.phrase;
    if (pattern.quoted) ret cicWithSmartWordBoundary(s2, p);
    if (startsWith(p, "#")) ret eqic(p, s2);
    ret match3_startOrEndOfLine(p, s2, startOfLine, endOfLine);
  }
  if (pattern cast MMOPattern.And)
    ret all(pattern.l, pat -> mmo2_match(pat, s2, startOfLine, endOfLine));
  if (pattern cast MMOPattern.Or)
    ret any(pattern.l, pat -> mmo2_match(pat, s2, startOfLine, endOfLine));
  if (pattern cast MMOPattern.Not)
    ret !mmo2_match(pattern.p, s2, startOfLine, endOfLine);
  fail("what. " + pattern);
}

sbool mmo2_match(S pattern, S s) {
  ret mmo2_match(mmo2_parsePattern(pattern), s);
}