summaryrefslogtreecommitdiff
path: root/src/InterpreterBorrows.ml
diff options
context:
space:
mode:
authorSon Ho2022-01-18 18:00:09 +0100
committerSon Ho2022-01-18 18:00:09 +0100
commit32eadcca12c4061bd09e36a65447123da6a4826c (patch)
tree1bf0f6fd59681149f3f20db0ee7e394765eb1556 /src/InterpreterBorrows.ml
parenta49c6545d2c9d0719067144e426481aaadaa4e70 (diff)
Update the types and deserialization following charon's updates
Diffstat (limited to '')
-rw-r--r--src/InterpreterBorrows.ml7
1 files changed, 5 insertions, 2 deletions
diff --git a/src/InterpreterBorrows.ml b/src/InterpreterBorrows.ml
index 9d332543..9331d9f3 100644
--- a/src/InterpreterBorrows.ml
+++ b/src/InterpreterBorrows.ml
@@ -432,11 +432,14 @@ let give_back_value (config : C.config) (bid : V.BorrowId.id)
let give_back_symbolic_value (_config : C.config)
(proj_regions : T.RegionId.Set.t) (proj_ty : T.rty) (sv : V.symbolic_value)
(nsv : V.symbolic_value) (ctx : C.eval_ctx) : C.eval_ctx =
- let subst local_regions local_ty =
+ let subst (abs : V.abs) abs_proj_ty =
+ (* TODO: check that we can consume this symbolic value - this is not
+ * a precondition, purely a sanity check *)
+ raise Errors.Unimplemented;
let child_proj =
if sv.sv_id = nsv.sv_id then None
else
- Some (mk_aproj_borrows_from_symbolic_value local_regions nsv local_ty)
+ Some (mk_aproj_borrows_from_symbolic_value abs.regions nsv abs_proj_ty)
in
V.AEndedProjLoans child_proj
in