diff options
Diffstat (limited to 'booleans')
-rw-r--r-- | booleans/booleans-test.scm | 16 | ||||
-rw-r--r-- | booleans/booleans.scm | 6 |
2 files changed, 0 insertions, 22 deletions
diff --git a/booleans/booleans-test.scm b/booleans/booleans-test.scm deleted file mode 100644 index 78a78be..0000000 --- a/booleans/booleans-test.scm +++ /dev/null @@ -1,16 +0,0 @@ -(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") diff --git a/booleans/booleans.scm b/booleans/booleans.scm deleted file mode 100644 index 6b2fe07..0000000 --- a/booleans/booleans.scm +++ /dev/null @@ -1,6 +0,0 @@ -(define-module (booleans)) - -(define-public (boolean-invert bool) - "Returns the opposite value of the -passed in boolean." - (not bool)) |