Nice to know. Thanks Gareth.

On Thu, May 14, 2015 at 10:21 PM, Gareth Cox <[email protected]> wrote:

>  Just for fun, from VisualAge Smalltalk 8.6
>
> "---------------------------------------------------------------------------------"
>
> Time millisecondsToRun: [1000 timesRepeat: [Transcript show: 'x']].
> VisualAge Smalltalk 8.6 --> 3120ms
>
> "---------------------------------------------------------------------------------"
>
> [ ($a value to: $h value) do: [ :c |
>       [ 1 to: 9 do: [ :i |
>               Transcript show: c asCharacter printString , i printString , ' 
> '.
>               Processor yield
>               ]
>       ] forkAt: 6
>       ].
> ] forkAt: 7.
> VisualAge Smalltalk 8.6 -->
> $h1 $g1 $f1 $e1 $d1 $c1 $b1 $a1
> $h2 $g2 $f2 $e2 $d2 $c2 $b2 $a2
> $h3 $g3 $f3 $e3 $d3 $c3 $b3 $a3
> $h4 $g4 $f4 $e4 $d4 $c4 $b4 $a4
> $h5 $g5 $f5 $e5 $d5 $c5 $b5 $a5
> $h6 $g6 $f6 $e6 $d6 $c6 $b6 $a6
> $h7 $g7 $f7 $e7 $d7 $c7 $b7 $a7
> $h8 $g8 $f8 $e8 $d8 $c8 $b8 $a8
> $h9 $g9 $f9 $e9 $d9 $c9 $b9 $a9
>
> "---------------------------------------------------------------------------------"
>
> 1 to: 100 do: [ :i |
>       Delay forMilliseconds: 100.
>       Transcript show: 'x'
> ]
>     VisualAge Smalltalk 8.6 --> Shows x every 100 milliseconds in the 
> Transcript.
>
> "---------------------------------------------------------------------------------"
>
>
> Hi guys
>
> the Transcript in Pharo is that it's not asynchronous so I can't use it
> in VM development to show the current progress of the simulation. For
> example:
> 1 to: 100 do: [ :i |
>      0.1 seconds asDelay wait.
>      Transcript show: 'x'. ]
> => on Squeak, this shows a x every 0.1 second in the Transcript
> => on Pharo, nothing happens during 10 seconds then all the x are shown.
> https://pharo.fogbugz.com/default.asp?15515
>
>  --
>  Gareth Cox
> IT Manager/Developer
> Inspired Org (PTY) Ltd
>

Reply via email to