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