From ad4f0c3ea3977f72ab2b69096a53ff10e25975e8 Mon Sep 17 00:00:00 2001
From: Philip Monk <phil@pcmonk.me>
Date: Thu, 31 Oct 2019 23:21:10 -0700
Subject: [PATCH] auto: support forks

---
 pkg/arvo/lib/auto.hoon | 12 ++++++++++--
 1 file changed, 10 insertions(+), 2 deletions(-)

diff --git a/pkg/arvo/lib/auto.hoon b/pkg/arvo/lib/auto.hoon
index 0874f7e8ad..5488e1f198 100644
--- a/pkg/arvo/lib/auto.hoon
+++ b/pkg/arvo/lib/auto.hoon
@@ -40,8 +40,16 @@
     [p.ty q.ty]~
   ::
       [%fork *]
-    ~|  %find-fork
-    !!  ::  eh, fuse?
+    %=    $
+        ty
+      =/  tines  ~(tap in p.ty)
+      ?~  tines
+        %void
+      |-  ^-  type
+      ?~  t.tines
+        i.tines
+      (~(fuse ut $(tines t.tines)) i.tines)
+    ==
   ::
       [%hint *]  $(ty q.ty)
       [%hold *]  $(ty ~(repo ut ty))