ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-12-19 04:41:37 +03:00
Code Issues Packages Projects Releases Wiki Activity

ames: make fi-send take a blob

Browse Source
This commit is contained in:
yosoyubik 2023-04-24 18:54:30 +02:00
parent d43e684bae
commit 66a7b7b1c2
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
pkg/arvo/sys/vane/ames.hoon
View File

@ -3832,7 +3832,7 @@
|=(frag=@ud `hoot``@`(etch-shot (make-shot %0 fi-full-path frag))) |=(frag=@ud `hoot``@`(etch-shot (make-shot %0 fi-full-path frag)))
:: ::
++ fi-send ++ fi-send
|=(=hoot fine(event-core (send-blob for=| her `@ux`hoot))) |=(=blob fine(event-core (send-blob for=| her blob)))
:: ::
++ fi-give-tune ++ fi-give-tune
|= dat=(unit roar) |= dat=(unit roar)
@ -3849,7 +3849,7 @@
=/ req=hoot (fi-etch-wail fra) =/ req=hoot (fi-etch-wail fra)
=/ =want [fra req last=now tries=1 skips=0] =/ =want [fra req last=now tries=1 skips=0]
=. wan.keen (cons:fi-deq *(pha ^want) want) =. wan.keen (cons:fi-deq *(pha ^want) want)
(fi-send req) (fi-send `@ux`req)
:: ::
++ fi-rcv ++ fi-rcv
|= [[=full=^path num=@ud] =meow =lane:ames] |= [[=full=^path num=@ud] =meow =lane:ames]
@ -3937,7 +3937,7 @@
[`want %.n found fine] [`want %.n found fine]
=. tries.want +(tries.want) =. tries.want +(tries.want)
=. last-sent.want now =. last-sent.want now
=. fine (fi-send hoot.want) =. fine (fi-send `@ux`hoot.want)
[`want %.n found fine] [`want %.n found fine]
:: ::
++ fi-done ++ fi-done
@ -3975,7 +3975,7 @@
=. last-sent.want now =. last-sent.want now
=. tries.want +(tries.want) =. tries.want +(tries.want)
=. wan.keen (snoc:fi-deq wan.keen want) =. wan.keen (snoc:fi-deq wan.keen want)
=. fine (fi-send hoot.want) =. fine (fi-send `@ux`hoot.want)
$(inx +(inx)) $(inx +(inx))
:: ::
++ fi-sift-full ++ fi-sift-full
@ -4001,7 +4001,7 @@
?: (gth (next-expiry:fi-gauge:cor +>.want) now) ?: (gth (next-expiry:fi-gauge:cor +>.want) now)
[`want & cor] [`want & cor]
=. last-sent.want now =. last-sent.want now
=. cor (fi-send:cor hoot.want) =. cor (fi-send:cor `@ux`hoot.want)
[`want | cor] [`want | cor]
:: ::
++ fi-pass-timer ++ fi-pass-timer
@ -4043,7 +4043,7 @@
last-sent.u.want now last-sent.u.want now
== ==
=. wan.keen (cons:fi-deq wan.keen u.want) =. wan.keen (cons:fi-deq wan.keen u.want)
(fi-send hoot.u.want) (fi-send `@ux`hoot.u.want)
-- --
:: +ga: constructor for |pump-gauge congestion control core :: +ga: constructor for |pump-gauge congestion control core
:: ::