mirror of
https://github.com/urbit/shrub.git
synced 2024-12-15 12:43:31 +03:00
24 lines
434 B
Plaintext
24 lines
434 B
Plaintext
|
!:
|
||
|
|
:: /=main=/toy/ye/hoon
|
||
|
|
::
|
||
|
|
=> .(-< `who=@p`-<)
|
||
|
|
|= *
|
||
|
|
|= [ebb=$|(~ [tex=tape ~])]
|
||
|
|
=+ bud=(sein who)
|
||
|
|
^- bowl
|
||
|
|
:- ~
|
||
|
|
:- ~
|
||
|
|
:- ^- (list slip)
|
||
|
|
:~ [/foo/bar [%yo bud %ye ?~(ebb '' (rap 3 tex.ebb))]]
|
||
|
|
==
|
||
|
|
|= [now=@da pax=path nut=note]
|
||
|
|
?> =(/foo/bar pax)
|
||
|
|
?> ?=(%yo -.nut)
|
||
|
|
:- ?: =(%good q.nut)
|
||
|
|
~
|
||
|
|
:_ ~
|
||
|
|
:- %ha
|
||
|
|
:- %leaf
|
||
|
|
"hi: {<p.nut>}.{<p.p.r.nut>} spurned {<q.r.nut>}/{<q.p.r.nut>}/{<r.r.nut>}"
|
||
|
|
~
|