!7

module ModuleRAMSizes > DynObjectTable<Map> {
  start {
    doEveryAndNow(60.0, r calcIt);
  }
  
  void calcIt {
    temp enter();
    new L<Map> l;
    for (O mod : dm_listModules()) {
      S size = "?";
      pcall-short { size = toK(dm_moduleSize(mod)) + " K"; }
      l.add(litorderedmap(
        Name := dm_moduleName(mod),
        Size := size));
    }
    setData(l);
  }
}