!7

module DefinitionsPerWord > DynTextArea {
  transient S input;
  
  start {
    dm_onTopInputChangeAndNow_q(voidfunc(S s) {
      input = s;
      update();
    });
    doEvery(10.0, r updateMe);
  }
  
  void update {
    Map<S, LS> map = dm_getDefinitionsMap();
    new LS out;
    out.add(input + "\n");
    for (S word : words(input)) {
      LS defs = map.get(word);
      if (empty(defs)) defs = ll("?");
      for (S d : defs)
        out.add(word + " = " + d);
    }
    setText(lines(out));
  }
}