summaryrefslogtreecommitdiff
path: root/compiler/Invariants.ml
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/Invariants.ml')
-rw-r--r--compiler/Invariants.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/Invariants.ml b/compiler/Invariants.ml
index 5b81cc02..27dcb330 100644
--- a/compiler/Invariants.ml
+++ b/compiler/Invariants.ml
@@ -561,9 +561,9 @@ let check_typing_invariant (ctx : C.eval_ctx) : unit =
| V.AIgnoredMutBorrow (_opt_bid, av), T.Mut ->
assert (av.V.ty = ref_ty)
| ( V.AEndedIgnoredMutBorrow
- { given_back_loans_proj; child; given_back_meta = _ },
+ { given_back; child; given_back_meta = _ },
T.Mut ) ->
- assert (given_back_loans_proj.V.ty = ref_ty);
+ assert (given_back.V.ty = ref_ty);
assert (child.V.ty = ref_ty)
| V.AProjSharedBorrow _, T.Shared -> ()
| _ -> raise (Failure "Inconsistent context"))