!7

set flag WeakRefVMBusListener_debug.

cprint2 TestWeakRefVMBusListener {
  start-thread {
    S msg = "yoyoyo";
    
    repeat 3 {
      vmBus_onMessage_weakRef(msg, arg -> enter {
        print("Got arg: " + arg);
      });
    }
    
    int i = 0;
    repeat 10 {
      vmBus_send(msg, print(++i));
      sleepSeconds(1);
    }
    
    print("GC");
    gc();
    
    repeat 10 {
      vmBus_send(msg, print(++i));
      sleepSeconds(1);
    }
  }
}