touching up some classes
This commit is contained in:
parent
53739821b2
commit
c5362f86a9
@ -73,9 +73,9 @@ class(#pointer,#final,#limited) Process(Object)
|
|||||||
class Semaphore(Object)
|
class Semaphore(Object)
|
||||||
{
|
{
|
||||||
var waiting_head := nil,
|
var waiting_head := nil,
|
||||||
waiting_tail := nil,
|
waiting_tail := nil.
|
||||||
count := 0. ## semaphore signal count
|
|
||||||
|
var count := 0. ## semaphore signal count
|
||||||
var(#get,#set) heapIndex := -1.
|
var(#get,#set) heapIndex := -1.
|
||||||
|
|
||||||
var fireTimeSec := 0,
|
var fireTimeSec := 0,
|
||||||
@ -105,9 +105,12 @@ class Semaphore(Object)
|
|||||||
|
|
||||||
## ==================================================================
|
## ==================================================================
|
||||||
|
|
||||||
|
## ------------------------------------------
|
||||||
|
## TODO: either put fireTimeNsec into implementation of fireTime, and related methods.
|
||||||
|
## ------------------------------------------
|
||||||
method fireTime
|
method fireTime
|
||||||
{
|
{
|
||||||
^fireTimeSec
|
^self.fireTimeSec
|
||||||
}
|
}
|
||||||
|
|
||||||
method fireTime: anInteger
|
method fireTime: anInteger
|
||||||
@ -155,9 +158,11 @@ TODO: how to prohibit wait and signal???
|
|||||||
|
|
||||||
class SemaphoreGroup(Object)
|
class SemaphoreGroup(Object)
|
||||||
{
|
{
|
||||||
|
## the first two variables must match those of Semaphore.
|
||||||
var waiting_head := nil,
|
var waiting_head := nil,
|
||||||
waiting_tail := nil,
|
waiting_tail := nil,
|
||||||
first_sem := nil,
|
|
||||||
|
var first_sem := nil,
|
||||||
last_sem := nil,
|
last_sem := nil,
|
||||||
first_sigsem := nil,
|
first_sigsem := nil,
|
||||||
last_sigsem := nil,
|
last_sigsem := nil,
|
||||||
|
Loading…
Reference in New Issue
Block a user