Sha256: a5296de202163621db410b256a23fa63491d98e4f32ff04f0165471a34a24ccf
Contents?: true
Size: 1.62 KB
Versions: 116
Compression:
Stored size: 1.62 KB
Contents
-module(strain_tests).
-include_lib("erl_exercism/include/exercism.hrl").
-include_lib("eunit/include/eunit.hrl").
empty_keep_test() ->
?assertEqual([], strain:keep(fun(X) -> X < 10 end, [])).
keep_everything_test() ->
?assertEqual([1, 2, 3], strain:keep(fun(X) -> X < 10 end, [1,2,3])).
keep_first_last_test() ->
?assertEqual([1, 3], strain:keep(fun(X) -> odd(X) end, [1,2,3])).
keep_nothin_test() ->
?assertEqual([], strain:keep(fun(X) -> even(X) end, [1,3,5,7])).
keep_neither_first_nor_last_test() ->
?assertEqual([2], strain:keep(fun(X) -> even(X) end, [1,2,3])).
keep_strings_test() ->
Str = ["apple", "zebra", "banana", "zombies", "cherimoya", "zealot"],
?assertEqual(
["zebra", "zombies", "zealot"],
strain:keep(fun(S) -> string:sub_string(S, 1,1) =:= "z" end, Str)).
empty_discard_test() ->
?assertEqual([], strain:discard(fun(X) -> X < 10 end, [])).
discard_everything_test() ->
?assertEqual([], strain:discard(fun(X) -> X < 10 end, [1,2,3])).
discard_first_and_last_test() ->
?assertEqual([2], strain:discard(fun(X) -> odd(X) end, [1,2,3])).
discard_nothing_test() ->
?assertEqual([1, 3, 5, 7], strain:discard(fun(X) -> even(X) end, [1,3,5,7])).
discard_neither_first_nor_last_test() ->
?assertEqual([1, 3], strain:discard(fun(X) -> even(X) end, [1,2,3])).
discard_strings_test() ->
Str = ["apple", "zebra", "banana", "zombies", "cherimoya", "zealot"],
?assertEqual(
["apple", "banana", "cherimoya"],
strain:discard(fun(S) -> string:sub_string(S, 1,1) =:= "z" end, Str)).
version_test() ->
?assertMatch(1, strain:test_version()).
odd(N) -> N rem 2 > 0.
even(N) -> N rem 2 =:= 0.
Version data entries
116 entries across 116 versions & 1 rubygems