make the wires match

This commit is contained in:
Ted Blackman 2019-08-09 19:26:39 -07:00
parent f88221d65b
commit ea718bcc87
2 changed files with 2 additions and 2 deletions

View File

@ -1,3 +1,3 @@
version https://git-lfs.github.com/spec/v1 version https://git-lfs.github.com/spec/v1
oid sha256:ed3663db57d2ea737af797c38ea64654550fdd27fe24a03121abada5f2414cc7 oid sha256:d210b3672e4d1fe4422839876e110b90e21e0fcca407a22ff589ce0bad3b3d1a
size 10365547 size 10365547

View File

@ -46,7 +46,7 @@
|= [=wire error=(unit tang)] |= [=wire error=(unit tang)]
^- [(list move) _app-core] ^- [(list move) _app-core]
:: ::
?> =(/send-ping wire) ?> =(/ping-send wire)
%- (print-error "ping: coup" error) %- (print-error "ping: coup" error)
set-timer set-timer
:: +wake: handle timer firing :: +wake: handle timer firing