diff options
| author |  letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2012-10-02 15:58:10 +0000 |
|---|---|---|
| committer | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2012-10-02 15:58:10 +0000 |
| commit | 8c24fc1ba49a1623dbecbea82c9fef238f17c4ee (patch) | |
| tree | 2ed964bfe61d0d7650dc51b07313bbbc13937dc0 /kernel/mod_subst.ml | |
| parent | 85c509a0fada387d3af96add3dac6a7c702b5d01 (diff) | |
Remove some dead code in the vm
Apparently Cysmtable.set_global_boxed is unused,
and removing it allows to get rid of a bunch of C code
concerning "boxed" things (including ACCUMULATECOND
instruction).
Still TODO: Csymtable.set_transparent_const and
Csymtable.set_opaque_const appear to be no-ops.
Should we remove them ?
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@15845 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/mod_subst.ml')
| -rw-r--r-- | kernel/mod_subst.ml | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/kernel/mod_subst.ml b/kernel/mod_subst.ml index 5ba4a9789..8bd0a653c 100644 --- a/kernel/mod_subst.ml +++ b/kernel/mod_subst.ml @@ -61,8 +61,6 @@ module Umap = struct let add_mp mp x (m1,m2) = (MPmap.add mp x m1, m2) let find_mp mp map = MPmap.find mp (fst map) let find_mbi mbi map = MBImap.find mbi (snd map) - let mem_mp mp map = MPmap.mem mp (fst map) - let mem_mbi mbi map = MBImap.mem mbi (snd map) let iter_mbi f map = MBImap.iter f (snd map) let fold fmp fmbi (m1,m2) i = MPmap.fold fmp m1 (MBImap.fold fmbi m2 i) |