static S dropSuffix(S suffix, S s) {
  ret nempty(suffix) && endsWith(s, suffix) ? s.substring(0, l(s)-l(suffix)) : s;
}