diff options
author | 2015-09-27 14:16:54 +0200 | |
---|---|---|
committer | 2015-09-27 14:17:56 +0200 | |
commit | ca14b0bb67c9db000736333a056fc147c6f5199c (patch) | |
tree | 45892d06e0f92adb2d08786cfa04cb64350806a8 /tactics/equality.ml | |
parent | f52826877059858fb3fcd4314c629ed63d90a042 (diff) |
Removing uselessly duplicated function in Evd.
Diffstat (limited to 'tactics/equality.ml')
-rw-r--r-- | tactics/equality.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/equality.ml b/tactics/equality.ml index ec0e1d2f4..a10d8a074 100644 --- a/tactics/equality.ml +++ b/tactics/equality.ml @@ -1095,7 +1095,7 @@ let minimal_free_rels_rec env sigma = let sig_clausal_form env sigma sort_of_ty siglen ty dflt = let sigdata = find_sigma_data env sort_of_ty in - let evdref = ref (Evd.create_goal_evar_defs sigma) in + let evdref = ref (Evd.clear_metas sigma) in let rec sigrec_clausal_form siglen p_i = if Int.equal siglen 0 then (* is the default value typable with the expected type *) |