瀏覽代碼

Add tests for unlock state passthrough

pull/1647/head
Fred Hebert 7 年之前
父節點
當前提交
e592573745
共有 1 個檔案被更改,包括 5 行新增2 行删除
  1. +5
    -2
      test/rebar_unlock_SUITE.erl

+ 5
- 2
test/rebar_unlock_SUITE.erl 查看文件

@ -42,8 +42,10 @@ unlock(Config) ->
Locks = read_locks(Config),
rebar_test_utils:run_and_check(Config, [], ["unlock", "fakeapp"], {ok, []}),
Locks = read_locks(Config),
rebar_test_utils:run_and_check(Config, [], ["unlock", "uuid"], {ok, []}),
{ok, State} = rebar_test_utils:run_and_check(Config, [], ["unlock", "uuid"], return),
?assertEqual(Locks -- ["uuid"], read_locks(Config)),
?assert(false =:= lists:keyfind(<<"uuid">>, 1, rebar_state:get(State, {locks, default}))),
?assert(false =/= lists:keyfind(<<"itc">>, 1, rebar_state:get(State, {locks, default}))),
rebar_test_utils:run_and_check(Config, [], ["unlock", "gproc,itc"], {ok, []}),
?assertEqual(Locks -- ["uuid","gproc","itc"], read_locks(Config)),
rebar_test_utils:run_and_check(Config, [], ["unlock", string:join(Locks,",")], {ok, []}),
@ -52,8 +54,9 @@ unlock(Config) ->
unlock_all(Config) ->
[_|_] = read_locks(Config),
rebar_test_utils:run_and_check(Config, [], ["unlock"], {ok, []}),
{ok, State} = rebar_test_utils:run_and_check(Config, [], ["unlock"], return),
?assertEqual({error, enoent}, read_locks(Config)),
?assertEqual([], rebar_state:get(State, {locks, default})),
ok.
read_locks(Config) ->

Loading…
取消
儲存