mirror of
https://github.com/urbit/shrub.git
synced 2024-12-22 10:21:31 +03:00
11 lines
303 B
Plaintext
11 lines
303 B
Plaintext
|
:: Print keys for a ship, as stored in %ames
|
||
|
|
::
|
||
|
|
:- %say
|
||
|
|
|= [[now=time @ our=ship ^] [=ship ~] ~]
|
||
|
|
=+ .^ =ship-state:ames
|
||
|
|
%ax /(scot %p our)//(scot %da now)/peers/(scot %p ship)
|
||
|
|
==
|
||
|
|
=/ =peer-state:ames ?>(?=(%known -.ship-state) +.ship-state)
|
||
|
|
:- %noun
|
||
|
|
[life=life rift=rift]:peer-state
|