Send/Receive message

go :: Process ()
go = do
  pid <- spawn recv
  pid ! :msg
recv :: Process ()
recv = receive x -> printf "recv: %s" (showAny x)