!7

sclass Node {
  S text;
  new L<Node> children;
  
  toString { ret text; }
}

p-exp {
  S input = first(mL("Monolog examples"));
  new Node root;
  root.text = input;
  showFrame(jDynamicTree(root, func(Node n) -> L<Node> { n.children }));
}