val is_debug : (t, bool) Fieldslib.Field.t
val is_function : (t, bool) Fieldslib.Field.t
val name : (t, string) Fieldslib.Field.t
val fold :
init:'acc__0 ->
name:('acc__0 -> (t, string) Fieldslib.Field.t -> 'acc__1) ->
is_function:('acc__1 -> (t, bool) Fieldslib.Field.t -> 'acc__2) ->
is_debug:('acc__2 -> (t, bool) Fieldslib.Field.t -> 'acc__3) ->
locations:
('acc__3 -> (t, location * location list) Fieldslib.Field.t -> 'acc__4) ->
'acc__4
val make_creator :
name:
((t, string) Fieldslib.Field.t ->
'acc__0 ->
('input__ -> string) * 'acc__1) ->
is_function:
((t, bool) Fieldslib.Field.t -> 'acc__1 -> ('input__ -> bool) * 'acc__2) ->
is_debug:
((t, bool) Fieldslib.Field.t -> 'acc__2 -> ('input__ -> bool) * 'acc__3) ->
locations:
((t, location * location list) Fieldslib.Field.t ->
'acc__3 ->
('input__ -> location * location list) * 'acc__4) ->
'acc__0 ->
('input__ -> t) * 'acc__4
val create :
name:string ->
is_function:bool ->
is_debug:bool ->
locations:(location * location list) ->
t
val map :
name:((t, string) Fieldslib.Field.t -> string) ->
is_function:((t, bool) Fieldslib.Field.t -> bool) ->
is_debug:((t, bool) Fieldslib.Field.t -> bool) ->
locations:
((t, location * location list) Fieldslib.Field.t ->
location * location list) ->
t
val iter :
name:((t, string) Fieldslib.Field.t -> unit) ->
is_function:((t, bool) Fieldslib.Field.t -> unit) ->
is_debug:((t, bool) Fieldslib.Field.t -> unit) ->
locations:((t, location * location list) Fieldslib.Field.t -> unit) ->
unit
val for_all :
name:((t, string) Fieldslib.Field.t -> bool) ->
is_function:((t, bool) Fieldslib.Field.t -> bool) ->
is_debug:((t, bool) Fieldslib.Field.t -> bool) ->
locations:((t, location * location list) Fieldslib.Field.t -> bool) ->
bool
val exists :
name:((t, string) Fieldslib.Field.t -> bool) ->
is_function:((t, bool) Fieldslib.Field.t -> bool) ->
is_debug:((t, bool) Fieldslib.Field.t -> bool) ->
locations:((t, location * location list) Fieldslib.Field.t -> bool) ->
bool
val to_list :
name:((t, string) Fieldslib.Field.t -> 'elem__) ->
is_function:((t, bool) Fieldslib.Field.t -> 'elem__) ->
is_debug:((t, bool) Fieldslib.Field.t -> 'elem__) ->
locations:((t, location * location list) Fieldslib.Field.t -> 'elem__) ->
'elem__ list
val map_poly :
([< `Read | `Set_and_create ], t, 'x0) Fieldslib.Field.user ->
'x0 list