2025-10-17 16:04:04 +02:00 · 2025-10-17 16:04:04 +02:00 · cfa9788e7c
commit cfa9788e7c
parent 630964dcb6
1 changed files with 2 additions and 5 deletions
--- a/src/util.ml
+++ b/src/util.ml
@ -24,10 +24,7 @@ let ptime_add_span_exn p span =
 (* -- *** -- *)

 (* TODO bin
-   - no [Bin.of_string] ?
-   - what to do with the int ref?
-     is it for signaling error? *)
+   - no [Bin.of_string] ? *)
 let bin_of_string bin s =
-  let off = ref 0 in
-  let v = Bin.decode bin s off in
+  let v = Bin.decode bin s (ref 0) in
  Ok v