From bfc3e8cddd58cadc1bc907914a2ccd660be53912 Mon Sep 17 00:00:00 2001 From: herbelin Date: Tue, 11 Oct 2011 19:18:02 +0000 Subject: 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 --- plugins/decl_mode/decl_proof_instr.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'plugins') diff --git a/plugins/decl_mode/decl_proof_instr.ml b/plugins/decl_mode/decl_proof_instr.ml index 217a8fe4f3..6bcda00978 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 -- cgit v1.2.3