fix message pump initial conditions

This commit is contained in:
Ted Blackman 2019-06-19 17:33:40 -07:00
parent 243214b4de
commit 02d3dc4c08

View File

@ -465,7 +465,7 @@
:: packet-pump-state: state of corresponding |packet-pump
::
+$ message-pump-state
$: current=message-num
$: current=_`message-num`1
next=_`message-num`1
unsent-messages=(qeu message)
unsent-fragments=(list static-fragment)