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/presence.atd | 13 +++++++++++++
 1 file changed, 13 insertions(+)
 create mode 100644 lib/models/presence.atd

(limited to 'lib/models/presence.atd')

diff --git a/lib/models/presence.atd b/lib/models/presence.atd
new file mode 100644
index 0000000..c455fec
--- /dev/null
+++ b/lib/models/presence.atd
@@ -0,0 +1,13 @@
+type user <ocaml from="User" t="t"> = abstract
+type role <ocaml from="Role" t="t"> = abstract
+type activity <ocaml from="Activity" t="t"> = abstract
+type guild <ocaml from="Guild" t="t"> = abstract
+
+type t = {
+    user: user;
+    roles: role list;
+    ?game: activity option;
+    guild: guild;
+    status: string;
+    activities: activity list;
+}
\ No newline at end of file
-- 
cgit v1.2.3