diff options
| author | herbelin | 2009-02-06 10:03:55 +0000 |
|---|---|---|
| committer | herbelin | 2009-02-06 10:03:55 +0000 |
| commit | 5ad9c7361fd63728623a1c8f9eab5e134d4025b3 (patch) | |
| tree | 258ac4a196b224c14fcdeeb84e2a38bf1da0eccd /pretyping | |
| parent | d1f92d3bc420d0a5115a4533ca59b17f6b823515 (diff) | |
From v8.2 to trunk:
- commit 11871 (Miller's pattern detection bug) + a corresponding test
- commit 11883 (.ml4 to .cmxs in coq_makefile)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@11884 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping')
| -rw-r--r-- | pretyping/evarutil.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/pretyping/evarutil.ml b/pretyping/evarutil.ml index 3563c77887..40599f4a35 100644 --- a/pretyping/evarutil.ml +++ b/pretyping/evarutil.ml @@ -1015,6 +1015,7 @@ let is_unification_pattern_evar env (_,args) l t = l else (* Probably strong restrictions coming from t being evar-closed *) + let t = expand_vars_in_term env t in let fv_rels = free_rels t in let fv_ids = global_vars env t in List.filter (fun c -> |