diff options
| author | bd <bdunahu@operationnull.com> | 2024-05-18 21:16:28 -0600 |
|---|---|---|
| committer | bd <bdunahu@operationnull.com> | 2024-05-18 21:16:28 -0600 |
| commit | 5601c7ce365b32ddf3e150082510660b8e4925c2 (patch) | |
| tree | 5e6e592693ed44a606571bfe2cb89eb47b266237 /bubble | |
| parent | b2b79ad10e1d7559f95db18af1a47f4725272aa6 (diff) | |
Initial bubble-sort commit
Diffstat (limited to 'bubble')
| -rw-r--r-- | bubble/bubble-sort-test.scm | 12 | ||||
| -rw-r--r-- | bubble/bubble-sort.scm | 4 |
2 files changed, 16 insertions, 0 deletions
diff --git a/bubble/bubble-sort-test.scm b/bubble/bubble-sort-test.scm new file mode 100644 index 0000000..c870577 --- /dev/null +++ b/bubble/bubble-sort-test.scm @@ -0,0 +1,12 @@ +(use-modules (srfi srfi-64) + (bubble-sort)) + +(test-begin "harness") + + +(test-equal "empty" + '() + (bubble-sort '())) + + +(test-end "harness") diff --git a/bubble/bubble-sort.scm b/bubble/bubble-sort.scm new file mode 100644 index 0000000..6efa819 --- /dev/null +++ b/bubble/bubble-sort.scm @@ -0,0 +1,4 @@ +(define-module (bubble-sort)) + +(define-public (bubble-sort lst) + '()) |