gen_server Hello World
简单的gen_server Hello World程序代码:
-module(genserver).-behaviour(gen_server).-export().-export().start() -> gen_server:start_link({local, ?MODULE}, ?MODULE, [], []).hello(Name) ->Reply = gen_server:call(?MODULE, {hello, Name}),io:format("~s~n", ).handle_call({hello, Name}, _From, State) ->Reply = lists:append(["Hello, ", Name, "!"]),{reply, Reply, State}.init(_Args) ->{ok, init}.handle_cast(_Request, State) ->{noreply, State}.handle_info(_Info, State) ->{noreplay, State}. terminate(_Reason, _State) ->ok.code_change(_OldVsn, State, _Extra) ->{ok, State}.
编译:
Eshell> c(genserver).
运行:
Eshell> genserver:start().Eshell> genserver:hello("Hideto").
输出结果:
Hello, Hideto!
页:
[1]