diff options
| author | Adelyn Breelove <[email protected]> | 2018-12-19 13:44:04 -0700 |
|---|---|---|
| committer | Adelyn Breelove <[email protected]> | 2018-12-19 13:44:04 -0700 |
| commit | 1a73007b3aaa17940173eaff1eb4f6703fd9ec0c (patch) | |
| tree | f8563e2a2ab407c616fd40333d42cdd741e93344 /lib/dispatch.ml | |
| parent | Some refactoring of http code (diff) | |
| download | disml-1a73007b3aaa17940173eaff1eb4f6703fd9ec0c.tar.xz disml-1a73007b3aaa17940173eaff1eb4f6703fd9ec0c.zip | |
Re-arrange autogen serialization files and incorporate into dune file
Diffstat (limited to 'lib/dispatch.ml')
| -rw-r--r-- | lib/dispatch.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/dispatch.ml b/lib/dispatch.ml index c38afe2..66c6fee 100644 --- a/lib/dispatch.ml +++ b/lib/dispatch.ml @@ -1,6 +1,7 @@ module Make(H : S.Handler) : S.Dispatch = struct let dispatch ~ev contents = - print_endline (Yojson.Safe.prettify contents); + Printf.printf "Dispatching %s\n%!" ev; + (* print_endline (Yojson.Safe.prettify contents); *) Event.event_of_string ~contents ev |> H.handle_event end
\ No newline at end of file |