sS lambda0MapLike hijackPrint(Runnable r) {
  ret hijackPrint((O) r);
}

sS hijackPrint(O r) {
  final new StringBuilder buf;
  O old = interceptPrintInThisThread(new F1<S, Bool>() {
    public Bool get(S s) {
      buf.append(s);
      false;
    }
  });
  try {
    callF(r);
    ret str(buf);
  } finally {
    interceptPrintInThisThread(old);
  }
}