anchor.diff:            load-file
             macroexpand-lisp
             lisp-describe-symbol
  -          indent-region-lisp
  -          indent-sexp
  +          lisp-indent-region
  +          lisp-indent-sexp
             complete-symbol
             lisp-comment-region
             popup-scratch-buffer
  
positive.code:   (insert-newline n)
    (lisp-indent-line))
  
  (defun string-to-exps (str)
    (let ((str str)
          (exps)
  
negative.code:                    #'(lambda (out)
                         (describe (read-from-string name) out))))
  
  (define-key *lisp-mode-keymap* (kbd "M-C-i") 'complete-symbol)
  (define-command complete-symbol () ()
    (let* ((end (point))
  