Source file j.ml

let find = Ezjsonm.find_opt
let to_list = Ezjsonm.get_list
let to_string = Ezjsonm.get_string
let to_int = Ezjsonm.get_int
let to_float = Ezjsonm.get_float
let null_to_option = function `Null -> None | v -> Some v
let path keys v = Ezjsonm.find v keys
let only = function `A [ v ] -> v | _ -> raise Not_found