mirror of
https://github.com/urbit/shrub.git
synced 2024-11-28 05:22:27 +03:00
Merge pull request #6586 from urbit/i/6584/rift-life-gen
gen: add +ames-keys generator
This commit is contained in:
commit
0113f8a01d
11
pkg/arvo/gen/ames-keys.hoon
Normal file
11
pkg/arvo/gen/ames-keys.hoon
Normal file
@ -0,0 +1,11 @@
|
|||||||
|
:: 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)
|
||||||
|
==
|
||||||
|
:- %noun
|
||||||
|
?. ?=(%known -.ship-state)
|
||||||
|
%ship-still-alien
|
||||||
|
[life=life rift=rift]:+.ship-state
|
Loading…
Reference in New Issue
Block a user