sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>
On This Page
JSON text generation.
Warning. The module assumes strings are UTF-8 encoded.
val empty : 'a seq
An empty sequence.
val null : t
null
is the JSON null value.
val bool : bool -> t
bool b
is b
as a JSON boolean value.
val int : int -> t
int i
is i
as a JSON number.
val str : string -> t
str s
is s
as a JSON string value.
mem_if c n v
is mem n v
if c
is true
and empty
otherwise.
val to_string : t -> string
to_string j
is the JSON value j
as a string.
val output : Pervasives.out_channel -> t -> unit
output oc j
outputs the JSON value j
on oc
.