rfc1951 1.4.0 · OCaml Package

module Bigarray = Bigarray_compat

type bigstring =
  (char, Bigarray.int8_unsigned_elt, Bigarray.c_layout) Bigarray.Array1.t

val invalid_arg : ('a, Format.formatter, unit, 'b) format4 -> 'a

val kstrf : (string -> 'a) -> ('b, Format.formatter, unit, 'a) format4 -> 'b

val bigstring_empty : 
  (char, Bigarray.int8_unsigned_elt, Bigarray.c_layout) Bigarray.Array1.t

val bigstring_create : 
  int ->
  (char, Bigarray.int8_unsigned_elt, Bigarray.c_layout) Bigarray.Array1.t

val bigstring_length : ('a, 'b, 'c) Bigarray.Array1.t -> int

val swap : int -> int

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 bigstring_to_string : 
  (char, Bigarray.int8_unsigned_elt, Bigarray.c_layout) Bigarray.Array1.t ->
  string

val bigstring_of_string : 
  string ->
  (char, Bigarray.int8_unsigned_elt, Bigarray.c_layout) Bigarray.Array1.t

val is_power_of_two : int -> bool

val to_power_of_two : int -> int

val output_bigstring : 
  out_channel ->
  (char, Bigarray.int8_unsigned_elt, Bigarray.c_layout) Bigarray.Array1.t ->
  int ->
  int ->
  unit

val input_bigstring : in_channel -> bigstring -> int -> int -> int

val invalid_bounds : int -> int -> 'a

val unsafe_blit : bigstring -> int -> bigstring -> int -> int -> unit

val slow_blit2 : 
  bigstring ->
  int ->
  bigstring ->
  int ->
  bigstring ->
  int ->
  int ->
  unit

val blit2 : 
  bigstring ->
  int ->
  bigstring ->
  int ->
  bigstring ->
  int ->
  int ->
  unit

val fill2 : int -> bigstring -> int -> bigstring -> int -> int -> unit

val io_buffer_size : int

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 _max_bits : int

val _smallest : int

val _rep_3_6 : int

val _repz_3_10 : int

val _repz_11_138 : int

val _literals : int

val _length_codes : int

val _l_codes : int

val _d_codes : int

val _heap_size : int

val _bl_codes : int

val zigzag : int array

val _length : int array

val _distance : int -> int

val _base_length : int array

val _extra_lbits : int array

val _extra_dbits : int array

val _base_dist : int array

type window = bigstring

val make_window : 
  bits:int ->
  (char, Bigarray.int8_unsigned_elt, Bigarray.c_layout) Bigarray.Array1.t

val ffs : int -> int

val window_bits : ('a, 'b, 'c) Bigarray.Array1.t -> int

module Lookup : sig ... end

val _static_ltree : Lookup.t

val _static_dtree : Lookup.t

type optint = Optint.t

module Heap : sig ... end

module WInf : sig ... end

module Inf : sig ... end

val unsafe_set_cursor : Inf.decoder -> int -> unit

module T : 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 Def : sig ... end

module Lz77 : sig ... end

module Higher : sig ... end

package rfc1951