Specify base cases and behaviours of each comparator function

1 files changed, 10 insertions, 0 deletions

diff --git a/srfi/228.sld b/srfi/228.sld
new file mode 100644
index 0000000..b3cca89
--- /dev/null
+++ b/srfi/228.sld
@@ -0,0 +1,10 @@
+(define-library (srfi 228)
+  (import (scheme base)
+          (srfi 1)
+          (srfi 128)
+          (srfi 151))
+  (export make-wrapper-comparator
+          make-product-comparator
+          make-sum-comparator)
+
+  (include "composing-comparators.scm"))