anchor.diff:       :b {:unquote ,x}
        :c {:quoted x}}]])
   
  -;;[1 2 2 :LITERAL 2 :HAH [2 2 2 [X] {:C {:QUOTED X} :B {:UNQUOTE 2} :A 2}]]
  -
  -(let [x 2
  -      y `[1 ,x 2 [3 4 ,@[1 2]]]]
  -  y)
  +;;[1 2 :ECKS :LITERAL :ECKS :HAH [:ECKS :ECKS :ECKS [X] {:C {:QUOTED X} :B {:UNQUOTE :ECKS} :A 2}]]
  +
  +;;splicing doesn't work yet, need to work around
  +;;unquote-splicing requirement that everything be a common lisp
  +;;sequence type, or coerce to lazy-seq, or override reader macro.
  +
  +;;WIP
  +;; (let [x 2
  +;;       y `[1 ,x 2 [3 4 ,@[1 2]]]]
  +;;   y)
   
   ;;coming soon...
   ;;meta, destrutcturing, core clojure functions
  
positive.code:     (clclojure.pvector:persistent-vector
       (sum 1)
       (sum 1 2)
       (sum 1 2 3 4 5 6))))
  
negative.code: ;; (defn idx [v n]
  ;;   (-nth v n))
  
  
  (defparameter x :ecks)
  
  ;;quasiquoting of literals now works...
  (defparameter quasi-form
  