Erlang -callbacks只能通过MFA函数调用(应用/3、派生/3、.)吗？(自定义行为如何)
这就是我对这个简单代码的怀疑
-module(simple_server).
-export( [sayHello/0] ).
-callback say(Num :: term()) -> term().
sayHello() ->
io:fwrite( "Hello 1: ~p\n", [ say(1) ]) ,
io:fwrite( "Hello 2: ~p\n", [ say(2) ]) .未能汇编：
$ erlc simple_server.erl
simple_server.erl:7: function say/1 undefined
simple_server.erl:8: function say/1 undefined回答 2
Stack Overflow用户
发布于 2018-11-14 11:14:56
您需要提供回调模块的名称，这可以通过apply和spawn完成，但也可以使用变量作为模块名进行简单调用，例如CallbackModule:say(1)。
所以你可以这样做：
sayHello(CallbackModule) ->
io:fwrite( "Hello 1: ~p\n", [ CallbackModule:say(1) ]) ,
io:fwrite( "Hello 2: ~p\n", [ CallbackModule:say(2) ]) .或
sayHello(CallbackModule) ->
io:fwrite( "Hello 1: ~p\n", [ apply(CallbackModule, say, [1]) ]) ,
io:fwrite( "Hello 2: ~p\n", [ apply(CallbackModule, say, [2]) ]) .这两个版本是等价的。
让我们创建一个实现simple_server行为的回调模块：
-module(my_callback).
-behaviour(simple_server).
-export([say/1]).
say(N) ->
{N, is, the, loneliest, number}.现在，我们可以使用模块名作为参数调用simple_server:sayHello：
> simple_server:sayHello(my_callback).
Hello 1: {1,is,the,loneliest,number}
Hello 2: {2,is,the,loneliest,number}Stack Overflow用户
发布于 2018-11-14 11:52:53
HOWTO Erlang自定义行为(模板方法模式).
-1。编写一个通用模块。这里定义了一个算法，但是一些步骤( Erlang命名中的回调函数)将留给将来的特定定义。
%% generic.erl
-module(generic).
-export( [sayHello/1] ).
-callback say(Num :: term()) -> term(). %% future definition
%% generic algorithm: needs the reference to the provider module
sayHello(ProviderModule) ->
io:fwrite( "Hello 1: ~p\n", [ ProviderModule:say(1) ]) ,
io:fwrite( "Hello 2: ~p\n", [ ProviderModule:say(2) ]) .-2.编译generic.erl
erlc generic.erl-(3.)尝试编写提供程序(回调)模块
%% callbacks1.erl (fails to implement say/1 callback)
-module( callbacks1 ).
-behaviour( generic ).-(4.)编译callbacks1.erl：使用-pa .来表示generic.beam在哪里。(因此，发出了有关say/1的预期警告)。
erlc -pa . callbacks1.erl
callbacks1.erl:2: Warning: undefined callback function say/1 (behaviour 'generic')(注意:如果没有给出-pa，您将得到以下内容："callbacks1.erl:2:警告:行为一般未定义“)
-3.编写正确的提供程序(回调)模块。
%% callbacks2.erl
-module( callbacks2 ).
-behaviour( generic ).
-export( [say/1] ).
say(1) -> "good morning";
say(2) -> "bon jour";
say(_) -> "hi".-4.编译它
erlc -pa . callbacks2.erl(好了)
-5.编写一个main.erl来收集带有回调模块的泛型模块。
%% main.erl
-module( main ).
-export( [main/0] ).
main() ->
%% call the generic algorithm telling it what callback module to use
generic:sayHello( callbacks2 )
. % ()-6.编译和运行main
erlc main.erl
erl -noshell -s main main -s init stop我们得到：
Hello 1: "good morning"
Hello 2: "bon jour"https://stackoverflow.com/questions/53296965
复制相似问题
腾讯云开发者
Copyright © 2013 - 2026 Tencent Cloud. All Rights Reserved. 腾讯云 版权所有
深圳市腾讯计算机系统有限公司 ICP备案/许可证号：粤B2-20090059 
粤公网安备44030502008569号
腾讯云计算（北京）有限责任公司 京ICP证150476号 | 京ICP备11018762号