add wire to +coup-ping-send sample

This commit is contained in:
Ted Blackman 2019-08-09 19:08:31 -07:00
parent 87fc52fd45
commit 08961feb7f

View File

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