!7

!include once #1021761 // Gazelle Fakery
 
set flag DynModule.

cmodule AllGazelleTests > DynSingleFunctionWithPrintLog {
  S performOnly;
  
  transient O[] flags = litparams(
    debugSorting := true,
    useRepeat_v2 := true);
  
  start {
    setFunctionName("Run Tests");
  }
  
  visualize {
    ret centerAndSouthWithMargin(super.visualize(),
      withLabel("Perform only test:", onEnter(
        dm_textField('performOnly), rThread doIt)));
  }
  
  void doIt {
    dm_useLocalMechListCopies();
    
    ErrorCounter errorCounter = gazelle_performMultipleTests(mL_raw("Gazelle Tests"),
      paramsPlus(flags,
        +performOnly));
    setModuleName(errorCounter.toString_short() + " - " + dm_originalModuleName());
  }
}