diff options
| author | 2025-02-17 16:13:24 -0500 | |
|---|---|---|
| committer | 2025-02-17 16:13:24 -0500 | |
| commit | a1d4155d85d61178c6efcb182c754c93df113226 (patch) | |
| tree | eca14c3467da21bf89f6da47cb671184df84917c /mcgoron | |
| parent | revert change to set-delete (diff) | |
more set=? tests
Diffstat (limited to 'mcgoron')
| -rw-r--r-- | mcgoron/weight-balanced-trees/srfi/113/sets.scm | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/mcgoron/weight-balanced-trees/srfi/113/sets.scm b/mcgoron/weight-balanced-trees/srfi/113/sets.scm index b3d6b13..ea15436 100644 --- a/mcgoron/weight-balanced-trees/srfi/113/sets.scm +++ b/mcgoron/weight-balanced-trees/srfi/113/sets.scm @@ -357,7 +357,6 @@ ;;; ;;;;;;;;;;;; (define (set-adjoin-all set elements) - ;; TODO: replace with version that only crawls the tree once. (let ((cmp (set-element-comparator set))) (raw-set cmp @@ -371,7 +370,6 @@ elements)))) (define (set-replace-all set elements) - ;; TODO: replace with version that only crawls the tree once. (let ((cmp (set-element-comparator set))) (fold (lambda (new set) (update cmp |
