sig
  val base64_conv_table : string
  exception Bad_encoding
  val base64_decode_char : char -> int
  val base64_decode_piece :
    ibuf:int array -> arr_to:char array -> arr_ofs:int -> unit
  val base64_decode :
    s_from:char It_type.IT.S.t ->
    arr_to:char array ->
    ibuf:int array -> ipos:int Pervasives.ref -> int * bool * bool
  val base64_decode_last :
    arr_to:char array -> ibuf:int array -> ipos_val:int -> int * bool
  val enee_cont :
    ('a, 'b) It_type.IT.iteratee ->
    (('a It_type.IT.stream ->
      (('a, 'b) It_type.IT.iteratee * 'a It_type.IT.sl) It_type.IT.It_IO.m) ->
     ('c, ('a, 'b) It_type.IT.iteratee) It_type.IT.iteratee) ->
    ('c, ('a, 'b) It_type.IT.iteratee) It_type.IT.iteratee
  val enee_cont_io :
    ('a, 'b) It_type.IT.iteratee ->
    (('a It_type.IT.stream ->
      (('a, 'b) It_type.IT.iteratee * 'a It_type.IT.sl) It_type.IT.It_IO.m) ->
     (('c, ('a, 'b) It_type.IT.iteratee) It_type.IT.iteratee *
      'c It_type.IT.sl)
     It_type.IT.It_IO.m) ->
    (('c, ('a, 'b) It_type.IT.iteratee) It_type.IT.iteratee *
     'c It_type.IT.sl)
    It_type.IT.It_IO.m
  val enee_base64_decode :
    (char, 'a) It_type.IT.iteratee ->
    (char, (char, 'a) It_type.IT.iteratee) It_type.IT.iteratee
  val step :
    int array ->
    int Pervasives.ref ->
    char array Pervasives.ref ->
    (char It_type.IT.stream ->
     ((char, 'a) It_type.IT.iteratee * char It_type.IT.sl) It_type.IT.It_IO.m) ->
    char It_type.IT.stream ->
    ((char, (char, 'a) It_type.IT.iteratee) It_type.IT.iteratee *
     char It_type.IT.sl)
    It_type.IT.It_IO.m
  val finish :
    obuf:char array Pervasives.ref ->
    ibuf:int array ->
    ipos:int Pervasives.ref ->
    opt_err:It_type.IT.err_msg option ->
    (char It_type.IT.stream ->
     ((char, 'a) It_type.IT.iteratee * char It_type.IT.sl) It_type.IT.It_IO.m) ->
    ((char, (char, 'a) It_type.IT.iteratee) It_type.IT.iteratee *
     char It_type.IT.sl)
    It_type.IT.It_IO.m
  val pass_obuf :
    written:int ->
    arr_to:char array ->
    (char It_type.IT.stream ->
     ((char, 'a) It_type.IT.iteratee * char It_type.IT.sl) It_type.IT.It_IO.m) ->
    (char, 'a) It_type.IT.iteratee It_type.IT.It_IO.m
  val ret :
    opt_err:It_type.IT.err_msg option ->
    (char It_type.IT.stream ->
     ((char, 'a) It_type.IT.iteratee * char It_type.IT.sl) It_type.IT.It_IO.m) ->
    ((char, (char, 'a) It_type.IT.iteratee) It_type.IT.iteratee *
     char It_type.IT.sl)
    It_type.IT.It_IO.m
end