mirror of
https://github.com/ilyakooo0/urbit.git
synced 2024-12-16 10:49:26 +03:00
17 lines
266 B
Plaintext
17 lines
266 B
Plaintext
|
!:
|
||
|
|
:: /=main=/toy/cat/hoon
|
||
|
|
::
|
||
|
|
|= *
|
||
|
|
|= ape=(list path)
|
||
|
|
:_ ~
|
||
|
|
:_ ~
|
||
|
|
^- gift
|
||
|
|
:+ %mu [%atom %t]
|
||
|
|
=- |- ^- (list ,@t)
|
||
|
|
?~(foz ~ (weld i.foz $(foz t.foz)))
|
||
|
|
^= foz
|
||
|
|
=| foz=(list (list ,@t))
|
||
|
|
|- ^+ foz
|
||
|
|
?~ ape ~
|
||
|
|
[(lore ((hard ,@) .^(%cx i.ape))) $(ape t.ape)]
|