anchor.diff:          ;("do"          lisp-indent-do)
           ("do" 2)
           ("do*" . "do")
  -        ("dolist"      1)
  +        ("dolist"      ((&whole 4 2 1) &body))
           ("dotimes" . "dolist")
           ("eval-when"   1)
           ("flet"        ((&whole 4 &rest (&whole 1 &lambda &body)) &body))
  
positive.code:         ("when" 1)
          ("with-accessors" . "multiple-value-bind")
          ("with-condition-restarts" . "multiple-value-bind")
          ("with-compilation-unit" (&lambda &body))
          ("with-output-to-string" (4 2))
          ("with-slots" . "multiple-value-bind")
          ("with-standard-io-syntax" (2))))
  
negative.code:            :set-indentation
             :update-system-indentation
             :indentation-update
             :calc-indent
             :&lambda))
  (in-package :lem-lisp-syntax.indent)
  
  (defparameter *body-indent* 2)
  