adam@2064: fun remote () =
adam@2064: ch <- channel;
adam@2064: send ch "Hello World!";
adam@2064: return ch
adam@2064:
adam@2064: fun remoter () =
adam@2064: ch <- channel;
adam@2064: send ch "Hello World!";
adam@2064: return }/>
adam@2064:
adam@2064: fun main () =
adam@2064: x <- source ;
adam@2064: return
adam@2064:
adam@2064:
adam@2064:
adam@2064:
adam@2064: