From 5fb20a57cbbb99bb4835c8d111b5fbe35a8cf9e7 Mon Sep 17 00:00:00 2001
From: Ted Blackman <ted@tlon.io>
Date: Thu, 25 Aug 2022 16:35:47 +0300
Subject: [PATCH] tests: give %cork ack to gall

---
 pkg/arvo/tests/sys/grq.hoon | 16 ++++++++++++++--
 1 file changed, 14 insertions(+), 2 deletions(-)

diff --git a/pkg/arvo/tests/sys/grq.hoon b/pkg/arvo/tests/sys/grq.hoon
index 34ad58d6bb..7bf1e0a6be 100644
--- a/pkg/arvo/tests/sys/grq.hoon
+++ b/pkg/arvo/tests/sys/grq.hoon
@@ -1,4 +1,4 @@
-::  test gall request queue fix, which implicates ames and gall
+::  test gall subscription nonce incrementation and ames flow killing
 ::
 /+  *test, v=test-ames-gall
 |%
@@ -460,7 +460,19 @@
           :-  ~[/ames]  [%pass /pump/~bud/0 %b %rest ~1111.1.5..00.02.00]
       ==
     ==
-  :-  t33  |.  :-  %&
+  ::  subscriber gall hears %cork ack from ames
+  :-  t33  |.  :-  %|
+  =^  t34  gall.nec
+    %:  gall-check-take:v  gall.nec
+      [~1111.1.10 0xdead.beef *roof]
+      :+  /sys/way/~bud/pub
+        :~  /use/sub/0w1.d6Isf/out/~bud/pub/1/sub-foo/~bud
+            /init
+        ==
+      [%ames %done ~]
+      ~
+    ==
+  :-  t34  |.  :-  %&
   ;:  weld
     %+  expect-eq
       !>  (sy 0 ~)