--- sml/trunk/src/MLRISC/flowgraph/cfg.sig 2002/03/06 15:29:24 1117 +++ sml/trunk/src/MLRISC/flowgraph/cfg.sig 2002/03/06 15:30:25 1118 @@ -177,6 +177,7 @@ *========================================================================*) val show_block : Annotations.annotations -> block -> string val show_edge : edge_info -> string + val dumpBlock : (TextIO.outstream * cfg) -> node -> unit val dump : (TextIO.outstream * string * cfg) -> unit end