Up

Module First_arity

Signature

type (_, _, _) t =
| Arity1 : ('a -> unit, 'a -> 'r option, 'r) t
| Arity2 : ('a -> 'b -> unit, 'a -> 'b -> 'r option, 'r) t
| Arity3 : ('a -> 'b -> 'c -> unit, 'a -> 'b -> 'c -> 'r option, 'r) t
| Arity4 : ('a -> 'b -> 'c -> 'd -> unit, 'a -> 'b -> 'c -> 'd -> 'r option, 'r) t
val sexp_of_t : ('v_x__001_ -> Sexplib.Sexp.t) -> ('v_x__002_ -> Sexplib.Sexp.t) -> ('v_x__003_ -> Sexplib.Sexp.t) -> ('v_x__001_, 'v_x__002_, 'v_x__003_) t -> Sexplib.Sexp.t