aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorBjörn-Egil Dahlberg <[email protected]>2016-05-04 18:01:28 +0200
committerBjörn-Egil Dahlberg <[email protected]>2016-05-04 18:03:32 +0200
commit58ee80fc615e19d1c2f2a1f69aa1c92fa9ab4f43 (patch)
treebdd5631c86b6d29a3714a2b216e613f545dbb076
parent56b7f0078a269973f6cc90b63667e61c1f9dbedd (diff)
downloadotp-58ee80fc615e19d1c2f2a1f69aa1c92fa9ab4f43.tar.gz
otp-58ee80fc615e19d1c2f2a1f69aa1c92fa9ab4f43.tar.bz2
otp-58ee80fc615e19d1c2f2a1f69aa1c92fa9ab4f43.zip
Replace use of test_server:format/2 with io:format/2
There is no practial difference.
-rw-r--r--erts/epmd/test/epmd_SUITE.erl17
1 files changed, 6 insertions, 11 deletions
diff --git a/erts/epmd/test/epmd_SUITE.erl b/erts/epmd/test/epmd_SUITE.erl
index 29b10f2d29..4fb8875cde 100644
--- a/erts/epmd/test/epmd_SUITE.erl
+++ b/erts/epmd/test/epmd_SUITE.erl
@@ -258,8 +258,7 @@ register_node_v2(Addr, Port, NodeType, Prot, HVsn, LVsn, Name, Extra) ->
{ok, [?EPMD_ALIVE2_RESP,_Res=0,_C0,_C1]} ->
{ok,Sock};
Other ->
- test_server:format("recv on sock ~w: ~p~n",
- [Sock,Other]),
+ io:format("recv on sock ~w: ~p~n", [Sock,Other]),
error
end;
error ->
@@ -276,8 +275,7 @@ port_please_v2(Name) ->
{ok, Resp} ->
parse_port2_resp(Resp);
Other ->
- test_server:format("recv on sock ~w: ~p~n",
- [Sock,Other]),
+ io:format("recv on sock ~w: ~p~n", [Sock,Other]),
error
end;
error ->
@@ -294,8 +292,7 @@ parse_port2_resp(Resp) ->
node_name=unicode:characters_to_list(NodeName),
extra=binary_to_list(Extra)}};
_Other ->
- test_server:format("invalid port2 resp: ~p~n",
- [Resp]),
+ io:format("invalid port2 resp: ~p~n", [Resp]),
error
end.
@@ -454,8 +451,7 @@ port_request(M) ->
ok;
Other ->
close(RSock),
- test_server:format("recv on sock ~w: ~p~n",
- [Sock,Other]),
+ io:format("recv on sock ~w: ~p~n", [Sock,Other]),
throw({error,Other})
end,
ok.
@@ -505,8 +501,7 @@ register_overflow(Config) when is_list(Config) ->
Count = length(Conn),
ok = unregister_many(Conn),
sleep(?MEDIUM_PAUSE),
- test_server:format("Limit was ~w names, now reg/unreg all 10 times~n",
- [Count]),
+ io:format("Limit was ~w names, now reg/unreg all 10 times~n", [Count]),
ok = register_repeat(Count),
sleep(?MEDIUM_PAUSE),
ok = rregister_repeat(Count),
@@ -551,7 +546,7 @@ rregister_repeat(Count) ->
% Return count of successful registrations
register_many(I, N, _Prefix) when I > N ->
- test_server:format("Done with all ~n", []),
+ io:format("Done with all ~n", []),
[];
register_many(I, N, Prefix) ->
Name = gen_name(Prefix, I),