blob: 13f39b8cb9ad0650ebb67e39f3b1369e52be3b9b (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
-module(b).
-export([start/0, loop/0]).
start() ->
spawn(?MODULE, loop, []).
loop() ->
receive
{ping, Ping} ->
a:pong(Ping),
loop();
stop ->
done
end.
|