src/Pure/Isar/toplevel.ML
changeset 11894 39a3ece43772
parent 10324 498999fd7c37
child 12009 cbd35a736954
--- a/src/Pure/Isar/toplevel.ML	Mon Oct 22 18:04:00 2001 +0200
+++ b/src/Pure/Isar/toplevel.ML	Mon Oct 22 18:04:11 2001 +0200
@@ -126,7 +126,7 @@
 val print_state_context = print_current_node print_node_ctxt;
 
 fun print_state_default prf_only state =
-  let val ref (begin_state, end_state, _) = Goals.current_goals_markers in
+  let val ref (begin_state, end_state, _) = Display.current_goals_markers in
     if begin_state = "" then () else writeln begin_state;
     print_current_node (print_node prf_only) state;
     if end_state = "" then () else writeln end_state