(* Auto-generated from "member.atd" *) [@@@ocaml.warning "-27-32-35-39"] type user = User_t.t type snowflake = Snowflake_t.t type t = Member_t.t = { nick: string option; roles: snowflake list; joined_at: string; deaf: bool; mute: bool; user: user } type partial_member = Member_t.partial_member = { nick: string option; roles: snowflake list; joined_at: string; deaf: bool; mute: bool } val write_user : Bi_outbuf.t -> user -> unit (** Output a JSON value of type {!user}. *) val string_of_user : ?len:int -> user -> string (** Serialize a value of type {!user} into a JSON string. @param len specifies the initial length of the buffer used internally. Default: 1024. *) val read_user : Yojson.Safe.lexer_state -> Lexing.lexbuf -> user (** Input JSON data of type {!user}. *) val user_of_string : string -> user (** Deserialize JSON data of type {!user}. *) val write_snowflake : Bi_outbuf.t -> snowflake -> unit (** Output a JSON value of type {!snowflake}. *) val string_of_snowflake : ?len:int -> snowflake -> string (** Serialize a value of type {!snowflake} into a JSON string. @param len specifies the initial length of the buffer used internally. Default: 1024. *) val read_snowflake : Yojson.Safe.lexer_state -> Lexing.lexbuf -> snowflake (** Input JSON data of type {!snowflake}. *) val snowflake_of_string : string -> snowflake (** Deserialize JSON data of type {!snowflake}. *) val write_t : Bi_outbuf.t -> t -> unit (** Output a JSON value of type {!t}. *) val string_of_t : ?len:int -> t -> string (** Serialize a value of type {!t} into a JSON string. @param len specifies the initial length of the buffer used internally. Default: 1024. *) val read_t : Yojson.Safe.lexer_state -> Lexing.lexbuf -> t (** Input JSON data of type {!t}. *) val t_of_string : string -> t (** Deserialize JSON data of type {!t}. *) val write_partial_member : Bi_outbuf.t -> partial_member -> unit (** Output a JSON value of type {!partial_member}. *) val string_of_partial_member : ?len:int -> partial_member -> string (** Serialize a value of type {!partial_member} into a JSON string. @param len specifies the initial length of the buffer used internally. Default: 1024. *) val read_partial_member : Yojson.Safe.lexer_state -> Lexing.lexbuf -> partial_member (** Input JSON data of type {!partial_member}. *) val partial_member_of_string : string -> partial_member (** Deserialize JSON data of type {!partial_member}. *)