sig
  type error = End_of_lexer | Invalid_consume of char * char
  exception Exception of UTF8LexerStateImpl.error
  val string_of_error : UTF8LexerStateImpl.error -> string
  class t :
    UTF8Impl.t ->
    object
      method consume : unit
      method consume_all : UTF8Impl.t
      method consume_char : UCharImpl.t
      method consume_only : UCharImpl.t -> unit
      method consume_until : UCharImpl.t -> UTF8Impl.t
      method consume_until_list : UCharImpl.t list -> UTF8Impl.t
      method consume_whitespace : unit
      method is_available : bool
      method look_ahead : UCharImpl.t -> bool
      method look_ahead_list : UCharImpl.t list -> bool
      method peek : UCharImpl.t
    end
end