From 011e3224c0292dfcb0024daf474d4ef1e00b82f0 Mon Sep 17 00:00:00 2001
From: Mishio595 <tenseiken595@gmail.com>
Date: Sun, 25 Nov 2018 16:02:37 -0700
Subject: A lot is going on...

---
 lib/model.ml | 26 --------------------------
 1 file changed, 26 deletions(-)
 delete mode 100644 lib/model.ml

(limited to 'lib/model.ml')

diff --git a/lib/model.ml b/lib/model.ml
deleted file mode 100644
index c44a289..0000000
--- a/lib/model.ml
+++ /dev/null
@@ -1,26 +0,0 @@
-module Make(M: S.Model) = struct
-    include M
-end
-
-module Message = Make(Message)
-module Guild = Make(Guild)
-module Channel = Make(Channel)
-
-exception Type_Mismatch
-
-type t =
-    | Message of Message.t
-    | Guild of Guild.t
-    | Channel of Channel.t
-
-let to_message = function
-    | Message m -> m
-    | _ -> raise Type_Mismatch
-
-let to_guild = function
-    | Guild m -> m
-    | _ -> raise Type_Mismatch
-
-let to_channel = function
-    | Channel m -> m
-    | _ -> raise Type_Mismatch
\ No newline at end of file
-- 
cgit v1.2.3