Remove an assert false and return an error instead of
This commit is contained in:
parent
2ef62f3307
commit
ad09080ee6
1 changed files with 1 additions and 1 deletions
|
@ -132,7 +132,7 @@ let get t key =
|
|||
| Some blob ->
|
||||
Store.read_exn t.store blob >|= function
|
||||
| Blob b -> Ok (Git.Blob.to_string b)
|
||||
| _ -> assert false
|
||||
| _ -> Error (`Value_expected key)
|
||||
|
||||
let get_partial t key ~offset ~length =
|
||||
let open Lwt_result.Infix in
|
||||
|
|
Loading…
Reference in a new issue