diff options
| author |  herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2006-10-25 15:51:24 +0000 |
|---|---|---|
| committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2006-10-25 15:51:24 +0000 |
| commit | e877a89971f17782d05a4f27f7d17497ebd98371 (patch) | |
| tree | d99ee48dd17b8c8ba889db2463f4a408c63c5386 | |
| parent | 20ae362885ce40d5b81526aee0dc96a3aabe2cee (diff) | |
Suite commit 9277
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@9279 85f007b7-540e-0410-9357-904b9bb8a0f7
| -rw-r--r-- | pretyping/clenv.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pretyping/clenv.ml b/pretyping/clenv.ml index 56bec28db..a866da826 100644 --- a/pretyping/clenv.ml +++ b/pretyping/clenv.ml @@ -448,7 +448,7 @@ let clenv_constrain_missing_args mlist clause = let make_clenv_binding_gen hyps_only n gls (c,t) = function | ImplicitBindings largs -> let clause = mk_clenv_from_n gls n (c,t) in - clenv_constrain_dep_args (n <> None) clause largs + clenv_constrain_dep_args hyps_only clause largs | ExplicitBindings lbind -> let clause = mk_clenv_rename_from_n gls n (c,t) in clenv_match_args lbind clause |