module ULB :
  sig
    type unicode_lexbuf =
      Netulex.ULB.unicode_lexbuf = private {
      mutable ulb_encoding : Netconversion.encoding;
      mutable ulb_encoding_start : int;
      mutable ulb_rawbuf : string;
      mutable ulb_rawbuf_len : int;
      mutable ulb_rawbuf_end : int;
      mutable ulb_rawbuf_const : bool;
      mutable ulb_chars : int array;
      mutable ulb_chars_pos : int array;
      mutable ulb_chars_len : int;
      mutable ulb_eof : bool;
      mutable ulb_refill : string -> int -> int -> int;
      mutable ulb_enc_change_hook : unicode_lexbuf -> unit;
      mutable ulb_cursor : Netconversion.cursor;
    }
    val from_function :
      ?raw_size:int ->
      ?char_size:int ->
      ?enc_change_hook:(unicode_lexbuf -> unit) ->
      refill:(string -> int -> int -> int) ->
      Netconversion.encoding -> unicode_lexbuf
    val from_in_obj_channel :
      ?raw_size:int ->
      ?char_size:int ->
      ?enc_change_hook:(unicode_lexbuf -> unit) ->
      Netconversion.encoding -> Netchannels.in_obj_channel -> unicode_lexbuf
    val from_string :
      ?enc_change_hook:(unicode_lexbuf -> unit) ->
      Netconversion.encoding -> string -> unicode_lexbuf
    val from_string_inplace :
      ?enc_change_hook:(unicode_lexbuf -> unit) ->
      Netconversion.encoding -> string -> unicode_lexbuf
    val delete : int -> unicode_lexbuf -> unit
    val refill : unicode_lexbuf -> unit
    val set_encoding : Netconversion.encoding -> unicode_lexbuf -> unit
    val close : unicode_lexbuf -> unit
    val utf8_sub_string : int -> int -> unicode_lexbuf -> string
    val utf8_sub_string_length : int -> int -> unicode_lexbuf -> int
  end
module Ulexing :
  sig
    type lexbuf = Netulex.Ulexing.lexbuf
    exception Error
    val from_ulb_lexbuf : ULB.unicode_lexbuf -> lexbuf
    val lexeme_start : lexbuf -> int
    val lexeme_end : lexbuf -> int
    val lexeme_length : lexbuf -> int
    val lexeme : lexbuf -> int array
    val lexeme_char : lexbuf -> int -> int
    val sub_lexeme : lexbuf -> int -> int -> int array
    val utf8_lexeme : lexbuf -> string
    val utf8_sub_lexeme : lexbuf -> int -> int -> string
    val utf8_sub_lexeme_length : lexbuf -> int -> int -> int
    val start : lexbuf -> unit
    val next : lexbuf -> int
    val mark : lexbuf -> int -> unit
    val backtrack : lexbuf -> int
  end