Declarative JSON data manipulation for OCaml
0
fork

Configure Feed

Select the types of activity you want to include in your feed.

ocaml-json: drop top-level Value.t recode in favour of bytes recode

The value-level [recode]/[recode_exn] on [Json.t] was [encode t (decode t v)]
— trivially derivable and shadowed by the bytes-level [recode] anyway. Keep
only the bytes-level version which has real layout-preservation logic.

-8
-2
lib/json.ml
··· 1669 1669 let decode_exn t j = Codec.decode_exn t j 1670 1670 let encode t v = Codec.encode t v 1671 1671 let encode_exn t v = Codec.encode_exn t v 1672 - let recode t v = Codec.value_recode t v 1673 - let recode_exn t v = Codec.value_recode_exn t v 1674 1672 let error_sort = Codec.error_sort 1675 1673 let error_type = Codec.error_type 1676 1674
-6
lib/json.mli
··· 345 345 val encode_exn : 'a codec -> 'a -> t 346 346 (** [encode_exn] is like {!val-encode} but raises {!Json.exception-Error}. *) 347 347 348 - val recode : 'a codec -> t -> (t, Error.t) result 349 - (** [recode t v] decodes [v] with [t] and encodes it with [t]. *) 350 - 351 - val recode_exn : 'a codec -> t -> t 352 - (** [recode_exn] is like {!val-recode} but raises {!Json.exception-Error}. *) 353 - 354 348 val error_sort : exp:Sort.t -> t -> 'a 355 349 (** [error_sort ~exp fnd] errors when sort [exp] was expected but generic JSON 356 350 [fnd] was found. *)