diff options
Diffstat (limited to 'kernel')
| -rw-r--r-- | kernel/names.ml | 2 | ||||
| -rw-r--r-- | kernel/names.mli | 1 |
2 files changed, 0 insertions, 3 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 diff --git a/kernel/names.mli b/kernel/names.mli index 7f410149cc..08d2db3571 100644 --- a/kernel/names.mli +++ b/kernel/names.mli @@ -47,7 +47,6 @@ val repr_path : section_path -> dir_path * identifier (* Parsing and printing of section path as ["coq_root.module.id"] *) val string_of_path : section_path -> string -val pr_sp : section_path -> Pp.std_ppcmds module Spset : Set.S with type elt = section_path module Sppred : Predicate.S with type elt = section_path |