sig
  type one = {
    name : Core.Std.Info.t;
    here : Core.Std.Source_code_position.t option;
    id : int;
    has_seen_error : bool;
    someone_is_listening : bool;
    kill_index : Kill_index.t;
  }
  val sexp_of_one : Raw_monitor.Pretty.one -> Sexplib.Sexp.t
  type t = Raw_monitor.Pretty.one list
  val sexp_of_t : Raw_monitor.Pretty.one list -> Sexplib.Sexp.t
end