diff options
| author |  herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2011-10-11 19:18:02 +0000 |
|---|---|---|
| committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2011-10-11 19:18:02 +0000 |
| commit | bfc3e8cddd58cadc1bc907914a2ccd660be53912 (patch) | |
| tree | 6bf603814e6981139d53a6388f3854189a8e7f09 /plugins | |
| parent | c1234a327b8ef2b52af1410dace719000c360f53 (diff) | |
Moved to a more standard order of arguments (i.e. env followed by evar_map)
for the functions of unification.ml.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14547 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'plugins')
| -rw-r--r-- | plugins/decl_mode/decl_proof_instr.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/plugins/decl_mode/decl_proof_instr.ml b/plugins/decl_mode/decl_proof_instr.ml index 217a8fe4f..6bcda0097 100644 --- a/plugins/decl_mode/decl_proof_instr.ml +++ b/plugins/decl_mode/decl_proof_instr.ml @@ -370,8 +370,8 @@ let find_subsubgoal c ctyp skip submetas gls = let se = Stack.pop stack in try let unifier = - Unification.w_unify env Reduction.CUMUL ~flags:Unification.elim_flags - ctyp se.se_type se.se_evd in + Unification.w_unify env se.se_evd Reduction.CUMUL + ~flags:Unification.elim_flags ctyp se.se_type in if n <= 0 then {se with se_evd=meta_assign se.se_meta |