summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorbd <bdunahu@operationnull.com>2024-05-18 21:16:28 -0600
committerbd <bdunahu@operationnull.com>2024-05-18 21:16:28 -0600
commit5601c7ce365b32ddf3e150082510660b8e4925c2 (patch)
tree5e6e592693ed44a606571bfe2cb89eb47b266237
parentb2b79ad10e1d7559f95db18af1a47f4725272aa6 (diff)
Initial bubble-sort commit
-rw-r--r--bubble/bubble-sort-test.scm12
-rw-r--r--bubble/bubble-sort.scm4
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)
+ '())