Construct an XDOC string with a single paragraph.
This combines topstring with p.
Macro: topstring-p
(defmacro topstring-p (&rest trees) (cons 'topstring (cons (cons 'p trees) 'nil)))
