sig
val someone_is_listening : ('a Raw_monitor.t_, bool) Fieldslib.Field.t
val has_seen_error : ('a Raw_monitor.t_, bool) Fieldslib.Field.t
val errors :
('execution_context Raw_monitor.t_, (exn, 'execution_context) Raw_tail.t)
Fieldslib.Field.t
val parent :
('execution_context Raw_monitor.t_,
'execution_context Raw_monitor.t_ option)
Fieldslib.Field.t
val id : ('a Raw_monitor.t_, int) Fieldslib.Field.t
val here :
('a Raw_monitor.t_, Core.Std.Source_code_position.t option)
Fieldslib.Field.t
val name : ('a Raw_monitor.t_, Core.Std.Info.t) Fieldslib.Field.t
end