Module Raw_monitor.Pretty

module Pretty: sig .. end

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 : one -> Sexplib.Sexp.t

type t = one list

val sexp_of_t : one list -> Sexplib.Sexp.t