!7

sclass JavaParserModule > DynModule {
  transient SimpleLiveValue<S> output = new(S);
  transient SimpleLiveValue<S> input = new(S);
  transient ReliableSingleThread rst = new(r parse);

  visualize { ret jLiveValueWordWrapTypeWriterTextArea(output); }

  start { input.onChange(rTrigger(rst)); }

  void update { input.set(dm_interestingString()); }

  void parse {
    output.set("Parsing...");
    try {
      javaParseCompilationUnit(input!);
      output.set("Text parses as Java compilation unit");
    } catch e {
      output.set(firstLine(getInnerMessage(e)));
    }
  }
}