diff options
| author | bd <bdunahu@operationnull.com> | 2024-05-19 00:18:44 -0600 |
|---|---|---|
| committer | bd <bdunahu@operationnull.com> | 2024-05-19 00:18:44 -0600 |
| commit | de8ec8026b3fbf60cfa95ef1c48ad53e1b922d38 (patch) | |
| tree | 405a4a39b98535684f356ca04f9cde0ceaf34ebb /binary-search/binary-search-test.scm | |
| parent | f69448ded971deb6a702894499c718e4a26857dd (diff) | |
Initial binary search tree
Diffstat (limited to 'binary-search/binary-search-test.scm')
| -rw-r--r-- | binary-search/binary-search-test.scm | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/binary-search/binary-search-test.scm b/binary-search/binary-search-test.scm new file mode 100644 index 0000000..adbeacb --- /dev/null +++ b/binary-search/binary-search-test.scm @@ -0,0 +1,13 @@ +(use-modules (srfi srfi-64) + (binary-search)) + +(test-begin "harness") + + +(define bst (make-empty-bst)) + +(test-assert "empty-bst-missing-zero" + (not (bst-member-p bst 0))) + + +(test-end "harness") |