From c3d6e15bb89d4a93a2fa486db6c8e126baf4da2e Mon Sep 17 00:00:00 2001 From: Adelyn Breelove Date: Mon, 21 Jan 2019 08:52:33 -0700 Subject: folder restructure --- lib/models/member_t.ml | 43 ------------------------------------------- 1 file changed, 43 deletions(-) delete mode 100644 lib/models/member_t.ml (limited to 'lib/models/member_t.ml') diff --git a/lib/models/member_t.ml b/lib/models/member_t.ml deleted file mode 100644 index e6edb61..0000000 --- a/lib/models/member_t.ml +++ /dev/null @@ -1,43 +0,0 @@ -open Core - -type partial_member = { - nick: string option [@default None]; - roles: Snowflake.t list; - joined_at: string; - deaf: bool; - mute: bool; -} [@@deriving sexp, yojson { strict = false}] - -type member = { - nick: string option [@default None]; - roles: Snowflake.t list; - joined_at: string; - deaf: bool; - mute: bool; - user: User_t.t; -} [@@deriving sexp, yojson { strict = false}] - -type member_wrapper = { - guild_id: Snowflake.t; - user: User_t.t; -} [@@deriving sexp, yojson { strict = false }] - -type member_update = { - guild_id: Snowflake.t; - roles: Snowflake.t list [@default []]; - user: User_t.t; - nick: string option [@default None]; -} [@@deriving sexp, yojson { strict = false}] - -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 sexp, yojson { strict = false}] - -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 -- cgit v1.2.3