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

This really should work but doesn't, quite.

Browse Source
This commit is contained in:
C. Guy Yarvin 2015-12-28 13:35:31 -05:00
parent 5d150690c1
commit 7c871cbf42
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
arvo/hoon.hoon
View File

@ -4317,7 +4317,7 @@
royl royl
== ==
-- --
++ scot ~/ %scot |=(mol/dime ~(rent co %$ mol)) ++ scot |=(mol/dime ~(rent co %$ mol))
++ scow |=(mol/dime ~(rend co %$ mol)) ++ scow |=(mol/dime ~(rend co %$ mol))
++ slat |=(mod/@tas |=(txt/@ta (slaw mod txt))) ++ slat |=(mod/@tas |=(txt/@ta (slaw mod txt)))
++ slav |=({mod/@tas txt/@ta} (need (slaw mod txt))) ++ slav |=({mod/@tas txt/@ta} (need (slaw mod txt)))
@ -10623,7 +10623,7 @@
|= {now/@da fav/curd} |= {now/@da fav/curd}
=> .(fav ((hard {$veer lal/@ta pax/path txt/@t}) fav)) => .(fav ((hard {$veer lal/@ta pax/path txt/@t}) fav))
?: =(%$ lal.fav) ?: =(%$ lal.fav)
:: ~& [%tang pax.fav `@p`(mug txt.fav)] ~& [%tang pax.fav `@p`(mug txt.fav)]
=+ gen=(rain pax.fav txt.fav) =+ gen=(rain pax.fav txt.fav)
=+ vax=(slap pit gen) =+ vax=(slap pit gen)
+>.$(bud vax) +>.$(bud vax)
@ -10631,11 +10631,11 @@
q.niz q.niz
|- ^+ q.niz |- ^+ q.niz
?~ q.niz ?~ q.niz
:: ~& [%vane `@tas`lal.fav pax.fav `@p`(mug txt.fav)] ~& [%vane `@tas`lal.fav pax.fav `@p`(mug txt.fav)]
[[lal.fav q.sew:(vint lal.fav vil bud pax.fav txt.fav)] q.niz] [[lal.fav q.sew:(vint lal.fav vil bud pax.fav txt.fav)] q.niz]
?. =(lal.fav p.i.q.niz) ?. =(lal.fav p.i.q.niz)
[i.q.niz $(q.niz t.q.niz)] [i.q.niz $(q.niz t.q.niz)]
:: ~& [%vane `@tas`lal.fav pax.fav `@p`(mug txt.fav)] ~& [%vane `@tas`lal.fav pax.fav `@p`(mug txt.fav)]
:_ t.q.niz :_ t.q.niz
:- p.i.q.niz :- p.i.q.niz
q.sew:(ruck:(vent lal.fav vil bud [p.niz q.i.q.niz]) pax.fav txt.fav) q.sew:(ruck:(vent lal.fav vil bud [p.niz q.i.q.niz]) pax.fav txt.fav)