Profile
type file = string
val reset : unit -> unit
val record_call : ?accumulate:bool -> string -> (unit -> 'a) -> 'a
val record : ?accumulate:bool -> string -> ('a -> 'b) -> 'a -> 'b
type column = [
| `Abs_top_heap
| `Alloc
| `Time
| `Top_heap
]
val print : Format.formatter -> column list -> unit
val options_doc : string
val all_columns : column list
val generate : string
val transl : string
val typing : string