ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-12-15 01:52:42 +03:00
Code Issues Packages Projects Releases Wiki Activity

Tighten up zuse.

Browse Source
This commit is contained in:
C. Guy Yarvin 2014-03-05 13:43:43 -08:00
parent 69f6b2bb91
commit a49bd3f260
1 changed files with 1 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
arvo/zuse.hoon
View File

@ -1226,11 +1226,7 @@
&(?=(& -.q.one) ?=(& -.q.two)) :: both deltas
&(?=(~ p.q.one) ?=(~ p.q.two)) :: not merges
==
:- p.one
:+ %&
~
:- *cart
(weld `(list tako)`q.q.q.one `(list tako)`q.q.q.two)
[p.one [%& ~ [*cart (weld q.q.q.one q.q.q.two)]]]
::
++ glam
|= zar=@p ^- tape