青年人青年期心里特征和Erlang编程

%% Code from
%% Erlang Programming
%% Francecso Cesarini and Simon Thompson
%% O’Reilly, 2008
%% http://oreilly.com/catalog/9780596518189/
%% http://www.erlangprogramming.org/
%% © Francesco Cesarini and Simon Thompson

-module(echo2).
-export([go/0, loop/0]).

go() ->
register(echo, spawn(echo2, loop, [])),
echo ! {self(), hello},
receive
{_Pid, Msg} ->
io:format(“_wn”,[Msg])
end.

loop() ->
receive
{From, Msg} ->
From ! {self(), Msg},
loop();
stop ->
true
end.
-module(my_timer).
-export([send_after/2, sleep/1, send/3]).

send_after(Time, Msg) ->
spawn(my_timer, send, [self(),Time,Msg]).

send(Pid, Time, Msg) ->
receive
after
Time ->
Pid ! Msg
end.

sleep(T) ->
receive
after
T -> true
end.