aboutsummaryrefslogtreecommitdiff
path: root/lib/models/role_t.ml
diff options
context:
space:
mode:
Diffstat (limited to 'lib/models/role_t.ml')
-rw-r--r--lib/models/role_t.ml8
1 files changed, 5 insertions, 3 deletions
diff --git a/lib/models/role_t.ml b/lib/models/role_t.ml
index ae54f7a..e41f31d 100644
--- a/lib/models/role_t.ml
+++ b/lib/models/role_t.ml
@@ -1,3 +1,5 @@
+open Core
+
type role = {
id: Snowflake.t;
name: string;
@@ -7,12 +9,12 @@ type role = {
permissions: int;
managed: bool;
mentionable: bool;
-} [@@deriving yojson { strict = false}]
+} [@@deriving sexp, yojson { strict = false}]
type role_update = {
role: role;
guild_id: Snowflake.t;
-} [@@deriving yojson { strict = false}]
+} [@@deriving sexp, yojson { strict = false}]
type t = {
id: Snowflake.t;
@@ -24,7 +26,7 @@ type t = {
managed: bool;
mentionable: bool;
guild_id: Snowflake.t;
-} [@@deriving yojson { strict = false}]
+} [@@deriving sexp, yojson { strict = false}]
let wrap ~guild_id ({id;name;colour;hoist;position;permissions;managed;mentionable}:role) =
{id;name;colour;hoist;position;permissions;managed;mentionable;guild_id} \ No newline at end of file