preserve=?
This commit is contained in:
parent
5c644624c4
commit
8b2aa0fb87
|
@ -2,6 +2,7 @@
|
||||||
|
|
||||||
(provide preserve-order
|
(provide preserve-order
|
||||||
preserve<?
|
preserve<?
|
||||||
|
preserve=?
|
||||||
sorted-set-elements
|
sorted-set-elements
|
||||||
sorted-dict-entries
|
sorted-dict-entries
|
||||||
sorted-dict-keys-and-values
|
sorted-dict-keys-and-values
|
||||||
|
@ -71,6 +72,7 @@
|
||||||
[_ (datum-order a b)])]))))
|
[_ (datum-order a b)])]))))
|
||||||
|
|
||||||
(define preserve<? (order-<? preserve-order))
|
(define preserve<? (order-<? preserve-order))
|
||||||
|
(define preserve=? (order-=? preserve-order))
|
||||||
|
|
||||||
;;---------------------------------------------------------------------------
|
;;---------------------------------------------------------------------------
|
||||||
;; Sorting & cached sorted items
|
;; Sorting & cached sorted items
|
||||||
|
|
Loading…
Reference in New Issue