auto_flush: higher frequency;
authorwenzelm
Mon Aug 09 22:02:26 2010 +0200 (2010-08-09 ago)
changeset 38256d2f094d97c91
parent 38255 bf44a85c74cc
child 38257 f0fd14a9c11f
auto_flush: higher frequency;
src/Pure/System/isabelle_process.ML
     1.1 --- a/src/Pure/System/isabelle_process.ML	Mon Aug 09 21:35:45 2010 +0200
     1.2 +++ b/src/Pure/System/isabelle_process.ML	Mon Aug 09 22:02:26 2010 +0200
     1.3 @@ -57,7 +57,7 @@
     1.4    let
     1.5      val _ = TextIO.StreamIO.setBufferMode (TextIO.getOutstream stream, IO.BLOCK_BUF);
     1.6      fun loop () =
     1.7 -      (OS.Process.sleep (Time.fromMilliseconds 50); try TextIO.flushOut stream; loop ());
     1.8 +      (OS.Process.sleep (Time.fromMilliseconds 20); try TextIO.flushOut stream; loop ());
     1.9    in loop end;
    1.10  
    1.11  fun rendezvous f fifo =