Module Writer_result.Tree

type 'a t =
| Empty
| Leaf of 'a
| Node of 'a t * 'a t
val t_of_sexp : 'a. ( Ppx_sexp_conv_lib.Sexp.t -> 'a ) -> Ppx_sexp_conv_lib.Sexp.t -> 'a t
val sexp_of_t : 'a. ( 'a -> Ppx_sexp_conv_lib.Sexp.t ) -> 'a t -> Ppx_sexp_conv_lib.Sexp.t
val to_list : 'a t -> 'a0 list
val fold : 'a t -> init:'b -> f:( 'c -> 'd -> 'e ) -> 'f
val return : 'a -> 'b t
val append : 'a t -> 'a t -> 'a t