diff options
| author | Anders Svensson <[email protected]> | 2013-03-22 17:43:46 +0100 |
|---|---|---|
| committer | Anders Svensson <[email protected]> | 2013-03-25 19:16:50 +0100 |
| commit | 9d211c8b4cad41f3ea42fb7087ea8d6bbfca78b2 (patch) | |
| tree | 19471747ba61adeec0f832df1b608e375bb2dc0f /lib/diameter/test/diameter_codec_test.erl | |
| parent | da0355042254d98a06acddbf7361bd0f0f4b4f7f (diff) | |
| download | otp-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/diameter_codec_test.erl')
| -rw-r--r-- | lib/diameter/test/diameter_codec_test.erl | 6 |
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 |