module_path --> ModPath.t, kernel_name --> KerName.t

For the moment, the compatibility names about these new modules
are still used in the rest of Coq.

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16220 85f007b7-540e-0410-9357-904b9bb8a0f7

1 files changed, 2 insertions, 10 deletions

diff --git a/library/nametab.ml b/library/nametab.ml
index 0d326a49c..92b13d669 100644
--- a/library/nametab.ml
+++ b/library/nametab.ml
@@ -281,17 +281,9 @@ struct
   let equal e1 e2 = Int.equal (ExtRefOrdered.compare e1 e2) 0
 end
 
-module KnEqual =
-struct
-  type t = kernel_name
-  let equal = Names.kn_equal
-end
+module KnEqual = Names.KerName
 
-module MPEqual =
-struct
-  type t = module_path
-  let equal = mp_eq
-end
+module MPEqual = Names.ModPath
 
 module ExtRefTab = Make(FullPath)(ExtRefEqual)
 module KnTab = Make(FullPath)(KnEqual)