Definition: *vl-default-token*
(defconst *vl-default-token* (make-vl-plaintoken :type :vl-ws :etext (list (make-vl-echar :char #\Space :loc *vl-fakeloc*))))