From 5978e98e376f3e3c4ca005f03bbf142b1f3b4ae4 Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Wed, 30 Sep 2020 13:06:59 -0400
Subject: [PATCH] Issue #414 - Include SRFI 162 defs

---
 srfi/128.sld | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

diff --git a/srfi/128.sld b/srfi/128.sld
index 9476378b..713ffb0e 100644
--- a/srfi/128.sld
+++ b/srfi/128.sld
@@ -18,6 +18,22 @@
   (export =? <? >? <=? >=?)
   (export comparator-if<=>)
   (export %salt%) ;; Temporary workaround since we cannot preserve referential transparency for this
+  (export comparator-max-in-list comparator-min-in-list
+          comparator-max comparator-min
+          default-comparator
+          boolean-comparator
+          real-comparator
+          char-comparator
+          char-ci-comparator
+          string-comparator
+          string-ci-comparator
+          pair-comparator
+          list-comparator
+          vector-comparator
+          eq-comparator
+          eqv-comparator 
+          equal-comparator)
   (include "comparators/comparators-impl.scm")
   (include "comparators/default.scm")
+  (include "comparators/162-impl.scm")
 )