Module `Util.Sexp_trace`

NOTE taken from kv-lite/trace.ml

type op = string * [ `Insert of string | `Delete | `Find of string option ]

val op_of_sexp : Ppx_sexp_conv_lib.Sexp.t -> op
val sexp_of_op : op -> Ppx_sexp_conv_lib.Sexp.t

type ops = op list

val ops_of_sexp : Ppx_sexp_conv_lib.Sexp.t -> ops
val sexp_of_ops : ops -> Ppx_sexp_conv_lib.Sexp.t

val append : Stdlib.out_channel -> op -> unit
val write : string -> ops -> unit
val read : string -> ops