diff options
| author | Maxime Dénès | 2018-01-22 09:33:21 +0100 |
|---|---|---|
| committer | Maxime Dénès | 2018-01-22 09:33:21 +0100 |
| commit | 314928aa0a430447a2fab30b9ef1235afa77c054 (patch) | |
| tree | b0de77473ca078c9a49cff9ef19589c07de0e578 /kernel/csymtable.ml | |
| parent | 9aa2464375c1515aa64df7dc910e2f324e34c82f (diff) | |
| parent | 045193aedfd6a262981f06c500af1cc13df2900f (diff) | |
Merge PR #6506: Fast rel lookup
Diffstat (limited to 'kernel/csymtable.ml')
| -rw-r--r-- | kernel/csymtable.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/csymtable.ml b/kernel/csymtable.ml index 2ffe36fcf7..712c66f11d 100644 --- a/kernel/csymtable.ml +++ b/kernel/csymtable.ml @@ -198,7 +198,7 @@ and slot_for_fv env fv = let rv = Pre_env.lookup_rel_val i env in begin match force_lazy_val rv with | None -> - env.env_rel_context |> Context.Rel.lookup i |> RelDecl.get_value |> fill_fv_cache rv i val_of_rel env_of_rel + env |> Pre_env.lookup_rel i |> RelDecl.get_value |> fill_fv_cache rv i val_of_rel env_of_rel | Some (v, _) -> v end | FVuniv_var idu -> |