2005-01-22から1日間の記事一覧
s := Semaphore new. m := Monitor new. [ m critical: [ [ p := Processor activeProcess. s signal. (Delay forSeconds: 1) wait. ] ensure: [ m critical: [ Transcript show: 'OK?'; cr. ]. ]. ]. ] fork. s wait. p terminate.ensure: とか ifCurtailed…