;;;--------------------------------------------------------------------------
;;; Parsing property sets.
+(export 'parse-property)
(defun parse-property (scanner pset)
"Parse a single property using the SCANNER; add it to the PSET."
;; property ::= id `=' expression