Permalink
Browse files

Pass extra params to ct (thanks Mickael Remond)

This patch adds a `ct_extra_params` option to rebar.config, the value
of which is appended to the shell command when executing common test.
  • Loading branch information...
1 parent 9c0ed10 commit 2d385970bf3d1d0b153b9a324c524eb7a78c514a @hyperthunk hyperthunk committed with tuncer Apr 6, 2011
Showing with 18 additions and 6 deletions.
  1. +5 −0 rebar.config.sample
  2. +13 −6 src/rebar_ct.erl
View
5 rebar.config.sample
@@ -75,6 +75,11 @@
%% Whether to print coverage report to console. Default is `false'
{cover_print_enabled, false}.
+%% == Common Test ==
+
+%% Option to pass extra parameters when launching Common Test
+{ct_extra_params, "-boot start_sasl -s myapp"}.
+
%% == Dialyzer ==
%% Options for running dialyzer
View
19 src/rebar_ct.erl
@@ -145,15 +145,17 @@ make_cmd(TestDir, Config) ->
undefined ->
?FMT("erl " % should we expand ERL_PATH?
" -noshell -pa ~s ~s"
- " -s ct_run script_start -s erlang halt"
" -name test@~s"
" -logdir \"~s\""
- " -env TEST_DIR \"~s\"",
+ " -env TEST_DIR \"~s\""
+ " ~s"
+ " -s ct_run script_start -s erlang halt",
[CodePathString,
Include,
net_adm:localhost(),
LogDir,
- filename:join(Cwd, TestDir)]) ++
+ filename:join(Cwd, TestDir),
+ get_extra_params(Config)]) ++
get_cover_config(Config, Cwd) ++
get_ct_config_file(TestDir) ++
get_config_file(TestDir) ++
@@ -162,20 +164,25 @@ make_cmd(TestDir, Config) ->
SpecFlags ->
?FMT("erl " % should we expand ERL_PATH?
" -noshell -pa ~s ~s"
- " -s ct_run script_start -s erlang halt"
" -name test@~s"
" -logdir \"~s\""
- " -env TEST_DIR \"~s\"",
+ " -env TEST_DIR \"~s\""
+ " ~s"
+ " -s ct_run script_start -s erlang halt",
[CodePathString,
Include,
net_adm:localhost(),
LogDir,
- filename:join(Cwd, TestDir)]) ++
+ filename:join(Cwd, TestDir),
+ get_extra_params(Config)]) ++
SpecFlags ++ get_cover_config(Config, Cwd)
end,
RawLog = filename:join(LogDir, "raw.log"),
{Cmd, RawLog}.
+get_extra_params(Config) ->
+ rebar_config:get_local(Config, ct_extra_params, "").
+
get_ct_specs(Cwd) ->
case collect_glob(Cwd, ".*\.test\.spec\$") of
[] -> undefined;

0 comments on commit 2d38597

Please sign in to comment.