ames: condense message size calculation

Co-authored-by: fang <git@fang.io>
This commit is contained in:
Ted Blackman 2022-06-05 08:49:47 -05:00 committed by GitHub
parent 953273004a
commit d2ea33ddfe
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -2192,8 +2192,9 @@
=. acc =. acc
%+ add acc %+ add acc
%+ add %+ add
=- (roll - add) %+ roll ~(tap to unsent-messages.i.pumps)
(turn ~(tap to unsent-messages.i.pumps) |=(b=@ (met 3 b))) |= [a=@ b=@ud]
(add b (met 3 a))
?~ unsent-fragments.i.pumps ?~ unsent-fragments.i.pumps
0 0
(met 3 fragment.i.unsent-fragments.i.pumps) (met 3 fragment.i.unsent-fragments.i.pumps)