let deserialize_exn s =
        Yojson.Safe.from_string s |> of_json_exn