aboutsummaryrefslogtreecommitdiff
path: root/library
diff options
context:
space:
mode:
authorherbelin2007-05-16 18:39:35 +0000
committerherbelin2007-05-16 18:39:35 +0000
commit01eb823bc346f06e0a075a9dc2bbf6aa9e70b2d1 (patch)
tree7ab3dc17571e33c12c01ed905e78803d79185bbf /library
parent3101ff981d36359f74d5996447ba70f41398e72b (diff)
Correction bug calcul des implicites en présence d'evars dans les types
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@9827 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'library')
-rw-r--r--library/impargs.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/library/impargs.ml b/library/impargs.ml
index 52ea66de0c..f3da637de5 100644
--- a/library/impargs.ml
+++ b/library/impargs.ml
@@ -185,6 +185,7 @@ let add_free_rels_until strict strongly_strict revpat bound env m pos acc =
| Case _ when rig ->
if strict then () else
iter_constr_with_full_binders push_lift (frec false) ed c
+ | Evar _ -> ()
| _ ->
iter_constr_with_full_binders push_lift (frec rig) ed c
in