brmlab/hackerbase
9
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Add preliminary bdict reimplementation.

Browse source
This commit is contained in:
Dominik Pantůček 2023-07-07 10:07:41 +02:00
parent 6d7639e56d
commit 3a3af066af
3 changed files with 50 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/util-bst.scm
View file

@ -30,7 +30,7 @@
bst-filter-pairs
bst-map-list
bst-map-dict
bst-map-bst
list->bst
@ -327,7 +327,7 @@
(proc (car kv) (cdr kv))))))
(reverse res)))
(define/doc (bst-map-dict bst proc)
(define/doc (bst-map-bst bst proc)
("Returns a new dictionary with all values processed (keys are left intact).")
(set-bst-root bst
(let loop ((n (bst-root bst)))