[tatoo.git] / src / auto / html.mli

val trace : int -> int -> ('a, Format.formatter, unit, unit) format4 -> 'a
val gen_trace : (module Tree.Sig.S with type t = 'a) -> 'a -> unit