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, '[email protected]'} ! {call, self(), Msg},
    receive
	{cnode, Result} ->
	    Result
    end.