sig
  val w_inline_encode :
    string ->
    ([> `Partial of Bytes.t * int * int * (int -> 'a) ] as 'a)
    Encoder.partial Encoder.k0
  val w_encode :
    string ->
    ([> `Partial of Bytes.t * int * int * (int -> 'a) ] as 'a)
    Encoder.partial Encoder.k0
end