!7

sclass Entry {
  S text;
  S annotation;
}

cmodule QuickAnnotator > DynObjectTable<Entry> {
  // API
  
  void setData(Collection<PairS> l) {
    setList(map(l, p -> nu Entry(text := p.a, annotation := p.b)));
  }
  
  void setData(SS map) {
    setData(mapToPairs(map));
  }
  
  void setItems(Collection<S> l) {
    setData(map(l, s -> pair(s, "")));
  }
}