gen: don't crash if alien

This commit is contained in:
yosoyubik 2023-05-12 10:27:30 +02:00
parent f224d5be60
commit 6135349d85

View File

@ -5,6 +5,7 @@
=+ .^ =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
?. ?=(%known -.ship-state)
%ship-still-alien
[life=life rift=rift]:+.ship-state