!752

answer {
  if (swic(s, "nl ")) exceptionToUser {
    s = dropPrefixIgnoreCase("nl ", s);
    Lisp tree = nlParse(s);
    S un = nlUnparse(tree);
    ret str(tree + "\n" + un);
  }
}