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;`

}

val sexp_of_one : one -> Sexplib.Sexp.t

type t = one list

val sexp_of_t : one Core.Std.List.t -> Sexplib.Sexp.t