type bigstring =
( char, Stdlib.Bigarray.int8_unsigned_elt, Stdlib.Bigarray.c_layout )
Stdlib.Bigarray.Array1.t
val invalid_arg :
( 'a, Stdlib.Format.formatter, unit, 'b ) Stdlib.format4 ->
'c
val kstrf :
( string -> 'a ) ->
( 'b, Stdlib.Format.formatter, unit, 'a ) Stdlib.format4 ->
'c
val bigstring_empty :
( char, Stdlib.Bigarray.int8_unsigned_elt, Stdlib.Bigarray.c_layout )
Stdlib.Bigarray.Array1.t
val bigstring_create :
int ->
( char, Stdlib.Bigarray.int8_unsigned_elt, Stdlib.Bigarray.c_layout )
Stdlib.Bigarray.Array1.t
val bigstring_length : ( 'a, 'b, 'c ) Stdlib.Bigarray.Array1.t -> int
val swap32 : int32 -> int32
val unsafe_get_uint8 : bigstring -> int -> int
val unsafe_get_char : bigstring -> int -> char
val unsafe_get_uint16 : bigstring -> int -> int
val unsafe_get_uint32 : bigstring -> int -> int32
val string_unsafe_get_uint32 : string -> int -> int32
val string_unsafe_get_uint8 : string -> int -> int
val bytes_unsafe_get_uint32 : bytes -> int -> int32
val bytes_unsafe_get_uint8 : bytes -> int -> int
val unsafe_set_uint8 : bigstring -> int -> int -> unit
val unsafe_set_uint16 : bigstring -> int -> int -> unit
val unsafe_set_uint32 : bigstring -> int -> int32 -> unit
val bytes_unsafe_set_uint8 : bytes -> int -> int -> unit
val bytes_unsafe_set_uint32 : bytes -> int -> int32 -> unit
val unsafe_set_uint16_le : bigstring -> int -> int -> unit
val _unsafe_set_uint16_be : bigstring -> int -> int -> unit
val unsafe_get_uint16_le : bigstring -> int -> int
val _unsafe_get_uint16_be : bigstring -> int -> int
val _unsafe_set_uint32_le : bigstring -> int -> int32 -> unit
val bigstring_to_string :
( char, Stdlib.Bigarray.int8_unsigned_elt, Stdlib.Bigarray.c_layout )
Stdlib.Bigarray.Array1.t ->
string
val bigstring_of_string :
string ->
( char, Stdlib.Bigarray.int8_unsigned_elt, Stdlib.Bigarray.c_layout )
Stdlib.Bigarray.Array1.t
val is_power_of_two : int -> bool
val to_power_of_two : int -> int
val output_bigstring :
Stdlib.out_channel ->
( char, Stdlib.Bigarray.int8_unsigned_elt, Stdlib.Bigarray.c_layout )
Stdlib.Bigarray.Array1.t ->
int ->
int ->
unit
val invalid_bounds : int -> int -> 'a
val (>) : int -> int -> bool
val (<) : int -> int -> bool
val (<=) : int -> int -> bool
val (>=) : int -> int -> bool
val min : int -> int -> int
val max : int -> int -> int
val _distance : int -> int
val _base_length : int array
val _base_dist : int array
val make_window :
bits:int ->
( char, Stdlib.Bigarray.int8_unsigned_elt, Stdlib.Bigarray.c_layout )
Stdlib.Bigarray.Array1.t
val window_bits : ( 'a, 'b, 'c ) Stdlib.Bigarray.Array1.t -> int
module Heap : sig ... end
module WInf : sig ... end
module Queue : sig ... end
type literals = int array
type distances = int array
val make_literals : unit -> int array
val succ_literal : int array -> char -> unit
val succ_length : int array -> int -> unit
val make_distances : unit -> int array
val succ_distance : int array -> int -> unit
module Lz77 : sig ... end