decremented the waiting count of IO semaphores in a semaphore in a semaphore group is signaled

This commit is contained in:
hyunghwan.chung
2017-11-03 08:10:52 +00:00
parent 7410f09cf5
commit f7272c00fb
2 changed files with 5 additions and 4 deletions

View File

@ -20,7 +20,7 @@ class MyObject(Object)
s signal.
Processor activeProcess terminate.
self.t1 := self.t1 + 20 ] fork.
s wait.
s wait.
^self.t1
}
@ -38,14 +38,15 @@ class MyObject(Object)
sg addSemaphore: s3.
Processor signal: s1 onInput: 0.
Processor signal: s2 onInput: 0. ## this should raise an exception.
Processor signal: s3 onInput: 0.
##Processor signal: s2 onInput: 0. ## this should raise an exception.
##Processor signal: s3 onInput: 0.
[ sg wait. ] fork.
[ sg wait. ] fork.
[ sg wait. ] fork.
sg wait.
sg removeSemaphore: s1.
}
method(#class) main