Cosmetic
This commit is contained in:
parent
2b29e817a5
commit
a828334b2f
|
@ -4,8 +4,6 @@
|
||||||
(require racket/set)
|
(require racket/set)
|
||||||
(require syndicate/functional-queue)
|
(require syndicate/functional-queue)
|
||||||
|
|
||||||
(require/activate syndicate/drivers/timer)
|
|
||||||
|
|
||||||
(struct lease-request (resource-id request-id) #:prefab)
|
(struct lease-request (resource-id request-id) #:prefab)
|
||||||
(struct lease-assignment (resource-id request-id) #:prefab)
|
(struct lease-assignment (resource-id request-id) #:prefab)
|
||||||
(struct resource-status (resource-id waiter-count) #:prefab)
|
(struct resource-status (resource-id waiter-count) #:prefab)
|
||||||
|
@ -45,6 +43,8 @@
|
||||||
|
|
||||||
;;---------------------------------------------------------------------------
|
;;---------------------------------------------------------------------------
|
||||||
|
|
||||||
|
(require/activate syndicate/drivers/timer)
|
||||||
|
|
||||||
(struct philosopher-status (name status) #:prefab)
|
(struct philosopher-status (name status) #:prefab)
|
||||||
|
|
||||||
(actor (react (define/query-hash-set thinkers (philosopher-status $who $status) status who)
|
(actor (react (define/query-hash-set thinkers (philosopher-status $who $status) status who)
|
||||||
|
|
Loading…
Reference in New Issue