sS replacePrefixes(S s, S... replacements) {
  for (PairS p : listToPairs(replacements))
    s = replacePrefix(p.a, p.b, s);
  ret s;
}