clay: don't send peers to message pump

This commit is contained in:
Philip Monk 2020-05-05 16:39:50 -07:00
parent 490b615b6a
commit 4cc3fea534
No known key found for this signature in database
GPG Key ID: B66E1F02604E44EC
2 changed files with 4 additions and 5 deletions

View File

@ -1,3 +1,3 @@
version https://git-lfs.github.com/spec/v1
oid sha256:84fb4865c84d2d1dc0ccab6948c30d495c7a80633fb66f067ca5ff36dfd95aa6
size 12870850
oid sha256:6f21bb529b6e1573864391127089bdd2a66eb06454a63be0f75b76ff44c8ec10
size 12870549

View File

@ -2255,8 +2255,7 @@
=/ =message-pump-state
(~(gut by snd.peer-state) bone *message-pump-state)
::
=/ message-pump
(make-message-pump message-pump-state channel peers.ames-state)
=/ message-pump (make-message-pump message-pump-state channel)
=^ pump-gifts message-pump-state (work:message-pump task)
=. snd.peer-state (~(put by snd.peer-state) bone message-pump-state)
:: process effects from |message-pump
@ -2470,7 +2469,7 @@
:: +make-message-pump: constructor for |message-pump
::
++ make-message-pump
|= [state=message-pump-state =channel peers=(map ship ship-state)]
|= [state=message-pump-state =channel]
=* veb veb.bug.channel
=| gifts=(list message-pump-gift)
::