diff options
author | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-04-15 19:36:51 +0000 |
---|---|---|
committer | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-04-15 19:36:51 +0000 |
commit | 2d1910dc6ec51827b5ef4f05b12f0641f46a66f7 (patch) | |
tree | 6e9204285e694307e23f097d35e1f604c2f0ca5b /library/global.ml | |
parent | ebaecfe6c1e84fa3615b295dad85cbf4318a4c75 (diff) |
Minor simplifications in Declaremods and Safe_typing
- get_module_substobjs (resp. modtype) without useless mp_from arg
- no need for the whole Safe_typing.pack_module
- ...
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16407 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'library/global.ml')
-rw-r--r-- | library/global.ml | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/library/global.ml b/library/global.ml index 3b911e229..929f7418f 100644 --- a/library/global.ml +++ b/library/global.ml @@ -104,10 +104,6 @@ let end_modtype fs id = global_env := newenv; kn -let pack_module () = - pack_module !global_env - - let lookup_named id = lookup_named id (env()) let lookup_constant kn = lookup_constant kn (env()) |