sS assertRegexp(S regexp, S s) {
  if (!regexpMatches(regexp, s))
    fail("Regexp doesn't match: " + regexp + " on " + quote(s));
  ret s;
}