github/rebar
1
0
Fork 0
mirror of https://github.com/correl/rebar.git synced 2024-11-23 19:19:54 +00:00
Code Issues Projects Releases Packages Wiki Activity

Port rebar_eunit_tests to Windows

Browse source
This commit is contained in:
Juhani Rankimies 2010-10-26 07:22:01 +03:00 committed by Dave Smith
parent fd5ebe69a4
commit 80c065191f
1 changed files with 12 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
test/rebar_eunit_tests.erl
View file

@ -124,7 +124,8 @@ environment_test_() ->
assert_rebar_runs() -> assert_rebar_runs() ->
prepare_rebar_script(), prepare_rebar_script(),
?assert(string:str(os:cmd("./" ++ ?TMP_DIR ++ "rebar"), "Usage: rebar") =/= 0). ?assert(string:str(os:cmd(filename:nativename("./" ++ ?TMP_DIR ++ "rebar")),
"No command to run specified!") =/= 0).
basic_setup_test_() -> basic_setup_test_() ->
{"Create a simple project with a 'test' directory, a test, and a module", {"Create a simple project with a 'test' directory, a test, and a module",
@ -176,6 +177,7 @@ setup_environment() ->
setup_basic_project() -> setup_basic_project() ->
setup_environment(), setup_environment(),
rebar("create-app appid=myapp"), rebar("create-app appid=myapp"),
file:make_dir("ebin"),
file:make_dir("test"), file:make_dir("test"),
file:write_file("test/myapp_mymod_tests.erl", ?myapp_mymod_tests), file:write_file("test/myapp_mymod_tests.erl", ?myapp_mymod_tests),
file:write_file("src/myapp_mymod.erl", ?myapp_mymod). file:write_file("src/myapp_mymod.erl", ?myapp_mymod).
@ -203,8 +205,7 @@ remove_tmp_dir(_) ->
{unix, _} -> {unix, _} ->
os:cmd("rm -rf " ++ ?TMP_DIR ++ " 2>/dev/null"); os:cmd("rm -rf " ++ ?TMP_DIR ++ " 2>/dev/null");
{win32, _} -> {win32, _} ->
%% os:cmd("rmdir /S /Q " ++ ?TMP_DIR ++ " 2>NUL") os:cmd("rmdir /S /Q " ++ filename:nativename(?TMP_DIR))
exit("Windows is not supported yet.")
end. end.
%% ==================================================================== %% ====================================================================
@ -213,13 +214,19 @@ remove_tmp_dir(_) ->
prepare_rebar_script() -> prepare_rebar_script() ->
{ok, _} = file:copy(?REBAR_SCRIPT, ?TMP_DIR ++ "rebar"), {ok, _} = file:copy(?REBAR_SCRIPT, ?TMP_DIR ++ "rebar"),
[] = os:cmd("chmod u+x " ++ ?TMP_DIR ++ "rebar"). case os:type() of
{unix, _} ->
[] = os:cmd("chmod u+x " ++ ?TMP_DIR ++ "rebar");
{win32, _} ->
{ok, _} = file:copy(?REBAR_SCRIPT ++ ".bat",
?TMP_DIR ++ "rebar.bat")
end.
rebar() -> rebar() ->
rebar([]). rebar([]).
rebar(Args) when is_list(Args) -> rebar(Args) when is_list(Args) ->
Out = os:cmd("./rebar " ++ Args), Out = os:cmd(filename:nativename("./rebar") ++ " " ++ Args),
%?debugMsg("**** Begin"), ?debugMsg(Out), ?debugMsg("**** End"), %?debugMsg("**** Begin"), ?debugMsg(Out), ?debugMsg("**** End"),
Out. Out.