- enable header to output graphs attributes and graph-wide node and edge

[helm.git] / components / extlib / graphvizPp.mli

diff --git a/components/extlib/graphvizPp.mli b/components/extlib/graphvizPp.mli
index fa635a9719a9d18111a62cfd93b10443aa0e822b..a10831dca7f959d2454973bed2e097ac7d77ec2d 100644 (file)
--- a/components/extlib/graphvizPp.mli
+++ b/components/extlib/graphvizPp.mli
@@ -31,7 +31,15 @@ type attribute = string * string  (* <key, value> pair *)
 
 module type GraphvizFormatter =
   sig
-    val header: ?name:string -> Format.formatter -> unit
+    (** @param name graph name
+     * @param graph_attrs graph attributes
+     * @param node_attrs graph-wide node attributes
+     * @param edge_attrs graph-wide edge attributes *)
+    val header:
+      ?name:string -> ?graph_attrs:(attribute list) ->
+      ?node_attrs:(attribute list) -> ?edge_attrs:(attribute list) ->
+      Format.formatter ->
+        unit
     val node: string -> ?attrs:(attribute list) -> Format.formatter -> unit
     val edge:
       string -> string -> ?attrs:(attribute list) -> Format.formatter ->