sig
  type t
  type source
  val create : CCApp_parse.READER.source -> CCApp_parse.READER.t
  val peek : CCApp_parse.READER.t -> CCApp_parse.token
  val next : CCApp_parse.READER.t -> CCApp_parse.token
  val junk : CCApp_parse.READER.t -> unit
  val line : CCApp_parse.READER.t -> int
  val col : CCApp_parse.READER.t -> int
end