1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
-module(gleam@bool_test).
-compile(no_auto_import).
-export([negate_test/0, compare_test/0, max_test/0, min_test/0, to_int_test/0]).
negate_test() ->
gleam@should:be_false(gleam@bool:negate(true)),
gleam@should:be_true(gleam@bool:negate(false)).
compare_test() ->
gleam@should:equal(gleam@bool:compare(true, true), eq),
gleam@should:equal(gleam@bool:compare(true, false), gt),
gleam@should:equal(gleam@bool:compare(false, false), eq),
gleam@should:equal(gleam@bool:compare(false, true), lt).
max_test() ->
gleam@should:equal(gleam@bool:max(true, true), true),
gleam@should:equal(gleam@bool:max(true, false), true),
gleam@should:equal(gleam@bool:max(false, false), false),
gleam@should:equal(gleam@bool:max(false, true), true).
min_test() ->
gleam@should:equal(gleam@bool:min(true, true), true),
gleam@should:equal(gleam@bool:min(true, false), false),
gleam@should:equal(gleam@bool:min(false, false), false),
gleam@should:equal(gleam@bool:min(false, true), false).
to_int_test() ->
gleam@should:equal(gleam@bool:to_int(true), 1),
gleam@should:equal(gleam@bool:to_int(false), 0).
|
