aboutsummaryrefslogtreecommitdiff
path: root/lib/s.ml
diff options
context:
space:
mode:
authorAdelyn Breelove <[email protected]>2019-01-14 08:32:20 -0700
committerAdelyn Breelove <[email protected]>2019-01-14 08:32:20 -0700
commitad6415d4dd2e7a595f4aa8a5e231ac875f61903c (patch)
tree1dec5d5f5f896eca8499071df50f3aa6370b1146 /lib/s.ml
parentMerge branch 'switch-to-deriving_yojson' into 'master' (diff)
downloaddisml-ad6415d4dd2e7a595f4aa8a5e231ac875f61903c.tar.xz
disml-ad6415d4dd2e7a595f4aa8a5e231ac875f61903c.zip
Member methods are here
Diffstat (limited to 'lib/s.ml')
-rw-r--r--lib/s.ml18
1 files changed, 8 insertions, 10 deletions
diff --git a/lib/s.ml b/lib/s.ml
index 86446aa..c1c4583 100644
--- a/lib/s.ml
+++ b/lib/s.ml
@@ -1,6 +1,6 @@
open Async
-module type Token = sig
+module type ClientOptions = sig
val token : string
end
@@ -46,15 +46,13 @@ end
module type Member = sig
type t = Member_t.t
- (* val add_role : Member_t.t -> Role_t.t -> Yojson.Safe.json Deferred.Or_error.t
- val remove_role : Member_t.t -> Role_t.t -> Yojson.Safe.json Deferred.Or_error.t
- val ban : ?reason:string -> ?days:int -> Member_t.t -> Yojson.Safe.json Deferred.Or_error.t
- val ban : ?reason:string -> Member_t.t -> Yojson.Safe.json Deferred.Or_error.t
- val kick : ?reason:string -> Member_t.t -> Yojson.Safe.json Deferred.Or_error.t
- val mute : Member_t.t -> Yojson.Safe.json Deferred.Or_error.t
- val deafen : Member_t.t -> Yojson.Safe.json Deferred.Or_error.t
- val unmute : Member_t.t -> Yojson.Safe.json Deferred.Or_error.t
- val undeafen : Member_t.t -> Yojson.Safe.json Deferred.Or_error.t *)
+ val add_role : role:Role_t.t -> Member_t.t -> unit Deferred.Or_error.t
+ val remove_role : role:Role_t.t -> Member_t.t -> unit Deferred.Or_error.t
+ val ban : ?reason:string -> ?days:int -> Member_t.t -> unit Deferred.Or_error.t
+ val kick : ?reason:string -> Member_t.t -> unit Deferred.Or_error.t
+ val deafen : Member_t.t -> unit Deferred.Or_error.t
+ val unmute : Member_t.t -> unit Deferred.Or_error.t
+ val undeafen : Member_t.t -> unit Deferred.Or_error.t
end
module type Reaction = sig