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

hoon: adds atom map gates +run and +rut

Browse Source
This commit is contained in:
Joe Bryan 2020-11-30 14:32:40 -08:00
parent 12bf28e2c8
commit 3f71826d6b
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
pkg/arvo/sys/hoon.hoon
View File

@ -928,6 +928,16 @@
|= [a=bloq b=step c=@] |= [a=bloq b=step c=@]
(div c (bex (mul (bex a) b))) (div c (bex (mul (bex a) b)))
:: ::
++ run :: +turn into atom
~/ %run
|= [a=bite b=@ c=$-(@ @)]
(rep a (turn (rip a b) c))
::
++ rut :: +turn into list
~/ %rut
|* [a=bite b=@ c=$-(@ *)]
(turn (rip a b) c)
::
++ sew :: stitch into ++ sew :: stitch into
~/ %sew ~/ %sew
|= [a=bloq [b=step c=step d=@] e=@] |= [a=bloq [b=step c=step d=@] e=@]