sig
type r
type t = r record
val syntax : Syntax.t
val of_json : json -> t
val to_json : t -> json
val default : t
val has :
(Server.Data.Record.S.r, 'a) Server.Data.Record.field -> t -> bool
val get : (Server.Data.Record.S.r, 'a) Server.Data.Record.field -> t -> 'a
val set :
(Server.Data.Record.S.r, 'a) Server.Data.Record.field -> 'a -> t -> t
end