@@ -36,7 +36,7 @@ type rec t =
3636 | @as (null ) Null
3737 | String (string )
3838 | Number (float )
39- | Object (Js_dict . t <t >)
39+ | Object (dict <t >)
4040 | Array (array <t >)
4141
4242module Kind : {
@@ -45,7 +45,7 @@ module Kind: {
4545 type rec t <_ > =
4646 | String : t <Js_string .t >
4747 | Number : t <float >
48- | Object : t <Js_dict . t <json >>
48+ | Object : t <dict <json >>
4949 | Array : t <array <json >>
5050 | Boolean : t <bool >
5151 | Null : t <Js_types .null_val >
@@ -57,7 +57,7 @@ type tagged_t =
5757 | JSONNull
5858 | JSONString (string )
5959 | JSONNumber (float )
60- | JSONObject (Js_dict . t <t >)
60+ | JSONObject (dict <t >)
6161 | JSONArray (array <t >)
6262
6363/* ## Accessors */
@@ -82,7 +82,7 @@ let decodeNumber: t => option<float>
8282/**
8383`decodeObject(json)` returns `Some(o)` if `json` is an `object`, `None` otherwise.
8484*/
85- let decodeObject : t => option <Js_dict . t <t >>
85+ let decodeObject : t => option <dict <t >>
8686
8787/**
8888`decodeArray(json)` returns `Some(a)` if `json` is an `array`, `None` otherwise.
@@ -118,8 +118,8 @@ external number: float => t = "%identity"
118118/** `boolean(b)` makes a JSON boolean of the `bool` `b`. */
119119external boolean : bool => t = "%identity"
120120
121- /** `object_(dict)` makes a JSON object of the `Js.Dict.t` ` dict`. */
122- external object_ : Js_dict . t <t > => t = "%identity"
121+ /** `object_(dict)` makes a JSON object of the `dict`. */
122+ external object_ : dict <t > => t = "%identity"
123123
124124/** `array_(a)` makes a JSON array of the `Js.Json.t` array `a`. */
125125external array : array <t > => t = "%identity"
@@ -140,7 +140,7 @@ external numberArray: array<float> => t = "%identity"
140140external booleanArray : array <bool > => t = "%identity"
141141
142142/** `objectArray(a) makes a JSON array of the `JsDict.t` array `a`. */
143- external objectArray : array <Js_dict . t <t >> => t = "%identity"
143+ external objectArray : array <dict <t >> => t = "%identity"
144144
145145/* ## String conversion */
146146
@@ -178,7 +178,7 @@ let getIds = s => {
178178
179179 switch Js.Json.classify(json) {
180180 | Js.Json.JSONObject(value) =>
181- /* In this branch, compiler infer value : Js.Json.t Js.Dict.t */
181+ /* In this branch, compiler infer value : Js.Json.t dict */
182182 switch Js.Dict.get(value, "ids") {
183183 | Some(ids) =>
184184 switch Js.Json.classify(ids) {
0 commit comments