doc: sort doc-syms, and html-decode.

* genman.txr: generate doc-syms as a sorted list fed to
hash-from-pairs. Now the symbols won't jump around so much
whenever we update it. Also, the names must be HTML-decoded.
For instance "str<" was being stored as "str&lt;" causing
(doc 'str<) to fail. We use TXR @(output) to adjust the
formatting as if it were maintained by hand.

* share/txr/stdlib/doc-syms.tl: Regenerated.

1 files changed, 14 insertions, 1 deletions

diff --git a/genman.txr b/genman.txr
index 07db7e04..c1416baa 100644
--- a/genman.txr
+++ b/genman.txr
@@ -295,4 +295,17 @@ function tocjump(hash) {
 </body>
 </html>
 @(end)
-@(do (file-put "share/txr/stdlib/doc-syms.tl" ^(defvarl doc-syms ,symhash)))
+@(bind (name code) @(transpose [nsort (mapcar (tb ((sym code))
+                                                (list (html-decode sym) code))
+                                              (hash-pairs symhash)) : car]))
+@(output "share/txr/stdlib/doc-syms.tl")
+(defparml doc-syms
+  (hash-from-pairs
+@  (repeat)
+      (@(tostring name) @(tostring code))
+@(first)
+    '((@(tostring name) @(tostring code))
+@(last)
+      (@(tostring name) @(tostring code)))))
+@ (end)
+@(end)