anchor.diff:    (value))
   
   (defmethod js-to-strings ((v js-variable) start-form)
  +  (declare (ignore start-form))
     (list (symbol-to-js (value v))))
   
   ;;; arithmetic operators
  
positive.code: 	    (setf cur-elt white-space cur-empty t)))))
  
  (defmethod js-to-strings ((expression expression) start-pos)
    (list (princ-to-string (value expression))))
  
  (defmethod js-to-statement-strings ((expression expression) start-pos)
    (js-to-strings expression start-pos))
  
  (defmethod js-to-statement-strings ((statement statement) start-pos)
    (list (princ-to-string (value statement))))
  
  ;;; compiler macros
  
negative.code:   (stmts indent))
  
  (defmethod js-to-statement-strings ((body js-sub-body) start-pos)
    (declare (ignore start-pos))
    (nconc (list "{") (call-next-method) (list "}")))
  
  (defmethod expression-precedence ((body js-body))
  