X-Git-Url: http://git.nguyen.vg/gitweb/?p=tatoo.git;a=blobdiff_plain;f=src%2Fhtml.mli;h=a6cd2121c6a78b92190bd1219a46462abe48adba;hp=48551f7c71811fd804eb4016d8bb23bc06886675;hb=35abea737ead2d4fd121d0cb8bdbda38cfcaa8d3;hpb=78d247dc5e6d5e64a4ab848702c23ce81b6fc615

diff --git a/src/html.mli b/src/html.mli
index 48551f7..a6cd212 100644
--- a/src/html.mli
+++ b/src/html.mli
@@ -1,5 +1,6 @@
 val trace : ?msg:string -> int -> int -> StateSet.t -> StateSet.t  -> unit
-(** [trace nid round d t msg] records a the message [msg] together with the a node preorder
-    [nid], the [round], the [d]one set and the [t]odo set *)
+(** [trace nid round d t msg] records the message [msg] together
+    with the a node preorder [nid], the [round], the [d]one set and
+    the [t]odo set *)
 val finalize_node : int -> int -> bool -> unit
 val gen_trace : Ata.t -> (module Tree.S with type t = 'a) -> 'a -> unit