编写一个程序来产生一个新过程，该过程会收回X整数并返回X＆＃x2B; 1。如果在Erlang中传递了非整数消息，它将退出吗？

Question

我是Erlang的新手，我已经完成了代码，但是我需要此问题的正确答案格式。这是我的代码。如果我输入任何整数，则必须将1添加到该数字。如果给出了字符或浮点或任何其他非整数，则应从该过程中退出。

-module(a).
-export([start/0,func1/1]).

func1(List) when is_integer(List) -> io:format("~p~n",[List+1]);
func1(List) when is_atom(List) -> io:format("Exit~n");
func1(List) when is_binary(List) -> io:format("Exit~n");
func1(List) when is_list(List) -> io:format("Exit~n");
func1(List) when is_map(List) -> io:format("Exit~n");
func1(List) when is_float(List) -> io:format("Exit~n").

start() ->
     spawn(a, func1, [45]),
     spawn(a, func1, [test]).

此代码正常运行，但我需要以ping pong格式进行此操作，例如接收和结束，例如传递消息。请让我知道正确的答案，并提前感谢。

这是我看评论后尝试的。

-module(a).
-compile(export_all).

f1() ->
    receive
        List ->
            io:format("~p~n", [List+1]);
        _ ->
            io:format("Exit~n")
    end.

f2() ->
    receive
        {From, List} ->
            From ! "~p~n" ,[List+1];
        _ ->
            io:format("Exit~n")
    end.

f3() ->
    receive
        {From, List} ->
            From ! "~p~n" , [List+1],
            f3();
        _ ->
            io:format("Exit~n"),
            f3()
    end.

Answer 1

首先，您不必为不是整数的每个类型定义函数子句。关键是要认识到函数从句按顺序进行测试。您的第一个函数条款测试该参数是整数。这意味着，如果Erlang到达您的第二个功能条款，那么您知道该参数不是整数 - 无需进行任何类型检查。因此，为第二个函数条款中的所有非直集参数做需要做的事情。

其次，命名一个参数列表，当参数可以是整数，原子，元组，二进制等方面是非敏感的。

此代码工作正常，但我需要以ping pong格式执行此操作
诸如接收和结束之类的东西，例如传递消息。

然后，您需要启动其他过程而不发送任何参数，然后使另一个过程输入递归循环/函数。您在递归循环/函数中需要的唯一语句是接收语句，它将停止直到收到消息。

您的主要过程可以使用send（）将消息发送到另一个过程。您将需要定义一个用户函数，例如regrement_number（number）。内部enrecement_number（number），您将调用send> send（）将消息传输到另一个过程，然后下一个语句将是接收，它将等待返回来自另一个过程的消息。

我对Erlang非常陌生，所以我不知道对不起。

所有开始的Erlang编程书都告诉您如何创建多个相互交流的过程。我建议“编程erlang” - 阅读有关并发的相关部分。

您将不得不花很多时间阅读基本的并发示例，与之一起玩，然后尝试适应自己的使用。

这是我在看评论后尝试的。

通常，消息将作为元组传递，例如

send(OtherProcessPid, {self(), increment, 3})

或等效：

OtherProcessPid ! {self(), increment, 3}

另一个过程与接收子句中的消息匹配：

receive
    {Sender, increment, Number} ->

执行某些任务后，接收过程需要send（）一条消息回到发送过程，即包含一些算术计算结果的消息。而且，由于您希望接收过程能够处理不确定的消息和随后的计算，因此您要创建一个无限的循环。您在Erlang中这样做的方式具有递归功能：

loop() ->
    receive
       {Sender, increment, Number} -> 
          %% do stuff, e.g. send(Sender, Number+1)
          loop();
       {A, B} ->
          %% do stuff
          loop();
        quit  -> quitting  %%no recursive call, so function ends
    end.