Eventually we should support infinite level
This commit is contained in:
parent
5058330e80
commit
4c3c6d2e2d
|
@ -39,6 +39,8 @@
|
||||||
(define pid-stack (make-parameter '()))
|
(define pid-stack (make-parameter '()))
|
||||||
(define log-events-and-actions? (make-parameter #f))
|
(define log-events-and-actions? (make-parameter #f))
|
||||||
|
|
||||||
|
;; TODO: support +Inf.0 as a level number
|
||||||
|
|
||||||
;; Events
|
;; Events
|
||||||
(struct routing-update (gestalt) #:prefab)
|
(struct routing-update (gestalt) #:prefab)
|
||||||
(struct message (body meta-level feedback?) #:prefab)
|
(struct message (body meta-level feedback?) #:prefab)
|
||||||
|
|
Loading…
Reference in New Issue