!7

module LLtoNL > DynRecordingTextArea {
  S output;
  transient S calcedInput;
  
  visualize {
    ret jvsplit(
      jSection("INPUT (LL)", super.visualize()),
      jSection("OUTPUT (NL)", dm_fieldTextArea('output)));
  }
  
  start {
    onChangeAndNow(r calc);
  }
  
  void calc enter {
    if (neq(text, calcedInput)) {
      new LS out;
      calcedInput = text;
      for (S s : tlft(text)) {
        LS tok = javaTokWithAllBrackets(s);
        continue unless isSquareBracketed(second(tok)) && eq(":", get(tok, 3);
        tok = subList(tok, 4);
        out.add(join(tok));
      }
      setField(output := lines(out));
    }
  }
}