#+excl
(push 'pxml-dribble-bug-hook excl:*dribble-bug-hooks*)))
-(funcall 'pxml-dribble-bug-hook "$Id: pxml0.cl,v 1.5 2003/07/11 18:02:41 kevin Exp $")
+(funcall 'pxml-dribble-bug-hook "$Id$")
(defun xml-char-p (char)
(declare (optimize (speed 3) (safety 1)))