I conjecture that the common case will see demand- and supply-levels of zero
This commit is contained in:
parent
ceada73709
commit
9242d264b3
|
@ -109,8 +109,8 @@
|
||||||
[decrease-handler unexpected-supply-decrease]
|
[decrease-handler unexpected-supply-decrease]
|
||||||
#:demand-is-subscription? [demand-is-subscription? #t]
|
#:demand-is-subscription? [demand-is-subscription? #t]
|
||||||
#:meta-level [meta-level 0]
|
#:meta-level [meta-level 0]
|
||||||
#:demand-level demand-level
|
#:demand-level [demand-level 0]
|
||||||
#:supply-level supply-level)
|
#:supply-level [supply-level 0])
|
||||||
(define d (make-demand-matcher demand-is-subscription?
|
(define d (make-demand-matcher demand-is-subscription?
|
||||||
pattern
|
pattern
|
||||||
meta-level
|
meta-level
|
||||||
|
|
|
@ -10,8 +10,6 @@
|
||||||
|
|
||||||
(spawn-demand-matcher (websocket-message any-client server-id ?)
|
(spawn-demand-matcher (websocket-message any-client server-id ?)
|
||||||
#:demand-is-subscription? #f
|
#:demand-is-subscription? #f
|
||||||
#:demand-level 0
|
|
||||||
#:supply-level 0
|
|
||||||
(match-lambda ;; arrived-demand-route, i.e. new connection publisher
|
(match-lambda ;; arrived-demand-route, i.e. new connection publisher
|
||||||
[(route _ (websocket-message c _ _) _ _)
|
[(route _ (websocket-message c _ _) _ _)
|
||||||
(spawn-connection-handler c)]
|
(spawn-connection-handler c)]
|
||||||
|
|
Loading…
Reference in New Issue