module Fields: sig
.. end
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