sig
  val escape : string -> string
  val unescape :
    string ->
    error:(string -> 'error) ->
    (string, 'error) Biocaml_internal_utils.Result.t
end