`sig
val names : string list
val stack_size : (Core_gc.Stat.t, int) Fieldslib.Field.t
val top_heap_words : (Core_gc.Stat.t, int) Fieldslib.Field.t
val compactions : (Core_gc.Stat.t, int) Fieldslib.Field.t
val fragments : (Core_gc.Stat.t, int) Fieldslib.Field.t
val largest_free : (Core_gc.Stat.t, int) Fieldslib.Field.t
val free_blocks : (Core_gc.Stat.t, int) Fieldslib.Field.t
val free_words : (Core_gc.Stat.t, int) Fieldslib.Field.t
val live_blocks : (Core_gc.Stat.t, int) Fieldslib.Field.t
val live_words : (Core_gc.Stat.t, int) Fieldslib.Field.t
val heap_chunks : (Core_gc.Stat.t, int) Fieldslib.Field.t
val heap_words : (Core_gc.Stat.t, int) Fieldslib.Field.t
val major_collections : (Core_gc.Stat.t, int) Fieldslib.Field.t
val minor_collections : (Core_gc.Stat.t, int) Fieldslib.Field.t
val major_words : (Core_gc.Stat.t, float) Fieldslib.Field.t
val promoted_words : (Core_gc.Stat.t, float) Fieldslib.Field.t
val minor_words : (Core_gc.Stat.t, float) Fieldslib.Field.t
val fold :
init:'acc__ ->
minor_words:('acc__ ->
(Core_gc.Stat.t, float) Fieldslib.Field.t -> 'acc__) ->
promoted_words:('acc__ ->
(Core_gc.Stat.t, float) Fieldslib.Field.t -> 'acc__) ->
major_words:('acc__ ->
(Core_gc.Stat.t, float) Fieldslib.Field.t -> 'acc__) ->
minor_collections:('acc__ ->
(Core_gc.Stat.t, int) Fieldslib.Field.t -> 'acc__) ->
major_collections:('acc__ ->
(Core_gc.Stat.t, int) Fieldslib.Field.t -> 'acc__) ->
heap_words:('acc__ -> (Core_gc.Stat.t, int) Fieldslib.Field.t -> 'acc__) ->
heap_chunks:('acc__ -> (Core_gc.Stat.t, int) Fieldslib.Field.t -> 'acc__) ->
live_words:('acc__ -> (Core_gc.Stat.t, int) Fieldslib.Field.t -> 'acc__) ->
live_blocks:('acc__ -> (Core_gc.Stat.t, int) Fieldslib.Field.t -> 'acc__) ->
free_words:('acc__ -> (Core_gc.Stat.t, int) Fieldslib.Field.t -> 'acc__) ->
free_blocks:('acc__ -> (Core_gc.Stat.t, int) Fieldslib.Field.t -> 'acc__) ->
largest_free:('acc__ -> (Core_gc.Stat.t, int) Fieldslib.Field.t -> 'acc__) ->
fragments:('acc__ -> (Core_gc.Stat.t, int) Fieldslib.Field.t -> 'acc__) ->
compactions:('acc__ -> (Core_gc.Stat.t, int) Fieldslib.Field.t -> 'acc__) ->
top_heap_words:('acc__ ->
(Core_gc.Stat.t, int) Fieldslib.Field.t -> 'acc__) ->
stack_size:('acc__ -> (Core_gc.Stat.t, int) Fieldslib.Field.t -> 'acc__) ->
'acc__
val make_creator :
minor_words:((Core_gc.Stat.t, float) Fieldslib.Field.t ->
'compile_acc__ -> ('input__ -> float) * 'compile_acc__) ->
promoted_words:((Core_gc.Stat.t, float) Fieldslib.Field.t ->
'compile_acc__ -> ('input__ -> float) * 'compile_acc__) ->
major_words:((Core_gc.Stat.t, float) Fieldslib.Field.t ->
'compile_acc__ -> ('input__ -> float) * 'compile_acc__) ->
minor_collections:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
'compile_acc__ -> ('input__ -> int) * 'compile_acc__) ->
major_collections:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
'compile_acc__ -> ('input__ -> int) * 'compile_acc__) ->
heap_words:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
'compile_acc__ -> ('input__ -> int) * 'compile_acc__) ->
heap_chunks:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
'compile_acc__ -> ('input__ -> int) * 'compile_acc__) ->
live_words:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
'compile_acc__ -> ('input__ -> int) * 'compile_acc__) ->
live_blocks:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
'compile_acc__ -> ('input__ -> int) * 'compile_acc__) ->
free_words:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
'compile_acc__ -> ('input__ -> int) * 'compile_acc__) ->
free_blocks:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
'compile_acc__ -> ('input__ -> int) * 'compile_acc__) ->
largest_free:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
'compile_acc__ -> ('input__ -> int) * 'compile_acc__) ->
fragments:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
'compile_acc__ -> ('input__ -> int) * 'compile_acc__) ->
compactions:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
'compile_acc__ -> ('input__ -> int) * 'compile_acc__) ->
top_heap_words:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
'compile_acc__ -> ('input__ -> int) * 'compile_acc__) ->
stack_size:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
'compile_acc__ -> ('input__ -> int) * 'compile_acc__) ->
'compile_acc__ -> ('input__ -> Core_gc.Stat.t) * 'compile_acc__
val create :
minor_words:float ->
promoted_words:float ->
major_words:float ->
minor_collections:int ->
major_collections:int ->
heap_words:int ->
heap_chunks:int ->
live_words:int ->
live_blocks:int ->
free_words:int ->
free_blocks:int ->
largest_free:int ->
fragments:int ->
compactions:int -> top_heap_words:int -> stack_size:int -> Core_gc.Stat.t
val map :
minor_words:((Core_gc.Stat.t, float) Fieldslib.Field.t -> float) ->
promoted_words:((Core_gc.Stat.t, float) Fieldslib.Field.t -> float) ->
major_words:((Core_gc.Stat.t, float) Fieldslib.Field.t -> float) ->
minor_collections:((Core_gc.Stat.t, int) Fieldslib.Field.t -> int) ->
major_collections:((Core_gc.Stat.t, int) Fieldslib.Field.t -> int) ->
heap_words:((Core_gc.Stat.t, int) Fieldslib.Field.t -> int) ->
heap_chunks:((Core_gc.Stat.t, int) Fieldslib.Field.t -> int) ->
live_words:((Core_gc.Stat.t, int) Fieldslib.Field.t -> int) ->
live_blocks:((Core_gc.Stat.t, int) Fieldslib.Field.t -> int) ->
free_words:((Core_gc.Stat.t, int) Fieldslib.Field.t -> int) ->
free_blocks:((Core_gc.Stat.t, int) Fieldslib.Field.t -> int) ->
largest_free:((Core_gc.Stat.t, int) Fieldslib.Field.t -> int) ->
fragments:((Core_gc.Stat.t, int) Fieldslib.Field.t -> int) ->
compactions:((Core_gc.Stat.t, int) Fieldslib.Field.t -> int) ->
top_heap_words:((Core_gc.Stat.t, int) Fieldslib.Field.t -> int) ->
stack_size:((Core_gc.Stat.t, int) Fieldslib.Field.t -> int) ->
Core_gc.Stat.t
val iter :
minor_words:((Core_gc.Stat.t, float) Fieldslib.Field.t -> unit) ->
promoted_words:((Core_gc.Stat.t, float) Fieldslib.Field.t -> unit) ->
major_words:((Core_gc.Stat.t, float) Fieldslib.Field.t -> unit) ->
minor_collections:((Core_gc.Stat.t, int) Fieldslib.Field.t -> unit) ->
major_collections:((Core_gc.Stat.t, int) Fieldslib.Field.t -> unit) ->
heap_words:((Core_gc.Stat.t, int) Fieldslib.Field.t -> unit) ->
heap_chunks:((Core_gc.Stat.t, int) Fieldslib.Field.t -> unit) ->
live_words:((Core_gc.Stat.t, int) Fieldslib.Field.t -> unit) ->
live_blocks:((Core_gc.Stat.t, int) Fieldslib.Field.t -> unit) ->
free_words:((Core_gc.Stat.t, int) Fieldslib.Field.t -> unit) ->
free_blocks:((Core_gc.Stat.t, int) Fieldslib.Field.t -> unit) ->
largest_free:((Core_gc.Stat.t, int) Fieldslib.Field.t -> unit) ->
fragments:((Core_gc.Stat.t, int) Fieldslib.Field.t -> unit) ->
compactions:((Core_gc.Stat.t, int) Fieldslib.Field.t -> unit) ->
top_heap_words:((Core_gc.Stat.t, int) Fieldslib.Field.t -> unit) ->
stack_size:((Core_gc.Stat.t, int) Fieldslib.Field.t -> unit) -> unit
val for_all :
minor_words:((Core_gc.Stat.t, float) Fieldslib.Field.t -> bool) ->
promoted_words:((Core_gc.Stat.t, float) Fieldslib.Field.t -> bool) ->
major_words:((Core_gc.Stat.t, float) Fieldslib.Field.t -> bool) ->
minor_collections:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
major_collections:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
heap_words:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
heap_chunks:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
live_words:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
live_blocks:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
free_words:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
free_blocks:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
largest_free:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
fragments:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
compactions:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
top_heap_words:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
stack_size:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) -> bool
val exists :
minor_words:((Core_gc.Stat.t, float) Fieldslib.Field.t -> bool) ->
promoted_words:((Core_gc.Stat.t, float) Fieldslib.Field.t -> bool) ->
major_words:((Core_gc.Stat.t, float) Fieldslib.Field.t -> bool) ->
minor_collections:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
major_collections:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
heap_words:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
heap_chunks:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
live_words:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
live_blocks:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
free_words:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
free_blocks:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
largest_free:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
fragments:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
compactions:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
top_heap_words:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) ->
stack_size:((Core_gc.Stat.t, int) Fieldslib.Field.t -> bool) -> bool
val to_list :
minor_words:((Core_gc.Stat.t, float) Fieldslib.Field.t -> 'elem__) ->
promoted_words:((Core_gc.Stat.t, float) Fieldslib.Field.t -> 'elem__) ->
major_words:((Core_gc.Stat.t, float) Fieldslib.Field.t -> 'elem__) ->
minor_collections:((Core_gc.Stat.t, int) Fieldslib.Field.t -> 'elem__) ->
major_collections:((Core_gc.Stat.t, int) Fieldslib.Field.t -> 'elem__) ->
heap_words:((Core_gc.Stat.t, int) Fieldslib.Field.t -> 'elem__) ->
heap_chunks:((Core_gc.Stat.t, int) Fieldslib.Field.t -> 'elem__) ->
live_words:((Core_gc.Stat.t, int) Fieldslib.Field.t -> 'elem__) ->
live_blocks:((Core_gc.Stat.t, int) Fieldslib.Field.t -> 'elem__) ->
free_words:((Core_gc.Stat.t, int) Fieldslib.Field.t -> 'elem__) ->
free_blocks:((Core_gc.Stat.t, int) Fieldslib.Field.t -> 'elem__) ->
largest_free:((Core_gc.Stat.t, int) Fieldslib.Field.t -> 'elem__) ->
fragments:((Core_gc.Stat.t, int) Fieldslib.Field.t -> 'elem__) ->
compactions:((Core_gc.Stat.t, int) Fieldslib.Field.t -> 'elem__) ->
top_heap_words:((Core_gc.Stat.t, int) Fieldslib.Field.t -> 'elem__) ->
stack_size:((Core_gc.Stat.t, int) Fieldslib.Field.t -> 'elem__) ->
'elem__ list
val map_poly :
([< `Read | `Set_and_create ], Core_gc.Stat.t, 'x0) Fieldslib.Field.user ->
'x0 list
module Direct :
sig
val iter :
Core_gc.Stat.t ->
minor_words:((Core_gc.Stat.t, float) Fieldslib.Field.t ->
Core_gc.Stat.t -> float -> unit) ->
promoted_words:((Core_gc.Stat.t, float) Fieldslib.Field.t ->
Core_gc.Stat.t -> float -> unit) ->
major_words:((Core_gc.Stat.t, float) Fieldslib.Field.t ->
Core_gc.Stat.t -> float -> unit) ->
minor_collections:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> unit) ->
major_collections:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> unit) ->
heap_words:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> unit) ->
heap_chunks:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> unit) ->
live_words:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> unit) ->
live_blocks:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> unit) ->
free_words:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> unit) ->
free_blocks:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> unit) ->
largest_free:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> unit) ->
fragments:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> unit) ->
compactions:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> unit) ->
top_heap_words:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> unit) ->
stack_size:((Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> unit) ->
unit
val fold :
Core_gc.Stat.t ->
init:'acc__ ->
minor_words:('acc__ ->
(Core_gc.Stat.t, float) Fieldslib.Field.t ->
Core_gc.Stat.t -> float -> 'acc__) ->
promoted_words:('acc__ ->
(Core_gc.Stat.t, float) Fieldslib.Field.t ->
Core_gc.Stat.t -> float -> 'acc__) ->
major_words:('acc__ ->
(Core_gc.Stat.t, float) Fieldslib.Field.t ->
Core_gc.Stat.t -> float -> 'acc__) ->
minor_collections:('acc__ ->
(Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> 'acc__) ->
major_collections:('acc__ ->
(Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> 'acc__) ->
heap_words:('acc__ ->
(Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> 'acc__) ->
heap_chunks:('acc__ ->
(Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> 'acc__) ->
live_words:('acc__ ->
(Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> 'acc__) ->
live_blocks:('acc__ ->
(Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> 'acc__) ->
free_words:('acc__ ->
(Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> 'acc__) ->
free_blocks:('acc__ ->
(Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> 'acc__) ->
largest_free:('acc__ ->
(Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> 'acc__) ->
fragments:('acc__ ->
(Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> 'acc__) ->
compactions:('acc__ ->
(Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> 'acc__) ->
top_heap_words:('acc__ ->
(Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> 'acc__) ->
stack_size:('acc__ ->
(Core_gc.Stat.t, int) Fieldslib.Field.t ->
Core_gc.Stat.t -> int -> 'acc__) ->
'acc__
val set_all_mutable_fields : Core_gc.Stat.t -> unit
end
end`