diff options
author | Son Ho | 2023-09-01 14:43:11 +0200 |
---|---|---|
committer | Son Ho | 2023-09-01 14:43:11 +0200 |
commit | 1e39985a44646f1c352def6e4b29365a113a5dee (patch) | |
tree | 2d64633f1ae8d2bd941f085ad2dbada3ef7896d8 /compiler/Contexts.ml | |
parent | 06360698561019d7f480dcb4263e2099d9a03ca5 (diff) |
Compute the normalized trait types maps and update Interpreter
Diffstat (limited to '')
-rw-r--r-- | compiler/Contexts.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/Contexts.ml b/compiler/Contexts.ml index 0719364e..9d22a643 100644 --- a/compiler/Contexts.ml +++ b/compiler/Contexts.ml @@ -40,6 +40,7 @@ type dummy_var_id = DummyVarId.id [@@deriving show, ord] fn f x : fun_type = let id = fresh_id () in ... + fun () -> ... let g = f x in // <-- the fresh identifier gets generated here let x1 = g () in // <-- no fresh generation here @@ -315,7 +316,6 @@ type eval_ctx = { (** The map from const generic vars to their values. Those values can be symbolic values or concrete values (in the latter case: if we run in interpreter mode) *) - trait_clauses : etrait_ref list; norm_trait_etypes : ety ETraitTypeRefMap.t; (** The normalized trait types (a map from trait types to their representatives). Note that this doesn't support account higher-order types. *) |