diff options
| author | Adelyn Breelove <[email protected]> | 2018-12-19 14:06:23 -0700 |
|---|---|---|
| committer | Adelyn Breelove <[email protected]> | 2018-12-19 14:06:23 -0700 |
| commit | 47421af4afeaf7cd4c160b2001e207f1fae775c2 (patch) | |
| tree | 273bffc246baf75cd2c4e99462da76f669a8c01b /lib/models | |
| parent | Re-arrange autogen serialization files and incorporate into dune file (diff) | |
| download | disml-47421af4afeaf7cd4c160b2001e207f1fae775c2.tar.xz disml-47421af4afeaf7cd4c160b2001e207f1fae775c2.zip | |
More type abstraction stuff
Diffstat (limited to 'lib/models')
| -rw-r--r-- | lib/models/activity.ml | 1 | ||||
| -rw-r--r-- | lib/models/attachment.ml | 1 | ||||
| -rw-r--r-- | lib/models/ban.ml | 1 | ||||
| -rw-r--r-- | lib/models/channel.ml | 1 | ||||
| -rw-r--r-- | lib/models/embed.ml | 6 | ||||
| -rw-r--r-- | lib/models/emoji.ml | 1 | ||||
| -rw-r--r-- | lib/models/member.ml | 1 | ||||
| -rw-r--r-- | lib/models/presence.ml | 1 | ||||
| -rw-r--r-- | lib/models/reaction.ml | 6 |
9 files changed, 19 insertions, 0 deletions
diff --git a/lib/models/activity.ml b/lib/models/activity.ml index 36b7d4b..6fe69b8 100644 --- a/lib/models/activity.ml +++ b/lib/models/activity.ml @@ -1,2 +1,3 @@ module Make(Http : S.Http) = struct + type t = Activity_t.t end
\ No newline at end of file diff --git a/lib/models/attachment.ml b/lib/models/attachment.ml index 36b7d4b..cd04da8 100644 --- a/lib/models/attachment.ml +++ b/lib/models/attachment.ml @@ -1,2 +1,3 @@ module Make(Http : S.Http) = struct + type t = Attachment_t.t end
\ No newline at end of file diff --git a/lib/models/ban.ml b/lib/models/ban.ml index 36b7d4b..f84fe62 100644 --- a/lib/models/ban.ml +++ b/lib/models/ban.ml @@ -1,2 +1,3 @@ module Make(Http : S.Http) = struct + type t = Ban_t.t end
\ No newline at end of file diff --git a/lib/models/channel.ml b/lib/models/channel.ml index 36b7d4b..328cc94 100644 --- a/lib/models/channel.ml +++ b/lib/models/channel.ml @@ -1,2 +1,3 @@ module Make(Http : S.Http) = struct + type t = Channel_t.t end
\ No newline at end of file diff --git a/lib/models/embed.ml b/lib/models/embed.ml index 36b7d4b..ce25e78 100644 --- a/lib/models/embed.ml +++ b/lib/models/embed.ml @@ -1,2 +1,8 @@ module Make(Http : S.Http) = struct + type footer = Embed_t.footer + type image = Embed_t.image + type video = Embed_t.video + type provider = Embed_t.provider + type field = Embed_t.field + type t = Embed_t.t end
\ No newline at end of file diff --git a/lib/models/emoji.ml b/lib/models/emoji.ml index 36b7d4b..ece5bcd 100644 --- a/lib/models/emoji.ml +++ b/lib/models/emoji.ml @@ -1,2 +1,3 @@ module Make(Http : S.Http) = struct + type t = Emoji_t.t end
\ No newline at end of file diff --git a/lib/models/member.ml b/lib/models/member.ml index 6617d23..7fa9c03 100644 --- a/lib/models/member.ml +++ b/lib/models/member.ml @@ -1,4 +1,5 @@ module Make(Http : S.Http) = struct + type t = Member_t.t (* val add_role : Member_t.t -> Role_t.t -> Yojson.Safe.json Deferred.t val remove_role : Member_t.t -> Role_t.t -> Yojson.Safe.json Deferred.t val ban : ?reason:string -> ?days:int -> Member_t.t -> Yojson.Safe.json Deferred.t diff --git a/lib/models/presence.ml b/lib/models/presence.ml index 36b7d4b..2ce9a51 100644 --- a/lib/models/presence.ml +++ b/lib/models/presence.ml @@ -1,2 +1,3 @@ module Make(Http : S.Http) = struct + type t = Presence_t.t end
\ No newline at end of file diff --git a/lib/models/reaction.ml b/lib/models/reaction.ml index 36b7d4b..23de12f 100644 --- a/lib/models/reaction.ml +++ b/lib/models/reaction.ml @@ -1,2 +1,8 @@ module Make(Http : S.Http) = struct + (* open Reaction_t *) + + type t = Reaction_t.t + + (* let delete reaction user = + Http.delete_reaction *) end
\ No newline at end of file |