diff --git a/doc/d-utils.md b/doc/d-utils.md
index 64ce1df..fa30ebf 100644
--- a/doc/d-utils.md
+++ b/doc/d-utils.md
@@ -553,3 +553,9 @@ Converts list of pairs into BST dictionary.
                 (v #f))
 
 Functional update with optional default value (defaults to #f).
+
+## util-bst-bdict [module]
+
+    (import util-bst-bdict)
+
+Reimplementation of old number-only BST dictionary.
diff --git a/src/Makefile b/src/Makefile
index c93b0a0..0bbe0f6 100644
--- a/src/Makefile
+++ b/src/Makefile
@@ -64,13 +64,14 @@ GENDOC-SOURCES=gendoc.scm duck-extract.import.scm			\
 	util-parser.import.scm util-list.import.scm			\
 	util-proc.import.scm util-format.import.scm			\
 	util-tag.import.scm util-string.import.scm			\
-	util-bst.import.scm
+	util-bst.import.scm util-bst-bdict.import.scm
 
 GENDOC-OBJS=gendoc.o duck-extract.o util-time.o util-csv.o util-io.o	\
 	progress.o testing.o util-proc.o util-git.o util-io.o		\
 	util-stdout.o util-parser.o util-list.o util-proc.o		\
 	util-format.o racket-kwargs.o util-dict-list.o util-tag.o	\
-	util-set-list.o duck.o util-string.o util-bst.o
+	util-set-list.o duck.o util-string.o util-bst.o			\
+	util-bst-bdict.o
 
 .PHONY: imports
 imports: $(HACKERBASE-DEPS)
@@ -520,7 +521,8 @@ UTIL-BST-SOURCES=util-bst.scm util-tag.import.scm testing.import.scm	\
 util-bst.o: util-bst.import.scm
 util-bst.import.scm: $(UTIL-BST-SOURCES)
 
-UTIL-BST-BDICT-SOURCES=util-bst-bdict.scm util-bst.import.scm
+UTIL-BST-BDICT-SOURCES=util-bst-bdict.scm util-bst.import.scm	\
+	duck.import.scm
 
 util-bst-bdict.o: util-bst-bdict.import.scm
 util-bst-bdict.import.scm: $(UTIL-BST-BDICT-SOURCES)
diff --git a/src/gendoc.scm b/src/gendoc.scm
index 8a29521..fce88ff 100644
--- a/src/gendoc.scm
+++ b/src/gendoc.scm
@@ -33,4 +33,5 @@
 	  util-string
 	  util-mail
 	  util-bst
+	  util-bst-bdict
 	  )
diff --git a/src/util-bst-bdict.scm b/src/util-bst-bdict.scm
index 4ea82c2..1a2c6a7 100644
--- a/src/util-bst-bdict.scm
+++ b/src/util-bst-bdict.scm
@@ -5,7 +5,7 @@
 
 (module*
  util-bst-bdict
- #:doc ("...")
+ #:doc ("Reimplementation of old number-only BST dictionary.")
  (
   list->bdict
   bdict-find-value