aboutsummaryrefslogtreecommitdiffhomepage
path: root/library
diff options
context:
space:
mode:
authorGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2007-11-09 09:40:21 +0000
committerGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2007-11-09 09:40:21 +0000
commit23b33427a012b7df1926f9ecae17968ac5016e2d (patch)
treec81379f84af93d6f0e4a970995990a600ca491b9 /library
parenteec1265235f73241c92b8bf1de2fc4a92aef6c2d (diff)
Rétablissement compatibilité constr_of_reference
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10308 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'library')
-rw-r--r--library/libnames.ml2
-rw-r--r--library/libnames.mli2
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