diff options
| author | Trygve Laugstøl <trygvis@inamo.no> | 2024-03-04 09:15:01 +0100 |
|---|---|---|
| committer | Trygve Laugstøl <trygvis@inamo.no> | 2024-03-04 09:15:01 +0100 |
| commit | c34d7363b61a9e00c986b79793bf7cdc03e9ea99 (patch) | |
| tree | 79c9121e2bff6bc938b7b36d1195e5759b163d2c /tictactoe/ttt/test/ttt_test.erl | |
| parent | 0be77ac09408c13cc12b5953b9ac7459b549c202 (diff) | |
| download | erlang-workshop-c34d7363b61a9e00c986b79793bf7cdc03e9ea99.tar.gz erlang-workshop-c34d7363b61a9e00c986b79793bf7cdc03e9ea99.tar.bz2 erlang-workshop-c34d7363b61a9e00c986b79793bf7cdc03e9ea99.tar.xz erlang-workshop-c34d7363b61a9e00c986b79793bf7cdc03e9ea99.zip | |
wip
Diffstat (limited to 'tictactoe/ttt/test/ttt_test.erl')
| -rw-r--r-- | tictactoe/ttt/test/ttt_test.erl | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/tictactoe/ttt/test/ttt_test.erl b/tictactoe/ttt/test/ttt_test.erl new file mode 100644 index 0000000..95b6bf7 --- /dev/null +++ b/tictactoe/ttt/test/ttt_test.erl @@ -0,0 +1,18 @@ +-module(ttt_test). + +-include_lib("eunit/include/eunit.hrl"). + +empty_board_test() -> + E = ttt:empty_board(), + ?assertEqual(E, ttt:empty_board()). + +moves_board_test() -> + B0 = ttt:empty_board(), + {ok, B1} = ttt:move(B0, 'X', 0, 0), + {ok, B2} = ttt:move(B1, 'X', 0, 1), + {ok, B3} = ttt:move(B2, 'X', 0, 2), + ?assertEqual(['X', 'X', 'X', 'E', 'E', 'E', 'E', 'E', 'E'], B3). + +simple_test() -> + R = ttt:who_wins(['X', 'X', 'X', 'E', 'E', 'E', 'E', 'E', 'E']), + ?assertEqual('X', R). |