summaryrefslogtreecommitdiff
path: root/src/InterpreterProjectors.ml
diff options
context:
space:
mode:
authorSon Ho2022-01-06 11:01:44 +0100
committerSon Ho2022-01-06 11:01:44 +0100
commit6a3faa82e09e3fbf23014b53a2b40d420bc70c9b (patch)
tree97cb2ba076c8229a76d168b5ec2ce8e6a87b906f /src/InterpreterProjectors.ml
parent8cac3c5cb5f9c36ffa878cf32ce858d171e4e3c8 (diff)
Cleanup a bit more the dependencies and activate more warnings/errors
Diffstat (limited to 'src/InterpreterProjectors.ml')
-rw-r--r--src/InterpreterProjectors.ml5
1 files changed, 1 insertions, 4 deletions
diff --git a/src/InterpreterProjectors.ml b/src/InterpreterProjectors.ml
index 9a487c89..c3fd0708 100644
--- a/src/InterpreterProjectors.ml
+++ b/src/InterpreterProjectors.ml
@@ -3,12 +3,9 @@ module V = Values
module E = Expressions
module C = Contexts
module Subst = Substitute
-module A = CfimAst
module L = Logging
open TypesUtils
open ValuesUtils
-module Inv = Invariants
-module S = Synthesis
open Utils
open InterpreterUtils
@@ -24,7 +21,7 @@ let rec apply_proj_borrows_on_shared_borrow (ctx : C.eval_ctx)
V.abstract_shared_borrows =
(* Sanity check - TODO: move this elsewhere (here we perform the check at every
* recursive call which is a bit overkill...) *)
- let ety = Substitute.erase_regions ty in
+ let ety = Subst.erase_regions ty in
assert (ety = v.V.ty);
(* Project *)
match (v.V.value, ty) with