sclass WeakRefVMBusListener extends WeakReference implements IF2<S, O, O> {
  Set listeners; // where we were added
  
  *(Set *listeners, O listener) { super(listener); }
  *(Set *listeners, IVF2<S, O> listener) { super(listener); }
  
  public O get(S msg, O arg) {
    O listener = get();
    if (listener == null) {
      ifdef WeakRefVMBusListener_debug
        print WeakRefVMBusListener_debug("Removing VM bus listener");
      endifdef
      remove(listeners, this);
      null;
    }
    ret callF(listener, msg, arg);
  }
}