diff options
Diffstat (limited to 'test')
-rw-r--r-- | test/rebar_require_vsn_tests.erl | 29 |
1 files changed, 16 insertions, 13 deletions
diff --git a/test/rebar_require_vsn_tests.erl b/test/rebar_require_vsn_tests.erl index 2d3a1ec..ac0e85e 100644 --- a/test/rebar_require_vsn_tests.erl +++ b/test/rebar_require_vsn_tests.erl @@ -6,18 +6,21 @@ version_tuple_test_() -> [%% typical cases - ?_assert(rebar_require_vsn:version_tuple("R15B", "eunit") =:= {15, 0}), - ?_assert(rebar_require_vsn:version_tuple("R15B01", "eunit") =:= {15, 1}), - ?_assert(rebar_require_vsn:version_tuple("R15B02", "eunit") =:= {15, 2}), - ?_assert(rebar_require_vsn:version_tuple("R15B03-1", "eunit") =:= {15, 3}), - ?_assert(rebar_require_vsn:version_tuple("R15B03", "eunit") =:= {15, 3}), - ?_assert(rebar_require_vsn:version_tuple("R16B", "eunit") =:= {16, 0}), - ?_assert(rebar_require_vsn:version_tuple("R16B01", "eunit") =:= {16, 1}), - ?_assert(rebar_require_vsn:version_tuple("R16B02", "eunit") =:= {16, 2}), - ?_assert(rebar_require_vsn:version_tuple("R16B03", "eunit") =:= {16, 3}), - ?_assert(rebar_require_vsn:version_tuple("R16B03-1", "eunit") =:= {16, 3}), - ?_assert(rebar_require_vsn:version_tuple("17", "eunit") =:= {17, 0}), + ?_assert(check("R15B", "eunit") =:= {15, 0}), + ?_assert(check("R15B01", "eunit") =:= {15, 1}), + ?_assert(check("R15B02", "eunit") =:= {15, 2}), + ?_assert(check("R15B03-1", "eunit") =:= {15, 3}), + ?_assert(check("R15B03", "eunit") =:= {15, 3}), + ?_assert(check("R16B", "eunit") =:= {16, 0}), + ?_assert(check("R16B01", "eunit") =:= {16, 1}), + ?_assert(check("R16B02", "eunit") =:= {16, 2}), + ?_assert(check("R16B03", "eunit") =:= {16, 3}), + ?_assert(check("R16B03-1", "eunit") =:= {16, 3}), + ?_assert(check("17", "eunit") =:= {17, 0}), %% error cases - ?_assertException(throw, rebar_abort, rebar_require_vsn:version_tuple("", "eunit")), - ?_assertException(throw, rebar_abort, rebar_require_vsn:version_tuple("abc", "eunit")) + ?_assertException(throw, rebar_abort, check("", "eunit")), + ?_assertException(throw, rebar_abort, check("abc", "eunit")) ]. + +check(OtpRelease, Type) -> + rebar_require_vsn:version_tuple(abort, OtpRelease, Type). |