aboutsummaryrefslogtreecommitdiff
path: root/kernel/names.mli
diff options
context:
space:
mode:
Diffstat (limited to 'kernel/names.mli')
-rw-r--r--kernel/names.mli8
1 files changed, 6 insertions, 2 deletions
diff --git a/kernel/names.mli b/kernel/names.mli
index 4c51269d08..051087f5d4 100644
--- a/kernel/names.mli
+++ b/kernel/names.mli
@@ -42,24 +42,28 @@ val string_of_dirpath : dir_path -> string
(*s Unique identifier to be used as "self" in structures and
signatures - invisible for users *)
-
+ type label
type mod_self_id
(* The first argument is a file name - to prevent conflict between
different files *)
val make_msid : dir_path -> string -> mod_self_id
val id_of_msid : mod_self_id -> identifier
+val label_of_msid : mod_self_id -> label
val debug_string_of_msid : mod_self_id -> string
+val string_of_msid : mod_self_id -> string
(*s Unique names for bound modules *)
type mod_bound_id
val make_mbid : dir_path -> string -> mod_bound_id
val id_of_mbid : mod_bound_id -> identifier
+val label_of_mbid : mod_bound_id -> label
val debug_string_of_mbid : mod_bound_id -> string
+val string_of_mbid : mod_bound_id -> string
(*s Names of structure elements *)
-type label
+
val mk_label : string -> label
val string_of_label : label -> string