gazagnaire.org / ocaml-json
Declarative JSON data manipulation for OCaml
0
fork

Configure Feed

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

json: align json.ml with the .mli convention

Follow-up to the previous .mli alignment: switch the Value module
implementation to use [t] instead of [json] in its constructor and
function signatures, matching the public surface.

Thomas Gazagnaire 513836ac 4ceb7022

+3 -3
+3 -3
lib/json.ml
··· 1446 1446 (* Generic JSON *) 1447 1447 1448 1448 module Value = struct 1449 - type 'a cons = ?meta:Meta.t -> 'a -> json 1450 - type t = json 1449 + type 'a cons = ?meta:Meta.t -> 'a -> t 1450 + type t = t 1451 1451 1452 1452 let meta = function 1453 1453 | Null (_, m) -> m ··· 1785 1785 1786 1786 (* Encode *) 1787 1787 1788 - let rec encode : type a. a Repr.t -> a -> json = 1788 + let rec encode : type a. a Repr.t -> a -> t = 1789 1789 fun t v -> 1790 1790 match t with 1791 1791 | Null map -> null ~meta:(map.enc_meta v) (map.enc v)