Up

Module If_then_else

Signature

type 'a t = 'a Types.If_then_else.t = {
main
: 'a Types.Node.t ;
test
: bool Types.Node.t ;
test_change
: unit Types.Node.t ;
mutable current_branch
: 'a Types.Node.t Uopt.t ;
then_
: 'a Types.Node.t ;
else_
: 'a Types.Node.t ;
}
val sexp_of_t : ('a -> Sexplib.Sexp.t) -> 'a t -> Sexplib.Sexp.t