原语

原语

Erlang提供了元语case和if，这样在子句中无需借助其他函数便可以直接进行条件求值。

Case

case表达式允许在子句主体内部于多个选项中进行选择，语法如下：

case Expr of
    Pattern1 [when Guard1] -> Seq1;
    Pattern2 [when Guard2] -> Seq2;
    ...
    PatternN [when GuardN] -> SeqN
end

首先，对Expr求值，然后，Expr的值将依次与模式Pattern1、Pattern2……PatternN进行匹配，直到匹配成功。如果找到一个匹配并且（可选的）的保护式成立，则对应的调用序列将被求值。注意case保护式与函数保护式形式相同。case原语的值就是被选中的序列的值。

至少得有一个模式必须 得以匹配——否则就会产生一个运行时错误并引发第??章中的错误处理机制。

举个例子，比方说我们我有个函数allocate(Resource)用于分配某种资源Resource。假设这个函数只返回{yes,Address}或no。这样，这个函数便可以放在一个case结构里：

...
case allocate(Resource) of
    {yes,Address} when Address > 0, Address =< Max ->
        Sequence 1 ... ;
    no ->
        Sequence 2 ...
end
...

在Sequence1…中，变量Address已经被绑定在了allocate/1的返回结果上。

为了避免匹配错误的发生，我们常常追加一个必会匹配的模式[6]作为case原语的最后一个分支：

case Fn of
    ...
    _ ->
        true
end

If

if表达式的语法如下：

if
    Guard1 ->
        Sequence1 ;
    Guard2 ->
        Sequence2 ;
    ...
end

在这种情况下，保护式Guard1,…将被依次求值。如果一个保护式成立则对与之关联的序列求值。该序列的求值结果便是if结构的结果。if保护式与函数保护式形式相同。与case相同，一个保护式都不成立的话将引发一个错误。如果需要，可以增加保护式断言true作为垃圾箱：

if
    ...
    true ->
        true
end

Case 和 if 使用示例

使用case和if我们可以以多种方式来编写factorial。

最简单的：

factorial(0) -> 1;
factorial(N) -> N * factorial(N - 1).

使用函数保护式：

factorial(0) -> 1;
factorial(N) when N > 0 -> N * factorial(N - 1).

使用if：

factorial(N) ->
    if
        N == 0 -> 1;
        N > 0 -> N * factorial(N - 1)
    end.

使用case：

factorial(N) ->
    case N of
        0 -> 1;
        N when N > 0 ->
            N * factorial(N - 1)
    end.

使用变量保持临时结果：

factorial(0) ->
    1;
factorial(N) when N > 0 ->
    N1 = N - 1,
    F1 = factorial(N1),
    N * F1.

以上所有定义都是正确且等价的[7]——如何进行选择完全是个美学问题[8]。