sig
  type 'a t = 'a Camlp4.Struct.Grammar.Parser.Make.StreamOrig.t
  exception Failure
  exception Error of string
  val peek : 'a Camlp4.Struct.Grammar.Parser.Make.StreamOrig.t -> 'a option
  val junk : 'a Camlp4.Struct.Grammar.Parser.Make.StreamOrig.t -> unit
  val dup : 'a Stream.t -> 'a Stream.t
end