Merge branch 'develop' into i/6103/ames-refactor

This commit is contained in:
yosoyubik 2023-02-23 13:51:35 +01:00
commit dec8252d4a

View File

@ -104,6 +104,7 @@
rot=`?`%.n :: routing attempts
kay=`?`%.n :: is ok/not responding
==
=/ packet-size 13
=>
~% %ames ..part ~
|%
@ -156,7 +157,7 @@
|= [=message-num =message-blob]
^- (list static-fragment)
::
=/ num-fragments=fragment-num (met 13 message-blob)
=/ num-fragments=fragment-num (met packet-size message-blob)
=| counter=@
::
|- ^- (list static-fragment)
@ -180,7 +181,7 @@
sorted
$(index +(index), sorted [(~(got by fragments) index) sorted])
::
(cue (rep 13 (flop sorted)))
(cue (rep packet-size (flop sorted)))
:: +jim: caching +jam
::
++ jim |=(n=* ~+((jam n)))
@ -439,11 +440,11 @@
::
=? meat.shut-packet
?& ?=(%& -.meat.shut-packet)
(gth (met 13 fragment.p.meat.shut-packet) 1)
(gth (met packet-size fragment.p.meat.shut-packet) 1)
==
%_ meat.shut-packet
fragment.p
(cut 13 [[fragment-num 1] fragment]:p.meat.shut-packet)
(cut packet-size [[fragment-num 1] fragment]:p.meat.shut-packet)
==
::
=/ vec ~[sndr rcvr sndr-life rcvr-life]