merging
This commit is contained in:
+9
-6
@@ -24,8 +24,8 @@ cli_args(TestNames) ->
|
||||
ts_utils:tidily(fun() -> do_gsc_test(TestNames) end).
|
||||
|
||||
|
||||
do_gsc_test(["-h" | _]) -> do_help();
|
||||
do_gsc_test(["--help" | _]) -> do_help();
|
||||
%do_gsc_test(["-h" | _]) -> do_help();
|
||||
%do_gsc_test(["--help" | _]) -> do_help();
|
||||
do_gsc_test(["-l" | _]) -> do_list();
|
||||
do_gsc_test(["--list" | _]) -> do_list();
|
||||
do_gsc_test(["-a" | _]) -> do_all();
|
||||
@@ -35,14 +35,17 @@ do_gsc_test(["so", "tokens", X]) -> do_so_tokens(X);
|
||||
do_gsc_test(["tokenizers_agree", X]) ->
|
||||
do_tokenizers_agree(X);
|
||||
do_gsc_test([TestName]) ->
|
||||
ts_utils:run_test_by_name(TestName);
|
||||
case ts_utils:test_exists_by_name(TestName) of
|
||||
true -> ts_utils:run_test_by_name(TestName);
|
||||
false -> gsc_cli:do_help()
|
||||
end;
|
||||
do_gsc_test(_) ->
|
||||
do_help().
|
||||
gsc_cli:do_help().
|
||||
|
||||
|
||||
|
||||
do_help() ->
|
||||
io:format("go help yourself~n").
|
||||
%do_help() ->
|
||||
% io:format("go help yourself~n").
|
||||
|
||||
do_list() ->
|
||||
Names = ts_utils:runnable_test_names(),
|
||||
|
||||
Reference in New Issue
Block a user