swrup/mte
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Browse source
This commit is contained in:
swrup 2025-10-17 16:04:04 +02:00
parent 630964dcb6
commit cfa9788e7c
1 changed files with 2 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

7
src/util.ml
View file

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