58
58
(tm-define (plugin-eval name ses t . opts)
59
59
(with u (plugin-preprocess name ses t opts)
60
61
(with r (tree->stree (connection-eval name ses u))
61
63
(plugin-postprocess name ses r (cons :simplify-output opts)))))
63
65
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;