# HG changeset patch
# User wenzelm
# Date 1281384146 -7200
# Node ID d2f094d97c91bb1e7c6a5e5579174371e5f36ccd
# Parent  bf44a85c74ccc7262343edbef9b224072ad033d4
auto_flush: higher frequency;

diff -r bf44a85c74cc -r d2f094d97c91 src/Pure/System/isabelle_process.ML
--- a/src/Pure/System/isabelle_process.ML	Mon Aug 09 21:35:45 2010 +0200
+++ b/src/Pure/System/isabelle_process.ML	Mon Aug 09 22:02:26 2010 +0200
@@ -57,7 +57,7 @@
   let
     val _ = TextIO.StreamIO.setBufferMode (TextIO.getOutstream stream, IO.BLOCK_BUF);
     fun loop () =
-      (OS.Process.sleep (Time.fromMilliseconds 50); try TextIO.flushOut stream; loop ());
+      (OS.Process.sleep (Time.fromMilliseconds 20); try TextIO.flushOut stream; loop ());
   in loop end;
 
 fun rendezvous f fifo =