dist2.erl

text/x-erlang dist2.erl — 1 KB

Continguts del fitxer

-module(dist2).
-export([s/0]).

s() -> 
	register(server, self()),
	loop().

loop() ->
	receive {M, Pid} ->
		Pid!M
	end,
	loop().