Cbuffer

#

type 'a t = {

# mutable data	: 'a array	;
# mutable start	: int	;
# mutable length	: int	;
# never_shrink	: bool	;
# dummy	: 'a	;

}

#

val create : ?never_shrink:bool -> 'a -> Core.Std.Int.t -> 'a t

#

val length : 'a t -> int

#

val phys_length : 'a t -> int

#

val is_full : 'a t -> bool

#

val check_index : string -> 'a t -> int -> unit

#

val get : 'a t -> int -> 'a

#

val set : 'a t -> int -> 'a -> unit

#

val copy_data : src:'a Core.Std.Array.t -> dst:'a Core.Std.Array.t -> int -> int -> unit

copies data from one array to another. This assumes that the destination array is large enough to accommodate the data

#

val swap_array : 'a t -> int -> unit

swap_array buf len copies the contents of buf to a new array of length len and places that new data into the buffer

#

val expand : 'a t -> unit

double the size of the buffer

#

val shrink : 'a t -> unit

half the size of the buffer

#

val to_array : 'a t -> 'a Core.Std.Array.t

#

val add : 'a t -> 'a -> unit

#

val drop_from : 'a t -> int -> unit

#

val drop_last : 'a t -> unit

#

val iter : 'a t -> f:(int -> 'a -> unit) -> unit

iter buf ~f calls func on each buffer element starting with 0 like this: (func pos element)

#

val iterr : 'a t -> f:(int -> 'a -> unit) -> unit

iterr buf ~f calls func on each buffer element starting with end like this: (func pos element)

#

val of_array : 'a Core.Std.Array.t -> 'a t

initialize Cbuffer from array

#

val cb_compare : f:('a -> 'b -> bool) -> b1:'a t -> b2:'b t -> s1:int -> s2:int -> n:int -> bool

compare two buffer fragments

#

val drop_old : ?cmp:('a -> 'a -> int) -> ?free:('b -> unit) -> f:('b -> 'a) -> cutoff:'a -> 'b t -> int

drop stuff from the end. equivalent to while cutoff > f (get buf (length buf - 1)) do drop_last buf; done but calls drop just once

#

val t_of_sexp : (Sexplib.Sexp.t -> 'a) -> Sexplib.Sexp.t -> 'a t

#

val sexp_of_t : ('a -> Sexplib.Sexp.t) -> 'a t -> Sexplib.Sexp.t

module Cbuffer