diff options
author | Maxime Dénès <mail@maximedenes.fr> | 2018-02-24 09:26:03 +0100 |
---|---|---|
committer | Maxime Dénès <mail@maximedenes.fr> | 2018-02-24 09:26:03 +0100 |
commit | 7895d276146496648d576914aab4aded4b4a32cd (patch) | |
tree | 24e8de17078242c1ea39e31ecfe55a1c024d0eff /engine/evd.ml | |
parent | 0c5f0afffd37582787f79267d9841259095b7edc (diff) | |
parent | 9bebbb96e58b3c1b0f7f88ba2af45462eae69b0f (diff) |
Merge PR #6745: [ast] Improve precision of Ast location recognition in serialization.
Diffstat (limited to 'engine/evd.ml')
-rw-r--r-- | engine/evd.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/engine/evd.ml b/engine/evd.ml index 0e9472158..2142cee37 100644 --- a/engine/evd.ml +++ b/engine/evd.ml @@ -802,7 +802,7 @@ let make_evar_universe_context e l = | None -> uctx | Some us -> List.fold_left - (fun uctx (loc,id) -> + (fun uctx { CAst.loc; v = id } -> fst (UState.new_univ_variable ?loc univ_rigid (Some id) uctx)) uctx us |