我正在尝试在代码中返回变量Tree
,但似乎Erlang没有显式设置返回变量。我想从shell运行代码:
3> {Pid,Tree} = gbtree:start().
{<0.41.0>,init}
4>
4> gbtree:add_entry(2,Pid,Tree).
** exception error: no function clause matching
gb_trees:is_defined(2,init) (gb_trees.erl, line 221)
in function gb_trees:enter/3 (gb_trees.erl, line 335)
in call from gbtree:add_entry/3 (gbtree.erl, line 13)
请注意,错误与Tree
未正确传递到gbtree:add_entry(Key,Val,Tree).
有关。然而,以不同的方式执行此操作可以从shell运行函数调用gbtree:start().
应返回类似{<#.#.#>,{0,nil}}
。
2> Tree = gb_trees:empty().
{0,nil}
3>
3> gbtree:add_entry(1,"something",Tree).
gbt_r lookup 1 "something"
{1,{1,"something",nil,nil}}
以下是测试代码gbtree.erl
-module(gbtree).
-export([start/0, init/0, add_entry/3]).
start() ->
register(?MODULE, Pid = spawn(?MODULE, Tree = init, [])),
{ Pid, Tree}.
init() ->
Tree = gb_trees:empty(),
Tree.
add_entry(Key, Data, Tree1) ->
Tree2 = gb_trees:enter( Key, Data, Tree1),
io:format("gbt_r lookup ~p ~p~n ",[Key, Data]),
Tree2.
答案 0 :(得分:4)
在函数start()中,当您生成新进程时,传递模块名称?MODULE,函数名称'init'和参数[]。但是当你这样做时,你指定变量Tree等于第二个参数, - atom'init'。
这意味着函数start()的返回值将是进程id和atom'init'的元组。 (不是init函数的结果)。
说到franlky我不太明白为什么你在这里使用过程,所以,我会这样做这个模块:
-module(gbtree).
-export([init/0, add_entry/3]).
init() -> gb_trees:empty().
add_entry(Key, Data, Tree1) ->
Tree2 = gb_trees:enter( Key, Data, Tree1),
io:format("gbt_r lookup ~p ~p~n ",[Key, Data]),
Tree2.
并使用它:
T = gbtree:init(),
T1 = gbtree:add_entry(2,this_is_data,T).