shrub/pkg/arvo/imp/ph/add.hoon
2019-10-01 20:39:49 -07:00

13 lines
305 B
Plaintext

/- spider
/+ *ph-io
=, thread=thread:spider
^- imp:spider
|= =bowl:mall
=/ m (thread ,~)
;< ~ bind:m start-simple
;< ~ bind:m (raw-ship ~bud ~)
;< ~ bind:m (dojo ~bud "[%test-result (add 2 3)]")
;< ~ bind:m (wait-for-output ~bud "[%test-result 5]")
;< ~ bind:m end-simple
(pure:m ~)