sS addDefaultProtocolToURL(S protocol, S url) {
  if (empty(url)) ret url;
  if (regexpFindIC("^[a-z]+://", url)) ret url;
  protocol = dropSuffix(":", dropSuffix("//", protocol));
  ret protocol + ":" + addPrefix("//", url);
}