list 判断

 

L

case L of

    [] -> ok...; 为空时

    [X] -> X..; 一个元素时

    List ->L .... 多个元素时

end

 

 

 

ejabberd_route代码片段 

case mnesia:dirty_read(route, LDstDomain) of

                [] ->

                    ejabberd_s2s:route(From, To, Packet);

                [R] ->

                    Pid = R#route.pid,

                    if

                        node(Pid) == node() ->

                            case R#route.local_hint of

                                {apply, Module, Function} ->

                                    Module:Function(From, To, Packet);

                                _ ->

                                    Pid ! {route, From, To, Packet}

                            end;

                        is_pid(Pid) ->

                            Pid ! {route, From, To, Packet};

                        true ->

                            drop

                    end;

                Rs ->

....

end