small print debugging tweaks.
This commit is contained in:
parent
5c09abeb18
commit
aad7b29c30
2 changed files with 3 additions and 2 deletions
|
@ -127,6 +127,7 @@ let accessible useful_nodes g_list =
|
|||
let exists_path nodes n1 n2 =
|
||||
List.mem n2 (accessible [n1] nodes)
|
||||
|
||||
(*
|
||||
open Format
|
||||
|
||||
let print_node print g =
|
||||
|
@ -142,5 +143,5 @@ let print_node print g =
|
|||
printf "@]@ ")
|
||||
g.g_depends_on;
|
||||
printf "@]"
|
||||
|
||||
*)
|
||||
|
||||
|
|
|
@ -44,7 +44,7 @@ load_printer "_build/obc/obc.d.cmo"
|
|||
load_printer "_build/obc/control.d.cmo"
|
||||
load_printer "_build/obc/obc_mapfold.d.cmo"
|
||||
load_printer "_build/main/mls2obc.d.cmo"
|
||||
load_printer "_build/minils/transformations/callgraph_mapfold.d.cmo"
|
||||
load_printer "_build/minils/transformations/callgraph.d.cmo"
|
||||
load_printer "_build/obc/c/c.d.cmo"
|
||||
load_printer "_build/obc/c/csubst.d.cmo"
|
||||
load_printer "_build/obc/obc_utils.d.cmo"
|
||||
|
|
Loading…
Reference in a new issue