aboutsummaryrefslogblamecommitdiffstats
path: root/system/doc/tutorial/complex4.erl
blob: c1df273b60e7f26e1ab227c23c9a721396924fd3 (plain) (tree)
1
2
3
4
5
6
7
8
9
10
11
12
13
14












                                                                  
-module(complex4).
-export([foo/1, bar/1]).

foo(X) ->
    call_cnode({foo, X}).
bar(Y) ->
    call_cnode({bar, Y}).

call_cnode(Msg) ->
    {any, 'cnode@idril.du.uab.ericsson.se'} ! {call, self(), Msg},
    receive
	{cnode, Result} ->
	    Result
    end.