aboutsummaryrefslogtreecommitdiffstats
path: root/lib/kernel/test/bif_SUITE.erl
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2016-02-25 15:40:16 +0100
committerBjörn Gustavsson <[email protected]>2016-03-10 14:31:22 +0100
commit6588228827d92f4cb9883303f03abf84734947b0 (patch)
treef74e29127d6b62ebd325b5a067ca18214835dba3 /lib/kernel/test/bif_SUITE.erl
parent2d17815c831829af13899c23b320b884e790cf9b (diff)
downloadotp-6588228827d92f4cb9883303f03abf84734947b0.tar.gz
otp-6588228827d92f4cb9883303f03abf84734947b0.tar.bz2
otp-6588228827d92f4cb9883303f03abf84734947b0.zip
Eliminate use test_server:format()
Replace with io:format/2 or ct:pal/3.
Diffstat (limited to 'lib/kernel/test/bif_SUITE.erl')
-rw-r--r--lib/kernel/test/bif_SUITE.erl16
1 files changed, 8 insertions, 8 deletions
diff --git a/lib/kernel/test/bif_SUITE.erl b/lib/kernel/test/bif_SUITE.erl
index c0ef0ab714..0f95bbd7a8 100644
--- a/lib/kernel/test/bif_SUITE.erl
+++ b/lib/kernel/test/bif_SUITE.erl
@@ -380,7 +380,7 @@ spawn_failures(Config) when is_list(Config) ->
?line {ok, Node} = start_node(spawn_remote_failure),
% unknown nodes
- test_server:format("Testing unknown nodes~n", []),
+ io:format("Testing unknown nodes~n", []),
?line CrashPid1 = (catch spawn_opt('unknown@node',
erlang,
nodes,
@@ -436,7 +436,7 @@ spawn_failures(Config) when is_list(Config) ->
end,
% bad node
- test_server:format("Testing bad nodes~n", []),
+ io:format("Testing bad nodes~n", []),
?line {'EXIT', {badarg, _}} = (catch spawn_opt("Node",erlang,nodes,[],[])),
?line {'EXIT', {badarg, _}} = (catch spawn_opt("Node",
fun () ->
@@ -454,7 +454,7 @@ spawn_failures(Config) when is_list(Config) ->
end)),
% bad module
- test_server:format("Testing bad modules~n", []),
+ io:format("Testing bad modules~n", []),
?line {'EXIT', {badarg, _}} = (catch spawn_opt(Node,"erlang",nodes,[],[])),
?line {'EXIT', {badarg, _}} = (catch spawn_opt("erlang",nodes,[],[])),
?line {'EXIT', {badarg, _}} = (catch spawn_link(Node,"erlang",nodes,[])),
@@ -463,7 +463,7 @@ spawn_failures(Config) when is_list(Config) ->
?line {'EXIT', {badarg, _}} = (catch spawn("erlang",nodes,[])),
% bad function
- test_server:format("Testing bad functions~n", []),
+ io:format("Testing bad functions~n", []),
?line {'EXIT', {badarg, _}} = (catch spawn_opt(Node,erlang,"nodes",[],[])),
?line {'EXIT', {badarg, _}} = (catch spawn_opt(Node,not_a_fun,[])),
?line {'EXIT', {badarg, _}} = (catch spawn_opt(erlang,"nodes",[],[])),
@@ -479,7 +479,7 @@ spawn_failures(Config) when is_list(Config) ->
% bad argument
- test_server:format("Testing bad arguments~n", []),
+ io:format("Testing bad arguments~n", []),
?line {'EXIT', {badarg, _}} = (catch spawn_opt(Node,erlang,nodes,[a|b],[])),
?line {'EXIT', {badarg, _}} = (catch spawn_opt(erlang,nodes,[a|b],[])),
?line {'EXIT', {badarg, _}} = (catch spawn_link(Node,erlang,nodes,[a|b])),
@@ -488,7 +488,7 @@ spawn_failures(Config) when is_list(Config) ->
?line {'EXIT', {badarg, _}} = (catch spawn(erlang,nodes,[a|b])),
% bad option
- test_server:format("Testing bad options~n", []),
+ io:format("Testing bad options~n", []),
?line {'EXIT', {badarg, _}} = (catch spawn_opt(Node,erlang,nodes,[],[a|b])),
?line {'EXIT', {badarg, _}} = (catch spawn_opt(erlang,nodes,[],[a|b])),
@@ -532,7 +532,7 @@ wilderness(suite) ->
wilderness(Config) when is_list(Config) ->
?line OKParams = {512, 8},
?line Alloc = erlang:system_info(allocator),
- ?line test_server:format("Test server allocator info:~n~p", [Alloc]),
+ io:format("Test server allocator info:~n~p", [Alloc]),
Result = case Alloc of
{Allocator, _, _, _} when Allocator == glibc;
Allocator == dlmalloc ->
@@ -566,7 +566,7 @@ run_wilderness_test({Set_tt, Set_tp}, {Exp_tt, Exp_tp}) ->
{Ref, {A, V, F, S}} ->
Ett = Exp_tt*1024,
Etp = Exp_tp*1024,
- ?line test_server:format("Test allocator info:~n~p",
+ io:format("Test allocator info:~n~p",
[{A, V, F, S}]),
?line {value, {sys_alloc, SA_Opts}}
= lists:keysearch(sys_alloc, 1, S),