aboutsummaryrefslogtreecommitdiffstats
path: root/erts/test/erlc_SUITE.erl
diff options
context:
space:
mode:
authorBjörn-Egil Dahlberg <[email protected]>2016-04-06 16:15:24 +0200
committerBjörn-Egil Dahlberg <[email protected]>2016-04-06 16:23:45 +0200
commit66668a6504fe3d6ed33ce87b1d4c1a76dae1a987 (patch)
tree8fc8b690a661e7709f4be867b536c5137f2457ba /erts/test/erlc_SUITE.erl
parentf1bd16d883b6236dff83d7784ebd858ef29e2c0c (diff)
downloadotp-66668a6504fe3d6ed33ce87b1d4c1a76dae1a987.tar.gz
otp-66668a6504fe3d6ed33ce87b1d4c1a76dae1a987.tar.bz2
otp-66668a6504fe3d6ed33ce87b1d4c1a76dae1a987.zip
Eliminate use of test_server:fail/0,1
Diffstat (limited to 'erts/test/erlc_SUITE.erl')
-rw-r--r--erts/test/erlc_SUITE.erl11
1 files changed, 5 insertions, 6 deletions
diff --git a/erts/test/erlc_SUITE.erl b/erts/test/erlc_SUITE.erl
index eca8319153..0750bf2836 100644
--- a/erts/test/erlc_SUITE.erl
+++ b/erts/test/erlc_SUITE.erl
@@ -249,7 +249,7 @@ num_d_options() ->
erlc() ->
case os:find_executable("erlc") of
false ->
- test_server:fail("Can't find erlc");
+ ct:fail("Can't find erlc");
Erlc ->
"\"" ++ Erlc ++ "\""
end.
@@ -359,13 +359,13 @@ match_messages([Msg|Rest1], [Regexp|Rest2]) ->
nomatch ->
io:format("Not matching: ~s\n", [Msg]),
io:format("Regexp : ~s\n", [Regexp]),
- test_server:fail(message_mismatch)
+ ct:fail(message_mismatch)
end,
match_messages(Rest1, Rest2);
match_messages([], [Expect|Rest]) ->
- test_server:fail({too_few_messages, [Expect|Rest]});
+ ct:fail({too_few_messages, [Expect|Rest]});
match_messages([Msg|Rest], []) ->
- test_server:fail({too_many_messages, [Msg|Rest]});
+ ct:fail({too_many_messages, [Msg|Rest]});
match_messages([], []) ->
ok.
@@ -422,5 +422,4 @@ run_command(Dir, {unix, _}, Cmd) ->
" *) echo '_ERROR_';;\n",
"esac\n"]};
run_command(_Dir, Other, _Cmd) ->
- M = io_lib:format("Don't know how to test exit code for ~p", [Other]),
- test_server:fail(lists:flatten(M)).
+ ct:fail("Don't know how to test exit code for ~p", [Other]).