src/Pure/PIDE/protocol.ML
changeset 52601 55e62a25a7ce
parent 52596 40298d383463
child 52602 00170ef1dc39
--- a/src/Pure/PIDE/protocol.ML	Thu Jul 11 16:26:14 2013 +0200
+++ b/src/Pure/PIDE/protocol.ML	Thu Jul 11 16:35:37 2013 +0200
@@ -51,17 +51,18 @@
                   fn (a, []) => Document.Perspective (map int_atom a)]))
             end;
 
-        val (assignment, state') = Document.update old_id new_id edits state;
-        val _ =
-          Output.protocol_message Markup.assign_update
-            ((new_id, assignment) |>
-              let open XML.Encode
-              in pair int (list (pair int (list int))) end
-              |> YXML.string_of_body);
+        val (assign_update, state') = Document.update old_id new_id edits state;
 
         val _ = List.app Future.cancel_group (Goal.reset_futures ());
         val _ = Exec.purge_unstable ();
         val _ = Isabelle_Process.reset_tracing ();
+
+        val _ =
+          Output.protocol_message Markup.assign_update
+            ((new_id, assign_update) |>
+              let open XML.Encode
+              in pair int (list (pair int (list int))) end
+              |> YXML.string_of_body);
         val _ =
           Event_Timer.request (Time.+ (Time.now (), seconds 0.02))
             (fn () => Document.start_execution state');