anchor.diff:      ("rlet1"                          t   t   2)
       ("unwind-protect"                 t   t   1)
       ("with-ports"                     t   t   3)
  -    ;; part 3
  +
  +    ;; == part 3 ==
       ("and-let*"                       t   t   "let")
       ("begin0"                         t   t   0)
       ("call-with-client-socket"        t   t   1)
  
positive.code:     ("raise"                          t   t   nil)
      ("map"                            t   t   nil)
      ("for-each"                       t   t   nil)
      ("case-lambda"                    t   t   nil)
      ("er-macro-transformer"           t   t   nil)
      ;; part 1
      ("begin"                          t   t   0)
      ("case"                           t   t   (4 &rest (&whole 2 &rest 1)))
      ("define"                         t   t   1)
  
negative.code: 
  (defvar *scheme-data*
    ;; name  completion  highlight  indentation
    '(;; == part 0 ==
      ("use"                            t   t   0)
      ("import"                         t   t   0)
      ("select-module"                  t   t   0)
  