]> birchwood-abbey.net Git - mit-scheme.git/commitdiff
Fix missing SRFIs.
authorChris Hanson <org/chris-hanson/cph>
Fri, 23 Dec 2022 13:21:23 +0000 (05:21 -0800)
committerChris Hanson <org/chris-hanson/cph>
Fri, 23 Dec 2022 13:21:23 +0000 (05:21 -0800)
src/runtime/feature.scm
src/runtime/library-standard.scm

index 65df5a02285a7200addca943731cb7d3b05f97fe..f3f031f062f909f15dcbeb2766e1163eee7d4f4d 100644 (file)
@@ -83,6 +83,7 @@ USA.
     srfi-133   ;Vector Library (R7RS-compatible)
     srfi-143   ;Fixnums
     srfi-158   ;Generators and Accumulators
+    srfi-162   ;Comparators sublibrary
     srfi-219   ;Define higher-order lambda
 
     ;; SRFI 115 features
index 7e78aa08fec4487514c1015b9552962e84a87bd5..37cc54196d604026a2ec8baa18879fe2024c4b94 100644 (file)
@@ -1228,6 +1228,28 @@ USA.
     vector->generator
     vector-accumulator
     vector-accumulator!))
+
+(define-standard-library '(srfi 162)
+  '(boolean-comparator
+    char-ci-comparator
+    char-comparator
+    comparator-max
+    comparator-max-in-list
+    comparator-min
+    comparator-min-in-list
+    default-comparator
+    eq-comparator
+    equal-comparator
+    eqv-comparator
+    list-comparator
+    pair-comparator
+    real-comparator
+    string-ci-comparator
+    string-comparator
+    vector-comparator))
+
+(define-standard-library '(srfi 219)
+  '(define))
 \f
 ;;;; Synthetic libraries