Module Pirate

module Pirate: sig .. end

val ar_seek_to_file : Pervasives.in_channel -> string -> Big_int.big_int

val open_ar_file : string -> Pervasives.in_channel

val tar_seek_to_file : 'a ->
       ('a -> string -> int -> int -> int) ->
       ('a -> char) -> string -> Big_int.big_int