diff options
Diffstat (limited to 'test/rebar_profiles_SUITE.erl')
| -rw-r--r-- | test/rebar_profiles_SUITE.erl | 84 |
1 files changed, 82 insertions, 2 deletions
diff --git a/test/rebar_profiles_SUITE.erl b/test/rebar_profiles_SUITE.erl index 8a1521e..a4f926e 100644 --- a/test/rebar_profiles_SUITE.erl +++ b/test/rebar_profiles_SUITE.erl @@ -10,7 +10,11 @@ profile_merges/1, add_to_profile/1, add_to_existing_profile/1, - profiles_remain_applied_with_config_present/1]). + profiles_remain_applied_with_config_present/1, + test_profile_applied_at_completion/1, + test_profile_applied_before_compile/1, + test_profile_applied_before_eunit/1, + test_profile_applied_to_apps/1]). -include_lib("common_test/include/ct.hrl"). -include_lib("eunit/include/eunit.hrl"). @@ -19,7 +23,11 @@ all() -> [profile_new_key, profile_merge_keys, profile_merges, add_to_profile, add_to_existing_profile, - profiles_remain_applied_with_config_present]. + profiles_remain_applied_with_config_present, + test_profile_applied_at_completion, + test_profile_applied_before_compile, + test_profile_applied_before_eunit, + test_profile_applied_to_apps]. init_per_suite(Config) -> application:start(meck), @@ -151,3 +159,75 @@ profiles_remain_applied_with_config_present(Config) -> Mod = list_to_atom("not_a_real_src_" ++ Name), true = lists:member({d, not_ok}, proplists:get_value(options, Mod:module_info(compile), [])). + +test_profile_applied_at_completion(Config) -> + AppDir = ?config(apps, Config), + + Name = rebar_test_utils:create_random_name("test_profile_at_completion_"), + Vsn = rebar_test_utils:create_random_vsn(), + rebar_test_utils:create_app(AppDir, Name, Vsn, [kernel, stdlib]), + + RebarConfig = [{erl_opts, [{d, some_define}]}], + rebar_test_utils:create_config(AppDir, RebarConfig), + + {ok, State} = rebar_test_utils:run_and_check(Config, + RebarConfig, + ["eunit"], + return), + + Opts = rebar_state:opts(State), + ErlOpts = dict:fetch(erl_opts, Opts), + true = lists:member({d, 'TEST'}, ErlOpts). + +test_profile_applied_before_compile(Config) -> + AppDir = ?config(apps, Config), + + Name = rebar_test_utils:create_random_name("test_profile_before_compile_"), + Vsn = rebar_test_utils:create_random_vsn(), + rebar_test_utils:create_app(AppDir, Name, Vsn, [kernel, stdlib]), + + RebarConfig = [{erl_opts, [{d, some_define}]}], + rebar_test_utils:create_config(AppDir, RebarConfig), + + rebar_test_utils:run_and_check(Config, RebarConfig, ["eunit"], {ok, [{app, Name}]}), + + S = list_to_atom("not_a_real_src_" ++ Name), + true = lists:member({d, 'TEST'}, proplists:get_value(options, S:module_info(compile), [])). + +test_profile_applied_before_eunit(Config) -> + AppDir = ?config(apps, Config), + + Name = rebar_test_utils:create_random_name("test_profile_before_eunit_"), + Vsn = rebar_test_utils:create_random_vsn(), + rebar_test_utils:create_app(AppDir, Name, Vsn, [kernel, stdlib]), + + RebarConfig = [{erl_opts, [{d, some_define}]}], + rebar_test_utils:create_config(AppDir, RebarConfig), + + rebar_test_utils:run_and_check(Config, RebarConfig, ["eunit"], {ok, [{app, Name}]}), + + T = list_to_atom("not_a_real_src_" ++ Name ++ "_tests"), + true = lists:member({d, 'TEST'}, proplists:get_value(options, T:module_info(compile), [])). + +test_profile_applied_to_apps(Config) -> + AppDir = ?config(apps, Config), + + Name = rebar_test_utils:create_random_name("test_profile_applied_to_apps_"), + Vsn = rebar_test_utils:create_random_vsn(), + rebar_test_utils:create_app(AppDir, Name, Vsn, [kernel, stdlib]), + + RebarConfig = [{erl_opts, [{d, some_define}]}], + rebar_test_utils:create_config(AppDir, RebarConfig), + + {ok, State} = rebar_test_utils:run_and_check(Config, + RebarConfig, + ["eunit"], + return), + + Apps = rebar_state:project_apps(State), + lists:foreach(fun(App) -> + AppState = rebar_app_info:state(App), + Opts = rebar_state:opts(AppState), + ErlOpts = dict:fetch(erl_opts, Opts), + true = lists:member({d, 'TEST'}, ErlOpts) + end, Apps). |