watch-optimizer* ( path quot -- )

Vocabulary

compiler.cfg.graphviz

Inputs

path	an object
quot	an object

Outputs

None

Definition

USING: compiler.cfg.debugger kernel sequences ;

IN: compiler.cfg.graphviz

: watch-optimizer* ( path quot -- )
    test-builder dup length 1 =
    [ first watch-cfg ] [ watch-cfgs ] if ;