gall: skip nonce in pre-nonce subs wires

This commit is contained in:
yosoyubik 2022-05-17 14:29:13 +02:00
parent d2fda7e920
commit 7166e4c7cf

View File

@ -1850,11 +1850,14 @@
%. $(moves t.moves) %. $(moves t.moves)
%^ trace odd.veb.bug.state %^ trace odd.veb.bug.state
leaf/"gall: {<agent-name>} missing subscription, got %leave" ~ leaf/"gall: {<agent-name>} missing subscription, got %leave" ~
=/ have=[nonce=@ acked=? =path] =/ nonce=@ (~(got by beat.watches.yoke) sub-wire dock)
:- (~(got by beat.watches.yoke) sub-wire dock)
(~(got by boat.watches.yoke) sub-wire dock)
=. p.move.move =. p.move.move
(weld sys-wire [(scot %ud nonce.have) sub-wire]) %+ weld sys-wire
?: =(nonce 0)
:: skip adding nonce to pre-nonce subscription wires
::
sub-wire
[(scot %ud nonce) sub-wire]
=: boat.watches.yoke (~(del by boat.watches.yoke) [sub-wire dock]) =: boat.watches.yoke (~(del by boat.watches.yoke) [sub-wire dock])
beat.watches.yoke (~(del by beat.watches.yoke) [sub-wire dock]) beat.watches.yoke (~(del by beat.watches.yoke) [sub-wire dock])
== ==