sclass WeakCompactHashSet<A> extends AbstractSet<A> {
  Set<WeakReference> set = new CompactHashSet;
  ReferenceQueue<A> queue = new ReferenceQueue<A>();
  
  sclass MyWeakReference<A> extends WeakReference<A> {
    int hash;
    
    *() {}
    *(O o, ReferenceQueue<A> queue) {
      super(o, queue);
      hash = o.hashCode();
    }
    
    public int hashCode() { ret hash; }
    public bool equals(O o) {
      ret o instanceof MyWeakReference
        && eq(get(), ((MyWeakReference) o).get());
    }
  }
  
  void reap() {
    MyWeakReference ref;
    while (ref = (MyWeakReference) queue.poll()) != null)
      set.remove(ref);
  }
  
  public int size() { reap(); ret set.size(); }
  
  public Iterator<A> iterator() { ret keys(map).iterator(); }
  
  public bool contains(O o) {
    reap();
    ret set.contains(new MyWeakReference(o, queue));
  }
  
  public bool add(A a) {
    reap();
    ret set.add(new MyWeakReference(a, queue));
  }
  
  public bool remove(O o) {
    reap();
    ret set.remove(new MyWeakReference(o, queue));
  }
}