compiler.cfg.graphviz & compiler.cfg.gvn.testing: png -> svg

db4
Alex Vondrak 2011-07-30 18:58:50 -07:00 committed by John Benediktsson
parent 0bcff5d642
commit 270de14e22
2 changed files with 2 additions and 2 deletions

View File

@ -60,7 +60,7 @@ IN: compiler.cfg.graphviz
: draw-cfg ( cfg pass pass# -- cfg )
[ dup cfgviz ]
[ name>> "After " prepend =label ]
[ number>string png ]
[ number>string svg ]
tri* ;
SYMBOL: passes

View File

@ -65,7 +65,7 @@ SYMBOL: iteration
: draw-annotated-cfg ( -- )
iteration-dir [
cfg get cfgviz add-gvns
basic-block# number>string "bb" prepend png
basic-block# number>string "bb" prepend svg
] with-directory ;
: annotate-gvn ( -- )