anchor.diff:  
   (defmacro dolist (list iterator)
     (macros.send list 'for-each iterator))
  -
  -(defmacro defvar (name &optional value)
  -  (if (defined? value)
  -      (concat "var " (translate name) " = " (translate value) ";")
  -    (concat "var " (translate name) ";")))
   
   (defmacro setf (name value)
     (concat (translate name) " = " (translate value)))
  
positive.code: 	    "};"))
     "})()"))
  
  (defmacro when (arg &rest body)
    (concat
     "(function() {"
  
negative.code:   (concat "typeof(" (translate thing) ") !== \"undefined\""))
  
  
  (defmacro first (arr) (macros.get arr 0))
  (defmacro second (arr) (macros.get arr 1))
  (defmacro third (arr) (macros.get arr 2))
  