From 8cfa606f3834cf7d05f5011bc68295a9d84263dc Mon Sep 17 00:00:00 2001 From: Louis Pilfold Date: Sun, 14 Apr 2019 13:03:24 +0000 Subject: stdlib: Split out tests --- gen/test/bool_test.erl | 24 ++++++++++++++++++++++++ 1 file changed, 24 insertions(+) create mode 100644 gen/test/bool_test.erl (limited to 'gen/test/bool_test.erl') diff --git a/gen/test/bool_test.erl b/gen/test/bool_test.erl new file mode 100644 index 0000000..c38f780 --- /dev/null +++ b/gen/test/bool_test.erl @@ -0,0 +1,24 @@ +-module(bool_test). +-compile(no_auto_import). + +-export([negate_test/0, max_test/0, min_test/0, to_int_test/0]). + +negate_test() -> + expect:false(bool:negate(true)), + expect:true(bool:negate(false)). + +max_test() -> + expect:equal(bool:max(true, true), true), + expect:equal(bool:max(true, false), true), + expect:equal(bool:max(false, false), false), + expect:equal(bool:max(false, true), true). + +min_test() -> + expect:equal(bool:min(true, true), true), + expect:equal(bool:min(true, false), false), + expect:equal(bool:min(false, false), false), + expect:equal(bool:min(false, true), false). + +to_int_test() -> + expect:equal(bool:to_int(true), 1), + expect:equal(bool:to_int(false), 0). -- cgit v1.2.3