svoid tok_compactModules(LS tok) {
  for (S kw : ll("cprint", "cprint2")) {
    jreplace(tok, kw + " {", kw + " " + stefansOS_defaultModuleClassName() + " {");
    jreplace(tok, kw + " <id> {", "cmodule2 $2 > DynPrintLog {");
  }
  
  if (jreplace_multi(tok, ll("cmodule", "compact module"), "module")) {
    print("compact modules");
    includeInMainLoaded(tok, "!include once #1020738\n");
  }
  
  if (jreplace_multi(tok, ll("cmodule2 <id>", "cmodule2 >"), "module $2"))
    includeInMainLoaded(tok, "!include once #1029928\n");
}