diff options
author | Son Ho | 2022-01-18 18:00:09 +0100 |
---|---|---|
committer | Son Ho | 2022-01-18 18:00:09 +0100 |
commit | 32eadcca12c4061bd09e36a65447123da6a4826c (patch) | |
tree | 1bf0f6fd59681149f3f20db0ee7e394765eb1556 /src/InterpreterBorrows.ml | |
parent | a49c6545d2c9d0719067144e426481aaadaa4e70 (diff) |
Update the types and deserialization following charon's updates
Diffstat (limited to '')
-rw-r--r-- | src/InterpreterBorrows.ml | 7 |
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 |