Module Rfc1951.Lz77

val _max_match : int
val _min_match : int
val _min_lookahead : int
val (.!()) : bigstring -> int -> int32
val (.![]) : bigstring -> int -> int
val (.!{}) : bigstring -> int -> int
type deflate_configuration = {
  1. max_chain : int;
  2. max_lazy : int;
  3. good_length : int;
  4. nice_length : int;
}
type configuration =
  1. | Copy
  2. | Deflate of deflate_configuration
val _0 : configuration
val _1 : configuration
val _2 : configuration
val _3 : configuration
val _4 : configuration
val _5 : configuration
val _6 : configuration
val _7 : configuration
val _8 : configuration
val _9 : configuration
val _mem_level : int
val _hash_bits : int
val _hash_size : int
val _hash_mask : int
val _hash_shift : int
val _too_far : int
val update_hash : int -> int -> int
type src = [
  1. | `Channel of in_channel
  2. | `String of string
  3. | `Manual
]
type decode = [
  1. | `Await
  2. | `Flush
  3. | `End
]
type state = {
  1. src : src;
  2. cfg : configuration;
  3. level : int;
  4. mutable i : bigstring;
  5. mutable i_pos : int;
  6. mutable i_len : int;
  7. l : literals;
  8. d : distances;
  9. w : bigstring;
  10. wbits : int;
  11. mutable lookahead : int;
  12. mutable strstart : int;
  13. prev : int array;
  14. head : int array;
  15. mutable hash : int;
  16. mutable match_start : int;
  17. mutable match_length : int;
  18. mutable match_available : bool;
  19. mutable insert : int;
  20. mutable prev_length : int;
  21. mutable prev_match : int;
  22. q : Queue.t;
  23. mutable crc : optint;
  24. mutable k : configuration -> state -> decode;
}
val max_dist : state -> int
exception Break
val longest_match : deflate_configuration -> state -> int -> int
val eoi : state -> unit
val src : state -> (char, Bigarray.int8_unsigned_elt, Bigarray.c_layout) Bigarray.Array1.t -> int -> int -> unit
val i_rem : state -> int
val src_rem : state -> int
val io_buffer_size : int
val refill : (configuration -> state -> decode) -> state -> decode
val memcpy : bigstring -> src_off:int -> bigstring -> dst_off:int -> len:int -> unit
val update_crc : state -> int -> unit
val insert_string : state -> int -> int
val succ_length : int array -> int -> unit
val succ_distance : int array -> int -> unit
val emit_match : state -> off:int -> len:int -> bool
val succ_literal : int array -> char -> unit
val emit_literal : state -> char -> bool
val trailing : state -> [> `End ]
val slide_hash : state -> unit
val fill_window : configuration -> state -> decode
val enough : configuration -> state -> decode
val deflate_fast : deflate_configuration -> state -> decode
val deflate_slow : deflate_configuration -> state -> decode
val copy : state -> decode
val _literals : int
val _length_codes : int
val _l_codes : int
val _d_codes : int
val checksum : state -> optint
val distances : state -> distances
val literals : state -> literals
val ctz : int -> int
val state : ?level:int -> q:Queue.t -> w:(char, Bigarray.int8_unsigned_elt, Bigarray.c_layout) Bigarray.Array1.t -> src -> state
val compress : state -> decode
type window = bigstring
val make_window : bits:int -> (char, Bigarray.int8_unsigned_elt, Bigarray.c_layout) Bigarray.Array1.t
val no_compression : state -> bool