diff --git a/cohttp-async/examples/s3_cp.ml b/cohttp-async/examples/s3_cp.ml
index 0c95d7bd6..f0e8687fb 100644
--- a/cohttp-async/examples/s3_cp.ml
+++ b/cohttp-async/examples/s3_cp.ml
@@ -43,6 +43,8 @@ open Base
 open Core
 open Async
 
+module Time = Time_float
+
 (* open Cohttp *)
 module Client = Cohttp_async.Client
 module Body = Cohttp_async.Body