Merge pull request #385 from bikallem/mtime-deprecation

time: Mtime.Spand.to_s has been deprecated in mtime 2.0.0
ocaml-multicore · Dec 9, 2022 · c987f99 · c987f99
2 parents 90de1d4 + 0d11d19
commit c987f99
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 3 deletions.
diff --git a/dune-project b/dune-project
@@ -26,7 +26,7 @@
   (hmap (>= 0.8.1))
   (astring (and (>= 0.8.5) :with-test))
   (crowbar (and (>= 0.2) :with-test))
-  (mtime (>= 1.2.0))
+  (mtime (>= 2.0.0))
   (alcotest (and (>= 1.4.0) :with-test))))
 (package
  (name eio_linux)

diff --git a/eio.opam b/eio.opam
@@ -20,7 +20,7 @@ depends: [
   "hmap" {>= "0.8.1"}
   "astring" {>= "0.8.5" & with-test}
   "crowbar" {>= "0.2" & with-test}
-  "mtime" {>= "1.2.0"}
+  "mtime" {>= "2.0.0"}
   "alcotest" {>= "1.4.0" & with-test}
   "odoc" {with-doc}
 ]

diff --git a/lib_eio/time.ml b/lib_eio/time.ml
@@ -88,7 +88,7 @@ module Timeout = struct
   let pp f = function
     | Unlimited -> Fmt.string f "(no timeout)"
     | Timeout (_clock, d) ->
-      let d = Mtime.Span.to_s d in
+      let d = Mtime.Span.to_float_ns d /. 1e9 in
       pp_duration f d
     | Deprecated (_clock, d) ->
       pp_duration f d