src/Pure/Isar/locale.ML

--- a/src/Pure/Isar/locale.ML	Sat Oct 24 19:47:37 2009 +0200
+++ b/src/Pure/Isar/locale.ML	Sat Oct 24 20:54:08 2009 +0200
@@ -125,7 +125,7 @@
 structure Locales = TheoryDataFun
 (
   type T = locale Name_Space.table;
-  val empty = Name_Space.empty_table;
+  val empty = Name_Space.empty_table "locale";
   val copy = I;
   val extend = I;
   fun merge _ = Name_Space.join_tables (K merge_locale);