diff --git a/pkg/arvo/sys/vane/clay.hoon b/pkg/arvo/sys/vane/clay.hoon index 319cd1f224..bda99e0ad9 100644 --- a/pkg/arvo/sys/vane/clay.hoon +++ b/pkg/arvo/sys/vane/clay.hoon @@ -4496,7 +4496,9 @@ :: ?. ?| =(0v0 tak) ?& (~(has by hut.ran) tak) - (~(has in (reachable-takos (aeon-to-tako:ze let.dom))) tak) + ?| (~(any by hit.dom) |=(=tako =(tak tako))) :: fast-path + (~(has in (reachable-takos (aeon-to-tako:ze let.dom))) tak) + == |(?=(~ for) (may-read u.for care.mun tak path.mun)) == == [~ ..park] diff --git a/pkg/arvo/sys/vane/gall.hoon b/pkg/arvo/sys/vane/gall.hoon index eb96fcab99..4bb4171c70 100644 --- a/pkg/arvo/sys/vane/gall.hoon +++ b/pkg/arvo/sys/vane/gall.hoon @@ -769,6 +769,10 @@ (mo-apply-sure dap routes deal) :: %raw-poke + :: don't validate %noun pokes, for performance + :: + ?: =(%noun mark.deal) + (mo-apply-sure dap routes [%poke %noun %noun noun.deal]) =/ =case da+now =/ yok (~(got by yokes.state) dap) =/ =desk q.beak:?>(?=(%live -.yok) yok) ::TODO acceptable assertion?