// A: object type
// B: hash type (e.g. Long)
sclass UniquifyUsingHasher<A, B> {
  settable IF1<A, B> hasher;
  
  *(IF1<A, B> *hasher) {}
  
  new MultiMap<B, A> byHash;
  gettable new L<A> list;
  
  bool add(A a) {
    B hash = hasher.get(a);
    if (byHash.contains(hash, a)) false;
    byHash.put(hash, a);
    true;
  }
  
  bool addAll(Iterable<A> l) {
    bool change;
    fOr (A a : l)
      change |= add(a);
    ret change;
  }
  
  L<A> get() { ret list; }
}