mirror of
https://github.com/ilyakooo0/urbit.git
synced 2025-01-05 22:03:50 +03:00
graph-store: last tweak to make firstborn fetch perfectly
This commit is contained in:
parent
6b102450a5
commit
8146a65f0a
@ -914,11 +914,17 @@
|
|||||||
ind (snoc ind atom)
|
ind (snoc ind atom)
|
||||||
==
|
==
|
||||||
?: ?=(%empty -.children.node)
|
?: ?=(%empty -.children.node)
|
||||||
~
|
?. (gte (lent ind) len)
|
||||||
|
~
|
||||||
|
:- ~
|
||||||
|
:* node ind
|
||||||
|
(~(put by map) ind node)
|
||||||
|
ship term
|
||||||
|
==
|
||||||
%_ $
|
%_ $
|
||||||
index t.index
|
index t.index
|
||||||
graph p.children.node
|
graph p.children.node
|
||||||
map (~(put by map) [ind node(children empty+~)])
|
map (~(put by map) ind node(children empty+~))
|
||||||
==
|
==
|
||||||
::
|
::
|
||||||
++ collect-firstborn
|
++ collect-firstborn
|
||||||
|
Loading…
Reference in New Issue
Block a user