sig
  val iter :
    'a Raw_monitor.t_ ->
    name:(([< `Read | `Set_and_create ], 'b Raw_monitor.t_, Core.Std.Info.t)
          Fieldslib.Field.t_with_perm ->
          'a Raw_monitor.t_ -> Core.Std.Info.t -> 'c) ->
    here:(([< `Read | `Set_and_create ], 'd Raw_monitor.t_,
           Core.Std.Source_code_position.t option)
          Fieldslib.Field.t_with_perm ->
          'a Raw_monitor.t_ -> Core.Std.Source_code_position.t option -> 'e) ->
    id:(([< `Read | `Set_and_create ], 'f Raw_monitor.t_, int)
        Fieldslib.Field.t_with_perm -> 'a Raw_monitor.t_ -> int -> 'g) ->
    parent:(([< `Read | `Set_and_create ], 'h Raw_monitor.t_,
             'h Raw_monitor.t_ option)
            Fieldslib.Field.t_with_perm ->
            'a Raw_monitor.t_ -> 'a Raw_monitor.t_ option -> 'i) ->
    errors:(([< `Read | `Set_and_create ], 'j Raw_monitor.t_,
             (exn, 'j) Raw_tail.t)
            Fieldslib.Field.t_with_perm ->
            'a Raw_monitor.t_ -> (exn, 'a) Raw_tail.t -> 'k) ->
    has_seen_error:(([< `Read | `Set_and_create ], 'l Raw_monitor.t_, bool)
                    Fieldslib.Field.t_with_perm ->
                    'a Raw_monitor.t_ -> bool -> 'm) ->
    someone_is_listening:(([< `Read | `Set_and_create ], 'n Raw_monitor.t_,
                           bool)
                          Fieldslib.Field.t_with_perm ->
                          'a Raw_monitor.t_ -> bool -> 'o) ->
    kill_index:(([< `Read | `Set_and_create ], 'p Raw_monitor.t_,
                 Kill_index.t)
                Fieldslib.Field.t_with_perm ->
                'a Raw_monitor.t_ -> Kill_index.t -> 'q) ->
    'q
  val fold :
    'a Raw_monitor.t_ ->
    init:'b ->
    name:('b ->
          ([< `Read | `Set_and_create ], 'c Raw_monitor.t_, Core.Std.Info.t)
          Fieldslib.Field.t_with_perm ->
          'a Raw_monitor.t_ -> Core.Std.Info.t -> 'd) ->
    here:('d ->
          ([< `Read | `Set_and_create ], 'e Raw_monitor.t_,
           Core.Std.Source_code_position.t option)
          Fieldslib.Field.t_with_perm ->
          'a Raw_monitor.t_ -> Core.Std.Source_code_position.t option -> 'f) ->
    id:('f ->
        ([< `Read | `Set_and_create ], 'g Raw_monitor.t_, int)
        Fieldslib.Field.t_with_perm -> 'a Raw_monitor.t_ -> int -> 'h) ->
    parent:('h ->
            ([< `Read | `Set_and_create ], 'i Raw_monitor.t_,
             'i Raw_monitor.t_ option)
            Fieldslib.Field.t_with_perm ->
            'a Raw_monitor.t_ -> 'a Raw_monitor.t_ option -> 'j) ->
    errors:('j ->
            ([< `Read | `Set_and_create ], 'k Raw_monitor.t_,
             (exn, 'k) Raw_tail.t)
            Fieldslib.Field.t_with_perm ->
            'a Raw_monitor.t_ -> (exn, 'a) Raw_tail.t -> 'l) ->
    has_seen_error:('l ->
                    ([< `Read | `Set_and_create ], 'm Raw_monitor.t_, bool)
                    Fieldslib.Field.t_with_perm ->
                    'a Raw_monitor.t_ -> bool -> 'n) ->
    someone_is_listening:('n ->
                          ([< `Read | `Set_and_create ], 'o Raw_monitor.t_,
                           bool)
                          Fieldslib.Field.t_with_perm ->
                          'a Raw_monitor.t_ -> bool -> 'p) ->
    kill_index:('p ->
                ([< `Read | `Set_and_create ], 'q Raw_monitor.t_,
                 Kill_index.t)
                Fieldslib.Field.t_with_perm ->
                'a Raw_monitor.t_ -> Kill_index.t -> 'r) ->
    'r
end