static S hcomment(S text) {
  ret "<!-- " + text + " -->";
}