diff options
| author | Adelyn Breelove <[email protected]> | 2018-12-14 10:52:36 -0700 |
|---|---|---|
| committer | Adelyn Breelove <[email protected]> | 2018-12-14 10:52:36 -0700 |
| commit | af684566617ebce536e9f30693aa3e225af906c4 (patch) | |
| tree | 0184187b0b90e402f74402ffd6975d54fd1b5bb9 /lib/client.ml | |
| parent | Fix more dispatch issues (diff) | |
| download | disml-af684566617ebce536e9f30693aa3e225af906c4.tar.xz disml-af684566617ebce536e9f30693aa3e225af906c4.zip | |
There's a lot going on
Diffstat (limited to 'lib/client.ml')
| -rw-r--r-- | lib/client.ml | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lib/client.ml b/lib/client.ml index 9211281..229c9cc 100644 --- a/lib/client.ml +++ b/lib/client.ml @@ -1,10 +1,12 @@ open Async -module Make(T : S.Token)(H : S.Handler) = struct +module Make(T : S.Token)(H : S.Handler_f) = struct include T module Http = Http.Make(T) - module Dispatch = Dispatch.Make(H) + module Models = Models.Make(Http) + module Handler = H.Make(Models) + module Dispatch = Dispatch.Make(Handler) module Sharder = Sharder.Make(Http)(Dispatch) type t = { |