sclass ReliableSingleThread_Multi<A> {
  IVF1<A> processObject;
  int delay; // delay before changes are processed
  
  *(IVF1<A> *processObject) {}
  *(int *delay, IVF1<A> *processObject) {}
  
  // internal
  Set<A> changedObjects = synchroSet();
  ReliableSingleThread rst = new(r process);

  // notify of change in object
  void add(A a) {
    if (changedObjects.add(a))
      rst.trigger();
  }
  
  private void process {
    sleep(delay);
    for (A object : syncCloneAndClearList(changedObjects))
      pcallF(processObject, object);
  }
  
  void setEnter(IF0<AutoCloseable> enter) {
    rst.enter = enter;
  }
}