erlang --进程生成测试

      下班了，写个程序先

其中进程之间的消息传递如图

erlang code

-module(myring).
-export([start/1,start_proc/2]).
start(Num)	->
	start_proc(Num,self()).
start_proc(0,Pid)	->
	receive 
		ok -> ok 
	end,
	Pid ! ok ;
start_proc(Num,Pid)	->
	NPid = spawn(?MODULE,start_proc ,[Num-1,Pid]),
	NPid ! ok ,
	receive 
		ok -> ok ,
		io:format("~w~n",[Num])
	end.

进程退出时会返回ok