diff options
Diffstat (limited to 'pretyping/unification.ml')
| -rw-r--r-- | pretyping/unification.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/pretyping/unification.ml b/pretyping/unification.ml index 5f7e2916b4..34fac5e75f 100644 --- a/pretyping/unification.ml +++ b/pretyping/unification.ml @@ -1193,8 +1193,8 @@ let indirect_dependency d decls = pi1 (List.hd (List.filter (fun (id,_,_) -> dependent_in_decl (mkVar id) d) decls)) let finish_evar_resolution ?(flags=Pretyping.all_and_fail_flags) env initial_sigma (sigma,c) = - let sigma = Pretyping.solve_remaining_evars flags env initial_sigma sigma - in Evd.evar_universe_context sigma, nf_evar sigma c +(* let sigma = Pretyping.solve_remaining_evars flags env initial_sigma sigma +in*) Evd.evar_universe_context sigma, nf_evar sigma c let default_matching_flags sigma = { modulo_conv_on_closed_terms = Some empty_transparent_state; |