static DialogIO talkToThisVM() {
  ret new talkToThisVM_IO;
}

sclass talkTo_IO extends DialogIO { 
  L<S> answers = ll(thisVMGreeting());
  
  bool isLocalConnection() { true; }
  bool isStillConnected() { true; }
  
  void sendLine(S line) {
    answers.add(or2(sendToThisVM(line), "?"));
  }
  
  S readLineImpl() ctex {
    ret popFirst(answers);
  }
  
  void close {}
  Socket getSocket() { null; }
}