Library
Module
Module type
Parameter
Class
Class type
Decoder for Javascript Values
Suppose we have the following ocaml types
type sex = Male | Female
type tp = {
name: string;
age: int;
sex: sex
}
and we want to decode the javascript object
{name: "Jonathan", sex: "male", age: 55}
The we can use the following decoder
let decode: tp Decode.t =
let open Decode in
let* name = field "name" string in
let* age = field "age" int in
let* sex =
field
"sex"
(
let* str = string in
match str with
| "male" ->
return Male
| "female" ->
return Female
| _ ->
fail
)
in
return {name; age; sex}
The decoder decode
decodes any javascript object which has the fields name
age
and sex
with a value of the appropriate type into the corresponding ocaml record.
'a t
Type of a decoder which decodes a javascript value into an optional object of type 'a
.
run decoder value
Run the decoder on a javascript value. If the decoder succeeds with value a
, then return Some a
. Otherwise return None
.
val return : 'a -> 'a t
return a
Succeed with a
regardless what the javascript object is.
val fail : 'a t
Fail immediately.
Combine decoders.
Example:
let* a = decoder1 in
decoder1 a
First decode the javascript value with decoder decoder1
. In case of success with the value a
, use decoder decoder2
which can depend on a
.
let*
is useful to decode various fields of an object.
let* f1 = field "name1" dec1 in
let* f2 = field "name2" dec2 in
...
return ...
map f dec
Decode using dec
and in case of success, map the decoded value a
to f a
.
dec1 </> dec2
First try decoder dec1
. If it succeeds, return the decoded value. In case dec1
fails, use dec2
to decode the javascript value.
val null : 'a -> 'a t
null v
If the javascript value is null
, then return v
. Otherwise fail.
val undefined : 'a -> 'a t
undefined v
If the javascript value is undefined
, then return v
. Otherwise fail.
val int : int t
Decode an integer value i.e. a number between -2^31
and 2^31 - 1
.
val bool : bool t
Decode a boolean value.
val float : float t
Decode a floating point value i.e. a number.
val string : string t
Decode a string value. The decoding converts the javascript string from utf16 into an ocaml utf8 string.
field name dec
Decode the field named name
in the javascript object with the decoder dec
.
array dec
Decode a javascript array into an ocaml array using dec
to decode elements.
option dec
In case the javascript object is null
succeed with None
. Otherwise use dec
to decode the object and in case of success wrap the result with Some
.
Examples:
(option int) Value.null ~> succeed with None
(option int) (Value.int 6) ~> succeed with (Some 5)
(option int) (Value.string "a") ~> fail