From c5bfc108ca6a1e7a21492b4318de78a74ed801f9 Mon Sep 17 00:00:00 2001
From: Adelyn Breedlove <tenseiken595@gmail.com>
Date: Sun, 13 Jan 2019 16:51:04 -0700
Subject: Add deriving sexp to models

---
 lib/models/presence.ml | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

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

diff --git a/lib/models/presence.ml b/lib/models/presence.ml
index 955a930..ab245a7 100644
--- a/lib/models/presence.ml
+++ b/lib/models/presence.ml
@@ -1,3 +1,5 @@
+open Core
+
 type t = {
     user: User_t.partial_user;
     roles: Snowflake.t list;
@@ -5,4 +7,4 @@ type t = {
     guild_id: Snowflake.t;
     status: string;
     activities: Activity.t list;
-} [@@deriving yojson { strict = false}]
\ No newline at end of file
+} [@@deriving sexp, yojson { strict = false}]
\ No newline at end of file
-- 
cgit v1.2.3