gen_event handle_info没有被调用

时间:2012-10-30 17:21:48

标签: erlang gen-event

我正在使用gen_event行为,除了处理事件之外,我希望能够处理其他通用消息。根据文档,这些消息应该通过handle_info接收。然而,这似乎不起作用......除非我遗漏了一些非常明显的东西!

这是我的行为实施:

-module(genevent).

-behaviour(gen_event).

-export([init/1, handle_event/2, handle_info/2, handle_call/2, terminate/2, start_link/0]).

init(_Args) -> {ok, []}.

handle_event(Event, State) ->
    io:format("***Event*** ~p~n", [Event]),
    {ok, State}.

handle_call(Call, State) ->
    io:format("***Call*** ~p~n", [Call]),
    {ok, State}.

handle_info(Info, State) ->
    io:format("***Info*** ~p~n", [Info]),
    {ok, State}.

start_link() -> gen_event:start_link({local, genevent}).

terminate(_Args, _State) -> ok.

这是我的用法

{ok,PID} = genevent:start_link(),
io:format("***Sending to*** ~p~n", [PID]),
PID ! {hello},
io:format("***Sent hello to*** ~p~n", [PID]).

问题是永远不会达到代码io:format(“ Info ~p~n”,[Info])。

我希望我没有做一些非常愚蠢的事情! 感谢

1 个答案:

答案 0 :(得分:4)

gen_event:start_link/1刚开始一个活动经理;它不会将您的事件处理程序添加到此新事件管理器。您需要使用gen_event:add_handler/3

自行完成此操作
1> c(genevent).
genevent.erl:3: Warning: undefined callback function code_change/3 (behaviour 'gen_event')
{ok,genevent}
2> {ok,PID} = genevent:start_link().
{ok,<0.38.0>}
3> gen_event:add_handler(PID, genevent, {}).
ok
4> PID ! foo.
***Info*** foo
foo
相关问题