diff options
Diffstat (limited to 'lib/models/member_t.ml')
| -rw-r--r-- | lib/models/member_t.ml | 34 |
1 files changed, 34 insertions, 0 deletions
diff --git a/lib/models/member_t.ml b/lib/models/member_t.ml new file mode 100644 index 0000000..d7ce337 --- /dev/null +++ b/lib/models/member_t.ml @@ -0,0 +1,34 @@ +type partial_member = { + nick: string option [@default None]; + roles: Snowflake.t list; + joined_at: string; + deaf: bool; + mute: bool; +} [@@deriving yojson] + +type member = { + nick: string option [@default None]; + roles: Snowflake.t list; + joined_at: string; + deaf: bool; + mute: bool; + user: User_t.t; +} [@@deriving yojson] + +type member_update = { + guild_id: Snowflake.t [@key "id"]; + member: member; +} [@@deriving yojson] + +type t = { + nick: string option [@default None]; + roles: Snowflake.t list; + joined_at: string; + deaf: bool; + mute: bool; + user: User_t.t; + guild_id: Snowflake.t; +} [@@deriving yojson] + +let wrap ~guild_id ({nick;roles;joined_at;deaf;mute;user}:member) = + {nick;roles;joined_at;deaf;mute;user;guild_id}
\ No newline at end of file |