diff options
author | Björn Gustavsson <[email protected]> | 2016-02-25 15:40:16 +0100 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2016-03-10 14:31:22 +0100 |
commit | 6588228827d92f4cb9883303f03abf84734947b0 (patch) | |
tree | f74e29127d6b62ebd325b5a067ca18214835dba3 /lib/kernel/test/bif_SUITE.erl | |
parent | 2d17815c831829af13899c23b320b884e790cf9b (diff) | |
download | otp-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.erl | 16 |
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), |