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