Monitor.st
changeset 716 242781d82881
parent 710 b17b877ac7b4
child 718 ba2260d7863f
equal deleted inserted replaced
715:b2950d207977 716:242781d82881
   152                 ]
   152                 ]
   153             ]
   153             ]
   154         ].
   154         ].
   155         count := 1.
   155         count := 1.
   156         owningProcess := thisProcess.
   156         owningProcess := thisProcess.
   157     ] valueOnUnwindDo:[
   157     ] valueNowOrOnUnwindDo:[
   158         wasBlocked ifFalse:[OperatingSystem unblockInterrupts]
   158         wasBlocked ifFalse:[OperatingSystem unblockInterrupts]
   159     ]
   159     ]
   160 
   160 
   161     "Modified: / 11.12.1998 / 12:38:48 / cg"
   161     "Modified: / 30.12.1998 / 19:32:24 / cg"
   162 !
   162 !
   163 
   163 
   164 exit
   164 exit
   165     "exit the monitor"
   165     "exit the monitor"
   166 
   166 
   232 ! !
   232 ! !
   233 
   233 
   234 !Monitor class methodsFor:'documentation'!
   234 !Monitor class methodsFor:'documentation'!
   235 
   235 
   236 version
   236 version
   237     ^ '$Header: /cvs/stx/stx/libbasic2/Monitor.st,v 1.12 1998-12-11 12:44:54 cg Exp $'
   237     ^ '$Header: /cvs/stx/stx/libbasic2/Monitor.st,v 1.13 1998-12-30 18:32:45 cg Exp $'
   238 ! !
   238 ! !