diff options
author | Adam Kocoloski <adam@cloudant.com> | 2010-07-10 15:50:17 -0400 |
---|---|---|
committer | Adam Kocoloski <adam@cloudant.com> | 2010-07-10 15:50:17 -0400 |
commit | 69d30df9ac93976743c3decf56c471508cb6f897 (patch) | |
tree | db056a650d16e5d14b65c764233db559a1564839 | |
parent | 6c1079a922a4d96d6dca101e1a7d68a93f5b8c7c (diff) |
thank you dialyzer
-rw-r--r-- | src/rexi.erl | 4 | ||||
-rw-r--r-- | src/rexi_server.erl | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/src/rexi.erl b/src/rexi.erl index 8f1d72bf..21250210 100644 --- a/src/rexi.erl +++ b/src/rexi.erl @@ -16,7 +16,7 @@ restart() -> stop(), start(). %% @equiv cast(Node, self(), MFA) --spec cast(node(), mfa()) -> reference(). +-spec cast(node(), {atom(), atom(), list()}) -> reference(). cast(Node, MFA) -> cast(Node, self(), MFA). @@ -27,7 +27,7 @@ cast(Node, MFA) -> %% Second, the remote process is monitored. If it exits with a Reason other %% than normal, Caller will receive a message of the form %% `{Ref, {rexi_EXIT, Reason}}' where Ref is the returned reference. --spec cast(node(), pid(), mfa()) -> reference(). +-spec cast(node(), pid(), {atom(), atom(), list()}) -> reference(). cast(Node, Caller, MFA) -> Ref = make_ref(), ok = gen_server:cast({?SERVER, Node}, {doit, {Caller,Ref}, MFA}), diff --git a/src/rexi_server.erl b/src/rexi_server.erl index 127e088c..70296d5b 100644 --- a/src/rexi_server.erl +++ b/src/rexi_server.erl @@ -53,7 +53,7 @@ code_change(_OldVsn, St, _Extra) -> {ok, St}. %% @doc initializes a process started by rexi_server. --spec init_p({pid(),reference()}, mfa()) -> any(). +-spec init_p({pid(), reference()}, {atom(), atom(), list()}) -> any(). init_p(From, {M,F,A}) -> put(rexi_from, From), try apply(M, F, A) catch _:Reason -> exit(Reason) end. |