robur/git-kv
4
0
Fork 0
Code Issues Pull requests 1 Projects Releases Packages Wiki Activity Actions

Remove an assert false and return an error instead of

Browse source
This commit is contained in:
Romain Calascibetta 2022-09-21 12:02:19 +02:00
parent 2ef62f3307
commit ad09080ee6
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/git_kv.ml
View file

@ -132,7 +132,7 @@ let get t key =
| Some blob -> | Some blob ->
Store.read_exn t.store blob >|= function Store.read_exn t.store blob >|= function
| Blob b -> Ok (Git.Blob.to_string b) | Blob b -> Ok (Git.Blob.to_string b)
| _ -> assert false | _ -> Error (`Value_expected key)
let get_partial t key ~offset ~length = let get_partial t key ~offset ~length =
let open Lwt_result.Infix in let open Lwt_result.Infix in