!7

set flag DynModule. // for transpilation

sclass RemoteJavaEval extends DynPrintLog {
  S computerID, expression;
  bool realEval;
  transient O value;
  transient JTextArea taInput;
  transient Throwable error;
  
  start {
    dm_requireModule("#1016578/AllOnlineComputers");
  }
  
  visualize {
    ret withMargin(jvsplit(
      northAndCenterWithMargin(
        withLabel("Computer to evaluate this on:", dm_onlineComputerSelectorComboBox(dm_fieldLiveValue('computerID))),
          centerAndEastWithMarginInbetween(
          onCtrlEnter(taInput = jEnableUndoRedo(typeWriterTextArea(expression)), rThread { evalIt(false) }),
          vstackWithSpacing(
            jbutton("Fresh", rThread { evalIt(true) }),
            jbutton("Eval", rThread { evalIt(false) }),
            withToolTip("Don't interpret", dm_fieldCheckBox("Real", 'realEval))))),
      super.visualize()));
  }
  
  void evalIt(bool fresh) {
    if (!isComputerID(computerID)) ret;
    afterwards { calculating = false; }
    print(dm_evalOnOtherMachine_optimizeIfMe(computerID, gtt(taInput), +realEval, +fresh));
  }
}