urbit/app/curl.hoon

12 lines
320 B
Plaintext
Raw Normal View History

2015-05-28 01:34:01 +03:00
!:
2016-02-05 06:05:37 +03:00
:::: /hoon/curl/app
2015-05-28 01:34:01 +03:00
::
2016-02-11 21:50:20 +03:00
/? 314
2015-05-30 02:47:38 +03:00
|_ [[^ ^ ost=@ ^] ~]
++ poke |*(a=[mark *] :_(+> [ost %hiss / %wain a]~))
::++ poke-purl |=(a=purl :_(+> [ost %hiss / %wain %purl a]~))
++ poke-noun |=(a=tape (poke %purl (scan a auri:epur)))
++ sigh-wain |=([* a=wain] ~&(a `+>))
2015-05-30 10:53:19 +03:00
++ sigh-tang |=([* a=tang] (mean a))
2015-05-28 01:34:01 +03:00
--