无法在 Erlang 中运行简单的应用程序

Question

我用 Erlang 写了一个简单的应用程序，但它拒绝工作，出现以下错误：

   =SUPERVISOR REPORT==== 18-Jan-2012::15:03:27 ===
 Supervisor: {<0.60.0>,my_sup}
 Context:    start_error
 Reason:     {'EXIT',{undef,[{my,start,[{8077,none}]},
                             {supervisor,do_start_child,2},
                             {supervisor,start_children,3},
                             {supervisor,init_children,2},
                             {gen_server,init_it,6},
                             {proc_lib,init_p_do_apply,3}]}}
 Offender:   [{pid,undefined},
              {name,my},
              {mfa,{my,start,[{8077,none}]}},
              {restart_type,permanent},
              {shutdown,brutal_kill},
              {child_type,worker}]

=INFO REPORT==== 18-Jan-2012::15:03:27 ===
application: my
exited: {shutdown,{my_app,start,[normal,[noarg]]}}
type: temporary {error,{shutdown,{my_app,start,[normal,[noarg]]}}}

和模块：

我的.erl

-module(my).
-export([start/2, stop/0]).

start(Port,_arg) ->
 io:format("starting my").

stop() ->
  ok.

my_app.erl 应用模块，执行 application行为。

 -module(my_app).
 -behaviour(application).
 -export([start/2, stop/1]).

  start(_Type, _Args) ->
   io:format("my server starting~n"),
   my_sup:start_link().

  stop(_State) ->
   io:format("my server terminating~n"),
   ok.

my_sup.erl 主管逻辑

-module(my_sup).
-behaviour(supervisor).
-export([start_link/0]).
-export([init/1]).

start_link() ->
  supervisor:start_link(my_sup, []).

init(_Args) ->
 {ok, {
       {one_for_one, 10, 60},
          [{my, {my, start, [{8077,none}]
       },
        permanent, brutal_kill, worker, [my]}]}}.

配置文件（my.app）：

 {application, my,
 [
  {description, "Demo"},
  {vsn, "1.0"},
  {id, "hello"},
  {modules,      [my,my_sup]},
  {registered,   [my,my_sup]},
  {applications, [kernel, stdlib]},
  %%
  %% mod: Specify the module name to start the application, plus args
  %%
  {mod, {my_app, [noarg]}},
  {env, []}
  ]
 }.

我按照您的建议更改了子规范，但问题仍然存在。

 =SUPERVISOR REPORT==== 19-Jan-2012::00:34:21 ===
 Supervisor: {<0.96.0>,my_sup}
 Context:    start_error
 Reason:     <0.97.0>
 Offender:   [{pid,undefined},
          {name,my},
          {mfa,{my,start,[8077,none]}},
          {restart_type,permanent},
          {shutdown,brutal_kill},
          {child_type,worker}]


=ERROR REPORT==== 19-Jan-2012::00:34:21 ===
Error in process <0.97.0> with exit value: 
{{badmatch,{error,eaddrinuse}},[{my,'-       start/2-fun-0-',1}]}


=INFO REPORT==== 19-Jan-2012::00:34:21 ===
application: my
exited: {shutdown,{my_app,start,[normal,[noarg]]}}
type: temporary
{error,{shutdown,{my_app,start,[normal,[noarg]]}}}

Answer 1

Themy:start/2应该有两个参数，但在 child 规范中你只给它一个参数 ( {8077,none})。您可以将子规范更改为：

{my, {my, start, [8077,none]}, permanent, brutal_kill, worker, [my]}

顺便说一句，您对 Supervisor 规范的缩进和换行有点偏离，因此很难看出什么属于什么。

编辑：对新错误的评论

这与之前的问题不一样。您收到一个新错误eaddrinuse，这通常意味着您正在尝试使用已在使用的 IP 地址/端口。这意味着您正在代码中进行一些套接字编程。