aboutsummaryrefslogtreecommitdiff
path: root/lib/client.ml
diff options
context:
space:
mode:
authorMishio595 <[email protected]>2018-11-25 16:02:37 -0700
committerMishio595 <[email protected]>2018-11-25 16:02:37 -0700
commit011e3224c0292dfcb0024daf474d4ef1e00b82f0 (patch)
treea04caad1d49ee4092cfb3bb3506ad5dba85120a4 /lib/client.ml
parentMajor structural changes (diff)
downloaddisml-011e3224c0292dfcb0024daf474d4ef1e00b82f0.tar.xz
disml-011e3224c0292dfcb0024daf474d4ef1e00b82f0.zip
A lot is going on...
Diffstat (limited to 'lib/client.ml')
-rw-r--r--lib/client.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/client.ml b/lib/client.ml
index 7c2d532..374287c 100644
--- a/lib/client.ml
+++ b/lib/client.ml
@@ -2,7 +2,7 @@ open Async
type t = {
sharder: Sharder.t Ivar.t;
- handler: (string * Model.t) Pipe.Writer.t;
+ handler: string Pipe.Writer.t;
token: string;
}
@@ -14,7 +14,7 @@ let make ~handler token =
}
let start ?count client =
- Sharder.start ?count ~handler:client.handler client.token
+ Sharder.start ?count client.token
>>| fun sharder ->
Ivar.fill_if_empty client.sharder sharder;
client