!7

sclass SleepingThreadsDump extends DynModule {
  S result;
  transient JTextArea textArea;

  JComponent visualize() {
    ret northAndCenterWithMargins(
      jbutton("Do it", rThread doIt),
      textArea = typeWriterTextArea("Results will go here"));
  }
  
  void doIt {
    temp enter();
    setTextCaret0(textArea, renderSleepingThreadsWithStackTraces());
  }
}