diff options
| author | barras | 2001-11-29 10:34:51 +0000 |
|---|---|---|
| committer | barras | 2001-11-29 10:34:51 +0000 |
| commit | e9d2a45987b0b4fcfa7ec4d14e35e9a7a0d62028 (patch) | |
| tree | db8ec6dd826e103f725ac023eb7b3cca2357b0e1 /kernel/names.ml | |
| parent | 86952ac8ad1dba395cb4724ac0b4f54774448944 (diff) | |
reparation de Locate
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2247 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/names.ml')
| -rw-r--r-- | kernel/names.ml | 2 |
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 |