shrub/pkg/arvo/imp/ph/add.hoon
2019-11-09 23:27:07 -08:00

13 lines
326 B
Plaintext

/- spider
/+ *ph-io
=, thread=thread:spider
^- imp:spider
|= [=bowl:spider args=vase]
=/ m (thread ,vase)
;< ~ 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 *vase)