From 57df76de6441899b659e30c6a8e9d7572b85f7a0 Mon Sep 17 00:00:00 2001
From: Adelyn Breelove <tenseiken595@gmail.com>
Date: Mon, 17 Dec 2018 13:13:10 -0700
Subject: Some abstractions

---
 lib/models/gen/user_j.mli | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib/models/gen/user_j.mli')

diff --git a/lib/models/gen/user_j.mli b/lib/models/gen/user_j.mli
index 576768e..0da284a 100644
--- a/lib/models/gen/user_j.mli
+++ b/lib/models/gen/user_j.mli
@@ -6,7 +6,7 @@ type snowflake = Snowflake_t.t
 type t = User_t.t = {
   id: snowflake;
   username: string;
-  discriminator: string;
+  discriminator: int;
   avatar: string option;
   bot: bool
 }
-- 
cgit v1.2.3


From 1a73007b3aaa17940173eaff1eb4f6703fd9ec0c Mon Sep 17 00:00:00 2001
From: Adelyn Breelove <tenseiken595@gmail.com>
Date: Wed, 19 Dec 2018 13:44:04 -0700
Subject: Re-arrange autogen serialization files and incorporate into dune file

---
 lib/models/gen/user_j.mli | 75 -----------------------------------------------
 1 file changed, 75 deletions(-)
 delete mode 100644 lib/models/gen/user_j.mli

(limited to 'lib/models/gen/user_j.mli')

diff --git a/lib/models/gen/user_j.mli b/lib/models/gen/user_j.mli
deleted file mode 100644
index 0da284a..0000000
--- a/lib/models/gen/user_j.mli
+++ /dev/null
@@ -1,75 +0,0 @@
-(* Auto-generated from "user.atd" *)
-[@@@ocaml.warning "-27-32-35-39"]
-
-type snowflake = Snowflake_t.t
-
-type t = User_t.t = {
-  id: snowflake;
-  username: string;
-  discriminator: int;
-  avatar: string option;
-  bot: bool
-}
-
-type partial_user = User_t.partial_user = { id: snowflake }
-
-val write_snowflake :
-  Bi_outbuf.t -> snowflake -> unit
-  (** Output a JSON value of type {!snowflake}. *)
-
-val string_of_snowflake :
-  ?len:int -> snowflake -> string
-  (** Serialize a value of type {!snowflake}
-      into a JSON string.
-      @param len specifies the initial length
-                 of the buffer used internally.
-                 Default: 1024. *)
-
-val read_snowflake :
-  Yojson.Safe.lexer_state -> Lexing.lexbuf -> snowflake
-  (** Input JSON data of type {!snowflake}. *)
-
-val snowflake_of_string :
-  string -> snowflake
-  (** Deserialize JSON data of type {!snowflake}. *)
-
-val write_t :
-  Bi_outbuf.t -> t -> unit
-  (** Output a JSON value of type {!t}. *)
-
-val string_of_t :
-  ?len:int -> t -> string
-  (** Serialize a value of type {!t}
-      into a JSON string.
-      @param len specifies the initial length
-                 of the buffer used internally.
-                 Default: 1024. *)
-
-val read_t :
-  Yojson.Safe.lexer_state -> Lexing.lexbuf -> t
-  (** Input JSON data of type {!t}. *)
-
-val t_of_string :
-  string -> t
-  (** Deserialize JSON data of type {!t}. *)
-
-val write_partial_user :
-  Bi_outbuf.t -> partial_user -> unit
-  (** Output a JSON value of type {!partial_user}. *)
-
-val string_of_partial_user :
-  ?len:int -> partial_user -> string
-  (** Serialize a value of type {!partial_user}
-      into a JSON string.
-      @param len specifies the initial length
-                 of the buffer used internally.
-                 Default: 1024. *)
-
-val read_partial_user :
-  Yojson.Safe.lexer_state -> Lexing.lexbuf -> partial_user
-  (** Input JSON data of type {!partial_user}. *)
-
-val partial_user_of_string :
-  string -> partial_user
-  (** Deserialize JSON data of type {!partial_user}. *)
-
-- 
cgit v1.2.3