diff options
-rw-r--r-- | library/libnames.ml | 2 | ||||
-rw-r--r-- | library/libnames.mli | 2 |
2 files changed, 0 insertions, 4 deletions
diff --git a/library/libnames.ml b/library/libnames.ml index 4d25c42f9..dcdd5ac41 100644 --- a/library/libnames.ml +++ b/library/libnames.ml @@ -49,10 +49,8 @@ let constr_of_global = function | ConstructRef sp -> mkConstruct sp | IndRef sp -> mkInd sp -(* let constr_of_reference = constr_of_global let reference_of_constr = global_of_constr -*) module RefOrdered = struct diff --git a/library/libnames.mli b/library/libnames.mli index 6c6d435be..fe5033d73 100644 --- a/library/libnames.mli +++ b/library/libnames.mli @@ -34,11 +34,9 @@ val constr_of_global : global_reference -> constr raise [Not_found] if not a global reference *) val global_of_constr : constr -> global_reference -(* (* Obsolete synonyms for constr_of_global and global_of_constr *) val constr_of_reference : global_reference -> constr val reference_of_constr : constr -> global_reference -*) module Refset : Set.S with type elt = global_reference module Refmap : Map.S with type key = global_reference |