Module Sequence.Step

type ('a, 's) t =
| Done
| Skip of 's
| Yield of 'a * 's
val sexp_of_t : ('a -> Base.Sexp.t) -> ('s -> Base.Sexp.t) -> ('a's) t -> Base.Sexp.t