From d7c619b29f80eff6cc0551d1a64eb92d789b601e Mon Sep 17 00:00:00 2001 From: msozeau Date: Wed, 20 Apr 2011 11:46:07 +0000 Subject: Allow betaiota when checking unification of the types of metas (fixes ATBR contrib). git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14032 85f007b7-540e-0410-9357-904b9bb8a0f7 --- pretyping/unification.ml | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'pretyping/unification.ml') diff --git a/pretyping/unification.ml b/pretyping/unification.ml index d226c94d1..03ef66836 100644 --- a/pretyping/unification.ml +++ b/pretyping/unification.ml @@ -656,7 +656,8 @@ let unify_type env sigma flags mv status c = let mvty = nf_meta sigma mvty in unify_to_type env sigma {flags with modulo_delta = flags.modulo_delta_types; - modulo_conv_on_closed_terms = Some flags.modulo_delta_types} + modulo_conv_on_closed_terms = Some flags.modulo_delta_types; + modulo_betaiota = true} c status mvty (* Move metas that may need coercion at the end of the list of instances *) -- cgit v1.2.3