diff options
| author | herbelin | 2008-02-09 11:31:35 +0000 |
|---|---|---|
| committer | herbelin | 2008-02-09 11:31:35 +0000 |
| commit | bd8b71db33fb9e40575713bc58ae39ccf9f68ab7 (patch) | |
| tree | 4630797ba70528ffeaf076081720866efea3e7dc /pretyping/clenv.ml | |
| parent | 667de252676eb051fc4e056234f505ebafc335ca (diff) | |
Solde de code mort et petites optimisations sur lesquels je suis
tombé au cours du temps
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10544 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping/clenv.ml')
| -rw-r--r-- | pretyping/clenv.ml | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/pretyping/clenv.ml b/pretyping/clenv.ml index 18a22e5c71..3406d06aa4 100644 --- a/pretyping/clenv.ml +++ b/pretyping/clenv.ml @@ -151,9 +151,6 @@ let mk_clenv_from_n gls n (c,cty) = let mk_clenv_from gls = mk_clenv_from_n gls None -let mk_clenv_rename_from gls (c,t) = - mk_clenv_from gls (c,rename_bound_var (pf_env gls) [] t) - let mk_clenv_rename_from_n gls n (c,t) = mk_clenv_from_n gls n (c,rename_bound_var (pf_env gls) [] t) |