mirror of
https://github.com/c-cube/sidekick.git
synced 2025-12-10 13:14:09 -05:00
29 lines
935 B
OCaml
29 lines
935 B
OCaml
(* This file is free software. See file "license" for more details. *)
|
|
|
|
(** {1 Utils} *)
|
|
|
|
type 'a printer = 'a CCFormat.printer
|
|
|
|
val pp_list : ?sep:string -> 'a printer -> 'a list printer
|
|
|
|
val pp_iter : ?sep:string -> 'a printer -> 'a Iter.t printer
|
|
|
|
val pp_array : ?sep:string -> 'a printer -> 'a array printer
|
|
|
|
val pp_pair : ?sep:string -> 'a printer -> 'b printer -> ('a * 'b) printer
|
|
|
|
val pp_iarray : ?sep:string -> 'a CCFormat.printer -> 'a IArray.t CCFormat.printer
|
|
|
|
val flat_map_l_ia : ('a -> 'b IArray.t) -> 'a list -> 'b list
|
|
|
|
val array_of_list_map : ('a -> 'b) -> 'a list -> 'b array
|
|
(** [array_of_list_map f l] is the same as [Array.of_list @@ List.map f l] *)
|
|
|
|
val array_to_list_map : ('a -> 'b) -> 'a array -> 'b list
|
|
|
|
val setup_gc : unit -> unit
|
|
(** Change parameters of the GC *)
|
|
|
|
module Int_set : CCSet.S with type elt = int
|
|
module Int_map : CCMap.S with type key = int
|
|
module Int_tbl : CCHashtbl.S with type key = int
|