1 files changed, 16 insertions, 0 deletions
diff --git a/booleans/booleans-test.scm b/booleans/booleans-test.scm
new file mode 100644
index 0000000..78a78be
--- /dev/null
+++ b/booleans/booleans-test.scm
@@ -0,0 +1,16 @@
+(use-modules (srfi srfi-64)
+             (booleans))
+
+(test-begin "harness")
+
+
+(test-equal "test-true-inverted-is-false"
+  #f
+  (boolean-invert #t))
+
+(test-equal "test-true-inverted-is-false"
+  #t
+  (boolean-invert #f))
+
+
+(test-end "harness")