ames: don't crash if waking up on a strange wire

This was a regression introduced in 8e54f7fcc3
the previous behavior was not to crash so we
restore it here
This commit is contained in:
yosoyubik 2023-04-22 13:47:15 +02:00
parent d259656e29
commit 64a1680e2c

View File

@ -1894,7 +1894,7 @@
:: ::
?. ?=([%recork ~] wire) ?. ?=([%recork ~] wire)
=/ res=(unit ?([%fine her=ship =^wire] [%pump her=ship =bone])) =/ res=(unit ?([%fine her=ship =^wire] [%pump her=ship =bone]))
?+ wire ~| %ames-wire-timer^wire !! ?+ wire ~
[%pump ship=@ bone=@ ~] (parse-pump-wire &2.wire &3.wire) [%pump ship=@ bone=@ ~] (parse-pump-wire &2.wire &3.wire)
[%fine %behn %wake @ *] (parse-fine-wire &4.wire t.t.t.t.wire) [%fine %behn %wake @ *] (parse-fine-wire &4.wire t.t.t.t.wire)
== ==