What does (DEFINE-PS-SYMBOL-MACRO symbol expansion) do?  I found the following in non-cl.lisp, which got me thinking.

(define-ps-symbol-macro {} (create))

Is there some way to extend the reader so that you could do {:name "David" :age 34} instead of (create :name "David" :age 34)?

David