shrub/pkg/arvo/ted/read.hoon

19 lines
443 B
Plaintext
Raw Normal View History

/- spider
/+ strandio
=, strand=strand:spider
^- thread:spider
|= arg=vase
=/ m (strand ,vase)
^- form:m
:: Parse arguments as ship, desk, and path
::
=+ !<([~ =care:clay =ship =desk =case =target=path] arg)
:: Read the file, possibly asyncrhonously
::
;< =bowl:spider bind:m get-bowl:strandio
;< =riot:clay bind:m
2020-05-23 00:32:32 +03:00
(warp:strandio ship desk ~ %sing care case target-path)
?~ riot
(pure:m !>('nothing'))
2020-05-23 00:32:32 +03:00
(pure:m q.r.u.riot)