val addr : (t, Bap.Std.addr) Fieldslib.Field.tval name : (t, string option) Fieldslib.Field.tval fold :
init:'acc__0 ->
name:('acc__0 -> (t, string option) Fieldslib.Field.t -> 'acc__1) ->
addr:('acc__1 -> (t, Bap.Std.addr) Fieldslib.Field.t -> 'acc__2) ->
'acc__2val make_creator :
name:
((t, string option) Fieldslib.Field.t ->
'acc__0 ->
('input__ -> string option) * 'acc__1) ->
addr:
((t, Bap.Std.addr) Fieldslib.Field.t ->
'acc__1 ->
('input__ -> Bap.Std.addr) * 'acc__2) ->
'acc__0 ->
('input__ -> t) * 'acc__2val create : name:string option -> addr:Bap.Std.addr -> tval map :
name:((t, string option) Fieldslib.Field.t -> string option) ->
addr:((t, Bap.Std.addr) Fieldslib.Field.t -> Bap.Std.addr) ->
tval iter :
name:((t, string option) Fieldslib.Field.t -> unit) ->
addr:((t, Bap.Std.addr) Fieldslib.Field.t -> unit) ->
unitval for_all :
name:((t, string option) Fieldslib.Field.t -> bool) ->
addr:((t, Bap.Std.addr) Fieldslib.Field.t -> bool) ->
boolval exists :
name:((t, string option) Fieldslib.Field.t -> bool) ->
addr:((t, Bap.Std.addr) Fieldslib.Field.t -> bool) ->
boolval to_list :
name:((t, string option) Fieldslib.Field.t -> 'elem__) ->
addr:((t, Bap.Std.addr) Fieldslib.Field.t -> 'elem__) ->
'elem__ listval map_poly :
([< `Read | `Set_and_create ], t, 'x0) Fieldslib.Field.user ->
'x0 listmodule Direct : sig ... end