On 01/31/2012 09:32 PM, Gwenaël Casaccio wrote:
Eval [
| d1 d2 p1 p2 |
sem := Semaphore new.
d1 := Delay forSeconds: 1.
p1 := [ d1 value: [ sem signal ] onTimeoutDo: [ ] ] fork.
sem wait.
'value:onTimeoutDo:' displayNl.
d1 := Delay forMilliseconds: 100.
d1 value: [ [ true ] whileTrue ] onTimeoutDo: [ ].
]
Let's fix this too, then. :) Paolo _______________________________________________ help-smalltalk mailing list [email protected] https://lists.gnu.org/mailman/listinfo/help-smalltalk
