jock: don't run tests repeatedly

zorp-corp · Dec 3, 2024 · 2f5f54a · 2f5f54a
1 parent eba0ce2
commit 2f5f54a
Showing 1 changed file with 4 additions and 7 deletions.
diff --git a/hoon/lib/test-jock.hoon b/hoon/lib/test-jock.hoon
@@ -64,6 +64,7 @@
  ==
 ::
 ++  test-jocks
+  ~+
   ^-  (list [term tang])
   :~  [%test-let-edit-tokens test-tokenize:test-let-edit]
       [%test-let-edit-jeam test-jeam:test-let-edit]
@@ -174,14 +175,10 @@
   |-
   ?:  =(i len)
     (flop lis)
-  =/  res=(unit *)
-    %-  mole
-    |.
-    =/  arm  (snag i test-jocks)
-    ~&  ["{<i>}" `@tas`-.arm `tape`(zing (turn +.arm |=(=tank ~(ram re tank))))]
-    +.arm
+  =/  [tag=@tas tan=tang]  (snag i test-jocks)
+  ~&  ["{<i>}" tag `tape`(zing (turn tan |=(=tank ~(ram re tank))))]
   =.  lis
-    [?=(^ res) lis]
+    [?=(~ tan) lis]
   $(i +(i))
 ::
 :: ++  test