Add draft of sample implementation.

1 files changed, 10 insertions, 0 deletions

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