Attention une mise à jour du service Gitlab va être effectuée le mardi 30 novembre entre 17h30 et 18h00. Cette mise à jour va générer une interruption du service dont nous ne maîtrisons pas complètement la durée mais qui ne devrait pas excéder quelques minutes. Cette mise à jour intermédiaire en version 14.0.12 nous permettra de rapidement pouvoir mettre à votre disposition une version plus récente.

Commit 6fe5403e authored by Bruno Guillaume's avatar Bruno Guillaume
Browse files

more canonical dot output

parent 39cc192a
......@@ -852,7 +852,7 @@ module G_graph = struct
bprintf buff "digraph G {\n";
(* bprintf buff " rankdir=LR;\n"; *)
bprintf buff " node [shape=none];\n";
(* bprintf buff " node [shape=none];\n"; *)
(* nodes *)
Gid_map.iter
......@@ -883,13 +883,13 @@ module G_graph = struct
(fun id node ->
begin
match G_node.get_succ node with
| None -> ()
| Some s when !Global.debug ->
bprintf buff " N_%s -> N_%s [label=\"SUCC\", style=dotted, fontcolor=lightblue, color=lightblue]; {rank=same; N_%s; N_%s };\n"
(Gid.to_string id) (Gid.to_string s) (Gid.to_string id) (Gid.to_string s)
| Some s ->
(* | Some s ->
bprintf buff " N_%s -> N_%s [style=invis]; {rank=same; N_%s; N_%s };\n"
(Gid.to_string id) (Gid.to_string s) (Gid.to_string id) (Gid.to_string s)
(Gid.to_string id) (Gid.to_string s) (Gid.to_string id) (Gid.to_string s) *)
| _ -> ()
end
) graph.map;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment