sig
type t
val create : (int -> string * int) -> Ogg.Sync.t
val create_from_file : string -> Ogg.Sync.t * Unix.file_descr
val read : Ogg.Sync.t -> Ogg.Page.t
val reset : ?read_func:(int -> string * int) -> Ogg.Sync.t -> unit
val seek : Ogg.Sync.t -> Ogg.Page.t
end