diff -r 67f4ac759100 -r 931c336b0707 src/Pure/name_space.ML
--- a/src/Pure/name_space.ML	Wed Oct 01 18:13:41 1997 +0200
+++ b/src/Pure/name_space.ML	Wed Oct 01 18:19:18 1997 +0200
@@ -11,6 +11,7 @@
 
 signature NAME_SPACE =
 sig
+  val separator: string		(*single char!*)
   val unpack: string -> string list
   val pack: string list -> string
   val qualified: string -> bool