From 86705ca446b973846773087ed75a3f5706023607 Mon Sep 17 00:00:00 2001 From: Ted Blackman Date: Thu, 11 Jul 2019 14:41:43 -0700 Subject: [PATCH] fix jael +vent-pass recursion --- pkg/arvo/sys/vane/jael.hoon | 20 +++++++++++--------- 1 file changed, 11 insertions(+), 9 deletions(-) diff --git a/pkg/arvo/sys/vane/jael.hoon b/pkg/arvo/sys/vane/jael.hoon index b334196155..749e18c573 100644 --- a/pkg/arvo/sys/vane/jael.hoon +++ b/pkg/arvo/sys/vane/jael.hoon @@ -1153,15 +1153,17 @@ =+ yez=~(tap in yen) |- ^+ ..vent-pass ?~ yez ..vent-pass - =* d i.yez - ?> ?=([[%a @ @ *] *] d) - =+ our=(slav %p i.t.i.d) - =+ who=(slav %p i.t.t.i.d) - %+ exec [d ~ ~] - :+ %pass - /(scot %p our)/vent-result - ^- note - [%a %want who /j/(scot %p our)/vent-result %vent-result res] + =. ..vent-pass + =* d i.yez + ?> ?=([[%a @ @ *] *] d) + =+ our=(slav %p i.t.i.d) + =+ who=(slav %p i.t.t.i.d) + %+ exec [d ~ ~] + :+ %pass + /(scot %p our)/vent-result + ^- note + [%a %want who /j/(scot %p our)/vent-result %vent-result res] + $(yez t.yez) :: ++ extract-snap :: extract rewind point ^- snapshot