!7

cmodule SingleWordMechListsIndex > DynPrintLog {
  transient volatile MultiMap<S> index;
  transient volatile bool couldNotLoad;
  
  start {
    thread {
      try {
        dm_useLocalMechListCopies();
        LS lists = mechListsWithSingleWords();
        index = indexMechLists(lists);
        print("Indexed " + n2(lists, "list") + ". " + n2(l(index), "entry", "entries"));
        dm_registerAs('aMechListIndex);
      } on fail {
        set couldNotLoad;
      }
    }
  }
  
  // API
  
  Map<S, LS> getIndex() {
    do {
      if (couldNotLoad) null;
      if (index != null) ret index.data;
      sleep(100);
    } while (licensed());
    null;
  }
  
  LS mechListsForEntry(S s) {
    ret mapGet(getIndex(), s);
  }
}