anchor.diff:  
   (defvar *scheme-data*
     ;; name  completion  highlight  indentation
  -  '(;; added
  +  '(;; == part 0 ==
       ("use"                            t   t   0)
       ("import"                         t   t   0)
       ("select-module"                  t   t   0)
  
positive.code:     ("rlet1"                          t   t   2)
      ("unwind-protect"                 t   t   1)
      ("with-ports"                     t   t   3)
      ;; part 3
      ("and-let*"                       t   t   "let")
      ("begin0"                         t   t   0)
      ("call-with-client-socket"        t   t   1)
  
negative.code:     ("syntax-case"                    t   t   2)
      ("with-input-from-file"           t   t   1)
      ("with-output-to-file"            t   t   1)
  
      ;; == part 2 ==
      ("define-class"                   t   t   2)
      ("define-condition-type"          t   t   3)
      ("define-constant"                t   t   1)
  