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

Support / instead of +, in theory.

Browse Source
This commit is contained in:
C. Guy Yarvin 2015-12-20 12:26:36 -08:00
parent 2519413c4f
commit 52d57f6495
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
arvo/hoon.hoon
View File

@ -9991,6 +9991,7 @@
$% {$tis p+twig}
{$col p+twig}
{$ket p+twig}
{$fas p+twig}
{$lus p+twig}
{$pel p+tram}
==
@ -10005,6 +10006,8 @@
$col [~ %tsgl ros p.vil]
$pel (bind ~(reek ap ros) |=(hyp+wing [%cnts hyp p.vil]))
$ket [~ ros p.vil]
$fas =+ tog=~(hock ap ros)
?.(?=(@ tog) ~ [~ %bcts tog p.vil])
$lus =+ tog=~(hock ap ros)
?.(?=(@ tog) ~ [~ %bcts tog p.vil])
$tis =+ tog=~(hock ap ros)
@ -10020,6 +10023,7 @@
;~(plug (cold %col col) wide)
;~(plug (cold %ket ket) wide)
;~(plug (cold %lus lus) wide)
;~(plug (cold %fas fas) wide)
;~ plug
(easy %pel)
(ifix [pel per] lobo)