You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
54 lines
1.8 KiB
54 lines
1.8 KiB
-module(rebar_opts_parser_SUITE).
|
|
|
|
-export([all/0, init_per_testcase/2]).
|
|
-export([bad_arg_to_flag/1, missing_arg_to_flag/1]).
|
|
|
|
-include_lib("common_test/include/ct.hrl").
|
|
|
|
|
|
all() -> [bad_arg_to_flag, missing_arg_to_flag].
|
|
|
|
init_per_testcase(_, Config) ->
|
|
rebar_test_utils:init_rebar_state(Config, "opts_parser_").
|
|
|
|
bad_arg_to_flag(Config) ->
|
|
ok = meck:new(getopt),
|
|
ok = meck:expect(getopt,
|
|
parse,
|
|
fun(_, _) -> {error, {invalid_option_arg, {foo, "null"}}} end),
|
|
|
|
AppDir = ?config(apps, Config),
|
|
|
|
Name = rebar_test_utils:create_random_name("bad_arg_"),
|
|
Vsn = rebar_test_utils:create_random_vsn(),
|
|
rebar_test_utils:create_app(AppDir, Name, Vsn, [kernel, stdlib]),
|
|
|
|
{error, Error} = rebar_test_utils:run_and_check(Config,
|
|
[],
|
|
["compile", "--foo=null"],
|
|
return),
|
|
|
|
true = meck:validate(getopt),
|
|
ok = meck:unload(getopt),
|
|
|
|
"Invalid argument null to option foo" = lists:flatten(Error).
|
|
|
|
missing_arg_to_flag(Config) ->
|
|
ok = meck:new(getopt),
|
|
ok = meck:expect(getopt, parse, fun(_, _) -> {error, {missing_option_arg, foo}} end),
|
|
|
|
AppDir = ?config(apps, Config),
|
|
|
|
Name = rebar_test_utils:create_random_name("missing_arg_"),
|
|
Vsn = rebar_test_utils:create_random_vsn(),
|
|
rebar_test_utils:create_app(AppDir, Name, Vsn, [kernel, stdlib]),
|
|
|
|
{error, Error} = rebar_test_utils:run_and_check(Config,
|
|
[],
|
|
["compile", "--foo"],
|
|
return),
|
|
|
|
true = meck:validate(getopt),
|
|
ok = meck:unload(getopt),
|
|
|
|
"Missing argument to option foo" = lists:flatten(Error).
|