mirror of
https://github.com/urbit/shrub.git
synced 2024-12-03 05:43:18 +03:00
15 lines
393 B
Plaintext
15 lines
393 B
Plaintext
::
|
|
:::: /hoon/curl/app
|
|
::
|
|
/? 310
|
|
::
|
|
|_ {{^ ^ ost/@ ^} $~}
|
|
++ poke |*(a/{mark *} :_(+> [ost %hiss / `~ %wain a]~))
|
|
::++ poke-purl |=(a/purl :_(+> [ost %hiss / %wain %purl a]~))
|
|
++ poke-tape |=(a/tape (poke %purl (scan a auri:urlp)))
|
|
++ poke-hiss |=(a/hiss (poke %hiss a))
|
|
++ poke-noun poke-hiss
|
|
++ sigh-wain |=({* a/wain} ~&(a `+>))
|
|
++ sigh-tang |=({* a/tang} (mean a))
|
|
--
|