aboutsummaryrefslogtreecommitdiff
path: root/kernel/names.ml
diff options
context:
space:
mode:
Diffstat (limited to 'kernel/names.ml')
-rw-r--r--kernel/names.ml2
1 files changed, 0 insertions, 2 deletions
diff --git a/kernel/names.ml b/kernel/names.ml
index 7e9d9ecf33..a92adc6071 100644
--- a/kernel/names.ml
+++ b/kernel/names.ml
@@ -81,8 +81,6 @@ let string_of_path sp =
if sl = [] then string_of_id id
else (string_of_dirpath sl) ^ "." ^ (string_of_id id)
-let pr_sp sp = [< 'sTR (string_of_path sp) >]
-
let sp_ord sp1 sp2 =
let (p1,id1) = repr_path sp1
and (p2,id2) = repr_path sp2 in