!7

sclass MatchInput > DynPrintLogWithInput {
  transient Pair<S, L<ParseResult1>> lastResults;
  
  start {
    dm_useLocallyCopiedMechLists();
    
    // In case lists change
    doEvery(5000, r { update(inputChooser.input() });
  }
  
  void update(S s) {
    L<S> tokInput = printStruct(javaTokWithAngleBracketsC(s));
    L<ParseResult1> results = ai_parser1_multipleCategories(s, "<sentence>", "<noun>", "<verb_phrase>");

    S rendered = ai_renderParseResults(results);
    bool shouldPrint = lastResults == null || neq(rendered, ai_renderParseResults(lastResults.b));
    lastResults = pair(s, results);
    if (shouldPrint) print("\n> " + s + "\n" + rendered);
  }
}