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