diff options
| author | pboutill | 2012-01-16 10:10:40 +0000 |
|---|---|---|
| committer | pboutill | 2012-01-16 10:10:40 +0000 |
| commit | 42a1588c7b1d38df5192c80b62b32dbafce07d55 (patch) | |
| tree | 29e68021aeb1baf6b775871376f1d820737632a5 /parsing | |
| parent | 9f208c9353cfcbe765f4b00c067aac71cb903158 (diff) | |
Inductiveops.nb_*{,_env} cleaning
- Functions without _env use the global env.
- More comments about when letin are counted.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14908 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'parsing')
| -rw-r--r-- | parsing/g_xml.ml4 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/parsing/g_xml.ml4 b/parsing/g_xml.ml4 index c9e135edcf..1d55a587f4 100644 --- a/parsing/g_xml.ml4 +++ b/parsing/g_xml.ml4 @@ -133,7 +133,7 @@ let compute_branches_lengths ind = mip.Declarations.mind_consnrealdecls let compute_inductive_nargs ind = - Inductiveops.inductive_nargs (Global.env()) ind + Inductiveops.inductive_nargs ind (* Interpreting constr as a glob_constr *) |