From 73d115ce6260e97f5f7ee47f743d842ffd292662 Mon Sep 17 00:00:00 2001
From: Adelyn Breelove <tenseiken595@gmail.com>
Date: Thu, 13 Dec 2018 14:11:54 -0700
Subject: Working on deriving types from json

---
 lib/models/message_t.ml | 38 ++++++++++++++++++++++++++++++++++++++
 1 file changed, 38 insertions(+)
 create mode 100644 lib/models/message_t.ml

(limited to 'lib/models/message_t.ml')

diff --git a/lib/models/message_t.ml b/lib/models/message_t.ml
new file mode 100644
index 0000000..3d37442
--- /dev/null
+++ b/lib/models/message_t.ml
@@ -0,0 +1,38 @@
+(* Auto-generated from "message.atd" *)
+              [@@@ocaml.warning "-27-32-35-39"]
+
+type user = User_t.t
+
+type snowflake = Snowflake_t.t
+
+type role = Role_t.t
+
+type reaction = Reaction_t.t
+
+type member = Member_t.t
+
+type embed = Embed_t.t
+
+type attachment = Attachment_t.t
+
+type t = {
+  id: snowflake;
+  author: user;
+  channel_id: snowflake;
+  member: member option;
+  guild_id: snowflake option;
+  content: string;
+  timestamp: string;
+  edited_timestamp: string option;
+  tts: bool;
+  mention_everyone: bool;
+  mentions: user list;
+  role_mentions: role list;
+  attachments: attachment list;
+  embeds: embed list;
+  reactions: reaction list;
+  nonce: snowflake option;
+  pinned: bool;
+  webhook_id: snowflake;
+  kind: int
+}
-- 
cgit v1.2.3


From 179d9598fe62e2966471b312fd438e98ff3a272a Mon Sep 17 00:00:00 2001
From: Adelyn Breelove <tenseiken595@gmail.com>
Date: Thu, 13 Dec 2018 15:50:37 -0700
Subject: Fix more dispatch issues

---
 lib/models/message_t.ml | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'lib/models/message_t.ml')

diff --git a/lib/models/message_t.ml b/lib/models/message_t.ml
index 3d37442..2442d76 100644
--- a/lib/models/message_t.ml
+++ b/lib/models/message_t.ml
@@ -9,7 +9,7 @@ type role = Role_t.t
 
 type reaction = Reaction_t.t
 
-type member = Member_t.t
+type partial_member = Member_t.partial_member
 
 type embed = Embed_t.t
 
@@ -19,7 +19,7 @@ type t = {
   id: snowflake;
   author: user;
   channel_id: snowflake;
-  member: member option;
+  member: partial_member option;
   guild_id: snowflake option;
   content: string;
   timestamp: string;
@@ -36,3 +36,5 @@ type t = {
   webhook_id: snowflake;
   kind: int
 }
+
+type member = Member_t.t
-- 
cgit v1.2.3