src/Pure/goals.ML
changeset 16335 37aabcf75ee1
parent 16128 927627fafca5
child 16458 4c6fd0c01d28
--- a/src/Pure/goals.ML	Thu Jun 09 12:03:21 2005 +0200
+++ b/src/Pure/goals.ML	Thu Jun 09 12:03:22 2005 +0200
@@ -198,7 +198,7 @@
 
   fun print sg {space, locales, scope} =
     let
-      val locs = NameSpace.extern_table space locales;
+      val locs = NameSpace.extern_table (space, locales);
       val scope_names = rev (map (NameSpace.extern space o fst) (! scope));
     in
       [Display.pretty_name_space ("locale name space", space),