watch-gvn-cfg ( path cfg -- )

Vocabulary

compiler.cfg.gvn.testing

Inputs

path	an object
cfg	an object

Outputs

None

Definition

USING: compiler.cfg.graphviz compiler.cfg.gvn continuations
namespaces ;

IN: compiler.cfg.gvn.testing

: watch-gvn-cfg ( path cfg -- )
    annotate-gvn [
        { value-numbering } passes
        [ 0 iteration [ watch-cfg ] with-variable ]
        with-variable
    ] [ reset-gvn ] finally ;