sig
  type stream
  type packet
  val create : ?serial:nativeint -> unit -> Ogg.Stream.stream
  val serialno : Ogg.Stream.stream -> nativeint
  val eos : Ogg.Stream.stream -> bool
  val get_page : Ogg.Stream.stream -> Ogg.Page.t
  val put_page : Ogg.Stream.stream -> Ogg.Page.t -> unit
  val get_packet : Ogg.Stream.stream -> Ogg.Stream.packet
  val peek_packet : Ogg.Stream.stream -> Ogg.Stream.packet
  val put_packet : Ogg.Stream.stream -> Ogg.Stream.packet -> unit
  val flush_page : Ogg.Stream.stream -> Ogg.Page.t
  type t = Ogg.Stream.stream
  val pageout : Ogg.Stream.t -> string
  val pagesout : Ogg.Stream.t -> string
  val flush : Ogg.Stream.t -> string
  val pagesout_eos : Ogg.Stream.t -> string
end