Refactor the run module, moving out of the Make functor everything that can be moved...
[tatoo.git] / src / html_trace.mli
1 val gen_trace : Ata.t -> StateSet.t array list -> (module Tree.S with type t = 'a) -> 'a -> unit