urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-12-06 06:38:24 +03:00
Code Issues Packages Projects Releases Wiki Activity

simplies ++qeu

Browse Source
This commit is contained in:
Joseph Bryan 2016-12-08 13:36:20 -05:00
parent f240cf7c20
commit c05c194032
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
sys/hoon.hoon
View File

@ -1601,8 +1601,7 @@
%+ cork (tree (pair a b)) ::
|= c/(tree (pair a b)) ^+ c ::
?.(~(apt by c) ~ c) ::
++ qeu |* a/mold :: queue
$@($~ {n/a l/(qeu a) r/(qeu a)}) ::
++ qeu |*(a/mold (tree a)) :: queue
++ set |* a/mold :: set
%+ cork (tree a) ::
|= b/(tree a) ^+ b ::