diff options
| author | Son Ho | 2021-11-22 19:53:50 +0100 |
|---|---|---|
| committer | Son Ho | 2021-11-22 19:53:50 +0100 |
| commit | a5959cbbf1c4d1fe24a5019a9b01b4b54211261a (patch) | |
| tree | 5d0381be72c9052eadc7f024c8f181b9ae9116cd | |
| parent | 115960297c2f9cf839d51232dd2961e0d4817657 (diff) | |
Uncomment read_place
Diffstat (limited to '')
| -rw-r--r-- | src/Interpreter.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Interpreter.ml b/src/Interpreter.ml index ff19b3f6..638e8b45 100644 --- a/src/Interpreter.ml +++ b/src/Interpreter.ml @@ -591,7 +591,6 @@ let rec read_projection (config : config) (access : path_access) (env : env) (* Entering loans failed *) | res -> res) -(* (** Read the value at the end of a place *) let read_place (config : config) (access : path_access) (p : place) (env0 : env) : typed_value path_access_result = @@ -605,6 +604,7 @@ let read_place (config : config) (access : path_access) (p : place) (env0 : env) in read_in_env env0 +(* (** Update the value at the end of a projection *) let rec write_projection (config : config) (nv : typed_value) (p : projection) (v : typed_value) : typed_value path_access_result = |