Fix also s3_cp

Signed-off-by: Marcello Seri <marcello.seri@gmail.com>
mirage · Jul 21, 2023 · 4fc38cb · 4fc38cb
1 parent 5c1ecf5
commit 4fc38cb
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 1 deletion.
diff --git a/examples/async/dune b/examples/async/dune
@@ -1,5 +1,5 @@
 (executables
- (names hello_world receive_post)
+ (names hello_world receive_post s3_cp)
  (libraries mirage-crypto cohttp-async base async_kernel core_unix.command_unix))
 
 (alias

diff --git a/examples/async/s3_cp.ml b/examples/async/s3_cp.ml
@@ -45,6 +45,8 @@ open Async
 open Cohttp
 open Cohttp_async
 
+module Time = Time_float
+
 let ksrt (k, _) (k', _) = String.compare k k'
 
 module Compat = struct