diff options
| author | Adelyn Breedlove <[email protected]> | 2018-12-14 16:49:37 -0700 |
|---|---|---|
| committer | Adelyn Breedlove <[email protected]> | 2018-12-14 16:49:37 -0700 |
| commit | 41fbba7d0b7dd9fff8dcb9985a474cfbbd2408f2 (patch) | |
| tree | 690861418bed15de47e7cf5672d96fdacc9abe5e /lib/client.ml | |
| parent | Merge branch 'dev' of https://gitlab.com/Mishio595/disml into dev (diff) | |
| parent | A few metafile updates (diff) | |
| download | disml-41fbba7d0b7dd9fff8dcb9985a474cfbbd2408f2.tar.xz disml-41fbba7d0b7dd9fff8dcb9985a474cfbbd2408f2.zip | |
Merging
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 = { |