diff options
| author | Β·ππ΄πππ©π€ | 2025-12-11 20:35:49 +0000 |
|---|---|---|
| committer | Β·ππ΄πππ©π€ | 2025-12-11 20:35:49 +0000 |
| commit | bbedaf8b0a8a64fd0e32521a23c1309523d14264 (patch) | |
| tree | 5728a0b24a8f47eee55e4899b7effaa156e1fa90 | |
| parent | e7beebadbb7c0527fe3bfd4b977e447126d24468 (diff) | |
| download | nixtaml-bbedaf8b0a8a64fd0e32521a23c1309523d14264.tar nixtaml-bbedaf8b0a8a64fd0e32521a23c1309523d14264.tar.gz nixtaml-bbedaf8b0a8a64fd0e32521a23c1309523d14264.tar.bz2 nixtaml-bbedaf8b0a8a64fd0e32521a23c1309523d14264.tar.lz nixtaml-bbedaf8b0a8a64fd0e32521a23c1309523d14264.tar.xz nixtaml-bbedaf8b0a8a64fd0e32521a23c1309523d14264.tar.zst nixtaml-bbedaf8b0a8a64fd0e32521a23c1309523d14264.zip | |
Do error, not fail in Darcs context
| -rw-r--r-- | lib/lockfile.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/lockfile.ml b/lib/lockfile.ml index cbafc27..e7a2621 100644 --- a/lib/lockfile.ml +++ b/lib/lockfile.ml @@ -161,7 +161,8 @@ module Darcs = struct | `Assumed (Some actx) -> encode_tag 0 string actx | `Stated sctx -> encode_tag 1 string sctx (* We canβt lock without a stable reference *) - | `Assumed None -> failwith "Missing assumed Darcs context"; + | `Assumed None -> + Error.msgf Meta.none "Darcs context cannot be None when locking" and dec = function | [|tag; value|] -> begin |