summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAdam Kocoloski <adam@cloudant.com>2010-07-10 15:50:17 -0400
committerAdam Kocoloski <adam@cloudant.com>2010-07-10 15:50:17 -0400
commit69d30df9ac93976743c3decf56c471508cb6f897 (patch)
treedb056a650d16e5d14b65c764233db559a1564839
parent6c1079a922a4d96d6dca101e1a7d68a93f5b8c7c (diff)
thank you dialyzer
-rw-r--r--src/rexi.erl4
-rw-r--r--src/rexi_server.erl2
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.