【发布时间】:2017-01-13 16:03:18
【问题描述】:
我正在尝试在回复之前对 handle_call/3 进行递归调用。
但这似乎是不可能的,因为抛出了timeout 退出异常。
下面你可以看到代码和错误。
代码:
-module(test).
-behavior(gen_server).
%% API
-export([start_link/0,init/1,handle_info/2,first_call/1,second_call/1, handle_call/3, terminate/2]).
-record(state, {whatever}).
start_link() ->
gen_server:start_link({local, ?MODULE}, ?MODULE, [], []).
init(_Args) ->
{ok, #state{}}.
handle_info(Data, State) ->
{noreply, State}.
% synchronous messages
handle_call(_Request, _From, State) ->
case _Request of
first_call ->
{reply, data1, State};
second_call ->
{reply, {data2, first_call(self())}, State}
end.
first_call(Pid) ->
gen_server:call(Pid, first_call).
second_call(Pid) ->
gen_server:call(Pid, second_call).
terminate(_Reason, _State) ->
ok.
错误:
2> {_, PID} = test:start_link().
{ok,<0.64.0>}
3> test:second_call(PID).
** exception exit: {timeout,{gen_server,call,[<0.64.0>,second_call]}}
in function gen_server:call/2 (gen_server.erl, line 204)
此行为的一个可能原因是 gen_server 无法处理递归调用,直到第一个调用完成(创建死锁)。这是正确的原因吗?如果是,为什么? 谢谢。
【问题讨论】:
标签: recursion erlang erlang-otp gen-server