From b9c5d9e2e6adfb6aa08b2f456a11770462cc6607 Mon Sep 17 00:00:00 2001 From: yosoyubik Date: Mon, 7 Jun 2021 13:09:16 +0200 Subject: [PATCH] naive: listen to %resend timer --- pkg/arvo/app/aggregator.hoon | 14 ++++++++++++-- 1 file changed, 12 insertions(+), 2 deletions(-) diff --git a/pkg/arvo/app/aggregator.hoon b/pkg/arvo/app/aggregator.hoon index 417c920f49..7b7c1c350b 100644 --- a/pkg/arvo/app/aggregator.hoon +++ b/pkg/arvo/app/aggregator.hoon @@ -211,8 +211,18 @@ ++ on-arvo |= [=wire =sign-arvo] ^- (quip card _this) - ?+ +<.sign-arvo (on-arvo:def wire sign-arvo) - %wake =^(cards state on-timer:do [cards this]) + ?+ wire (on-arvo:def wire sign-arvo) + [%timer ~] + ?+ +<.sign-arvo (on-arvo:def wire sign-arvo) + %wake =^(cards state on-timer:do [cards this]) + == + :: + [%resend @ @ ~] + =/ [address=@ux nonce=@ud] + [(slav %ux i.t.wire) (rash i.t.t.wire dem)] + ?+ +<.sign-arvo (on-arvo:def wire sign-arvo) + %wake [(send-roll:do address nonce) this] + == == :: ++ on-fail