shrub/app/curl.hoon

17 lines
419 B
Plaintext
Raw Normal View History

2016-02-18 01:57:46 +03:00
::
2016-02-05 06:05:37 +03:00
:::: /hoon/curl/app
2015-05-28 01:34:01 +03:00
::
2016-02-18 01:57:46 +03:00
/? 310
2017-10-19 22:28:17 +03:00
/+ old-zuse
=, old-zuse
2016-11-17 04:42:58 +03:00
::
2016-02-18 01:57:46 +03:00
|_ {{^ ^ ost/@ ^} $~}
2016-03-10 01:47:24 +03:00
++ poke |*(a/{mark *} :_(+> [ost %hiss / `~ %wain a]~))
2016-02-18 01:57:46 +03:00
::++ poke-purl |=(a/purl :_(+> [ost %hiss / %wain %purl a]~))
++ poke-tape |=(a/tape (poke %purl (scan a auri:urlp)))
2016-03-10 01:47:24 +03:00
++ poke-hiss |=(a/hiss (poke %hiss a))
++ poke-noun poke-hiss
2016-02-18 01:57:46 +03:00
++ sigh-wain |=({* a/wain} ~&(a `+>))
++ sigh-tang |=({* a/tang} (mean a))
2015-05-28 01:34:01 +03:00
--