dist2.erl

dist2.erl — Erlang source code, 142 bytes

Continguts del fitxer

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

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

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