aboutsummaryrefslogtreecommitdiffhomepage
path: root/kernel/names.ml
diff options
context:
space:
mode:
Diffstat (limited to 'kernel/names.ml')
-rw-r--r--kernel/names.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/kernel/names.ml b/kernel/names.ml
index 5dcd8a68f..09c98eafc 100644
--- a/kernel/names.ml
+++ b/kernel/names.ml
@@ -88,6 +88,7 @@ type label = string
type mod_self_id = uniq_ident
let make_msid = make_uid
let debug_string_of_msid = debug_string_of_uid
+let refresh_msid (_,s,dir) = make_uid dir s
let string_of_msid = string_of_uid
let id_of_msid (_,s,_) = s
let label_of_msid (_,s,_) = s