mirror of
https://github.com/ilyakooo0/urbit.git
synced 2024-12-24 07:26:51 +03:00
ames: rename keen-core -> ke
This commit is contained in:
parent
f297762ab9
commit
8b0bd25a45
@ -1846,7 +1846,7 @@
|
|||||||
::
|
::
|
||||||
%fine
|
%fine
|
||||||
=< fi-abet
|
=< fi-abet
|
||||||
ke-abet:ke-take-wake:(ke-abed:keen-core:fi:peer-core wire.u.res)
|
ke-abet:ke-take-wake:(ke-abed:ke:fi:peer-core wire.u.res)
|
||||||
==
|
==
|
||||||
::
|
::
|
||||||
=. event-core
|
=. event-core
|
||||||
@ -2255,7 +2255,7 @@
|
|||||||
=/ =channel [[our ship] now channel-state -.peer-state]
|
=/ =channel [[our ship] now channel-state -.peer-state]
|
||||||
=/ peer-core (pe peer-state channel)
|
=/ peer-core (pe peer-state channel)
|
||||||
=< fi-abet
|
=< fi-abet
|
||||||
ke-abet:(ke-unsub:(ke-abed:keen-core:fi:peer-core path) duct)
|
ke-abet:(ke-unsub:(ke-abed:ke:fi:peer-core path) duct)
|
||||||
::
|
::
|
||||||
+| %implementation
|
+| %implementation
|
||||||
:: +enqueue-alien-todo: helper to enqueue a pending request
|
:: +enqueue-alien-todo: helper to enqueue a pending request
|
||||||
@ -3715,11 +3715,14 @@
|
|||||||
::
|
::
|
||||||
++ fi
|
++ fi
|
||||||
=< |%
|
=< |%
|
||||||
|
::
|
||||||
|
+| %helpers
|
||||||
|
::
|
||||||
++ fine-core .
|
++ fine-core .
|
||||||
:: ++ fi-abed XX TODO
|
:: ++ fi-abed XX TODO
|
||||||
++ fi-abet abet :: +abet:pe
|
++ fi-abet abet :: +abet:pe
|
||||||
::
|
::
|
||||||
:: +| %entry-points
|
+| %entry-points
|
||||||
::
|
::
|
||||||
++ on-hear
|
++ on-hear
|
||||||
|= [=lane =shot]
|
|= [=lane =shot]
|
||||||
@ -3731,18 +3734,18 @@
|
|||||||
?. (~(has by order.scry) path)
|
?. (~(has by order.scry) path)
|
||||||
~&(dead-response/peep fine-core)
|
~&(dead-response/peep fine-core)
|
||||||
=< ke-abet
|
=< ke-abet
|
||||||
(ke-rcv:(ke-abed:keen-core path) peep meow lane)
|
(ke-rcv:(ke-abed:ke path) peep meow lane)
|
||||||
::
|
::
|
||||||
++ on-keen
|
++ on-keen
|
||||||
|= [=path =^duct]
|
|= [=path =^duct]
|
||||||
^+ fine-core
|
^+ fine-core
|
||||||
?: (~(has by order.scry) path)
|
?: (~(has by order.scry) path)
|
||||||
~> %slog.0^leaf/"fine: dupe {(spud path)}"
|
~> %slog.0^leaf/"fine: dupe {(spud path)}"
|
||||||
ke-abet:(ke-sub:(ke-abed:keen-core path) duct)
|
ke-abet:(ke-sub:(ke-abed:ke path) duct)
|
||||||
=^ keen-id=@ud seq.scry [seq.scry +(seq.scry)]
|
=^ keen-id=@ud seq.scry [seq.scry +(seq.scry)]
|
||||||
=. order.scry (~(put by order.scry) path keen-id)
|
=. order.scry (~(put by order.scry) path keen-id)
|
||||||
=. keens.scry (put:orm keens.scry keen-id *keen-state)
|
=. keens.scry (put:orm keens.scry keen-id *keen-state)
|
||||||
ke-abet:(ke-start:(ke-abed:keen-core path) duct)
|
ke-abet:(ke-start:(ke-abed:ke path) duct)
|
||||||
::
|
::
|
||||||
++ on-pine
|
++ on-pine
|
||||||
|= [=path =^duct]
|
|= [=path =^duct]
|
||||||
@ -3763,7 +3766,9 @@
|
|||||||
=. cas.u.blk ud+case
|
=. cas.u.blk ud+case
|
||||||
(on-keen (slag 3 (en-path:balk u.blk)) duct)
|
(on-keen (slag 3 (en-path:balk u.blk)) duct)
|
||||||
::
|
::
|
||||||
++ keen-core
|
+| %internal
|
||||||
|
::
|
||||||
|
++ ke
|
||||||
|_ $: =path
|
|_ $: =path
|
||||||
keen-id=@ud
|
keen-id=@ud
|
||||||
keen=keen-state
|
keen=keen-state
|
||||||
|
Loading…
Reference in New Issue
Block a user