static IConceptIndex simpleConceptIndex(final Runnable r) {
  ret new IConceptIndex {
    void update(Concept c) { pcallF(r); }
    void remove(Concept c) { pcallF(r); }
  };
}