Topstring
Construct an XDOC string from a sequence of XDOC trees.
This can be used to construct XDOC strings at the ``top level'',
e.g. :short and :long documentation string.
Macro: topstring
(defmacro topstring (&rest trees)
(cons 'tree-to-string
(cons (cons '&& trees) 'nil)))