path: root/tests/chain.apl

worker←{
	msg←1⍨⍇0
	⍵≡⍬: ⎕←'DONE'
	⎕←'Worker id ',(⍕⎕self),' got message: ',(⍕msg)
	⎕←'Forwarding from ',(⍕⎕self), ' to ',⍕⍵
	msg⍈⍵
}
last←worker&⍣10⊢⍬
'Hello there'⍈last