int ->
object ('a)
  val position_ : int
  method advance : '-> ('#Cf_parser.cursor as 'a)
  method position : int
end