尝试使用分布式erlang,这就是我所拥有的:
loop()->
receive {From, ping} ->
io:format("received ping from ~p~n", [From]),
From ! pong,
loop();
{From, Fun} when is_function(Fun) ->
io:format("executing function ~p received from ~p~n", [Fun, From]),
From ! Fun(),
loop()
end.
test_remote_node_can_execute_sent_clojure()->
Pid = spawn(trecias, fun([])-> loop() end),
Pid ! {self(), fun()-> erlang:nodes() end},
receive Result ->
Result = [node()]
after 300 ->
timeout
end.
获取:Can not start erlang:apply,[#Fun<tests.1.123107452>,[]] on trecias
节点我在与节点&#39; trecias相同的机器上运行测试。两个节点都可以加载相同的代码。
任何想法都有什么不妥之处?
答案 0 :(得分:1)
在spawn
调用中,您已将节点名称指定为trecias
,但您需要指定包含主机名的完整节点名称,例如trecias@localhost
。
此外,传递给spawn/2
的函数必须采用零参数,但上面代码中的参数需要一个参数(如果该参数不是空列表,则会崩溃)。改为将其写为fun() -> loop() end
。
在远程节点上生成匿名函数时,还需要确保在具有相同版本的两个节点上加载模块。否则,您将收到badfun
错误。