aboutsummaryrefslogtreecommitdiffstats
path: root/lib/diameter/test
diff options
context:
space:
mode:
authorAnders Svensson <[email protected]>2013-03-22 17:43:46 +0100
committerAnders Svensson <[email protected]>2013-03-25 19:16:50 +0100
commit9d211c8b4cad41f3ea42fb7087ea8d6bbfca78b2 (patch)
tree19471747ba61adeec0f832df1b608e375bb2dc0f /lib/diameter/test
parentda0355042254d98a06acddbf7361bd0f0f4b4f7f (diff)
downloadotp-9d211c8b4cad41f3ea42fb7087ea8d6bbfca78b2.tar.gz
otp-9d211c8b4cad41f3ea42fb7087ea8d6bbfca78b2.tar.bz2
otp-9d211c8b4cad41f3ea42fb7087ea8d6bbfca78b2.zip
Minor diameter_lib cleanup
Remove unused functions, add dialyzer specs, make wait/1 less fallible.
Diffstat (limited to 'lib/diameter/test')
-rw-r--r--lib/diameter/test/diameter_codec_test.erl6
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/diameter/test/diameter_codec_test.erl b/lib/diameter/test/diameter_codec_test.erl
index dc8cbffc83..0baac59c1a 100644
--- a/lib/diameter/test/diameter_codec_test.erl
+++ b/lib/diameter/test/diameter_codec_test.erl
@@ -65,7 +65,7 @@ lib(N, {_,_} = T) ->
lib(IP, B) ->
LA = tuple_to_list(IP),
{SA,Fun} = ip(LA),
- [] = run([[fun lib/4, IP, B, Fun, A] || A <- [IP, LA, SA]]).
+ [] = run([[fun lib/4, IP, B, Fun, A] || A <- [IP, SA]]).
lib(IP, B, Fun, A) ->
try Fun(A) of
@@ -78,10 +78,10 @@ lib(IP, B, Fun, A) ->
ip([_,_,_,_] = A) ->
[$.|S] = lists:append(["." ++ integer_to_list(N) || N <- A]),
- {S, fun diameter_lib:ip4address/1};
+ {S, fun diameter_lib:ipaddr/1};
ip([_,_,_,_,_,_,_,_] = A) ->
[$:|S] = lists:flatten([":" ++ io_lib:format("~.16B", [N]) || N <- A]),
- {S, fun diameter_lib:ip6address/1}.
+ {S, fun diameter_lib:ipaddr/1}.
%% ------------------------------------------------------------------------
%% base/1