anchor.diff:  
   (define (detabify text options)
     (letn ((opts (parse-args options)))
  -  (if (< (opts [tab-width]) 1)
  -      (expand-tabs text 4)
  -    (expand-tabs text (opts [tab-width])))))
  +    (if (< (opts [tab-width]) 1)
  +        (expand-tabs text 4)
  +      (expand-tabs text (opts [tab-width])))))
   
   
   (define (tabify text options)
  
positive.code:   (set 'keyword-list (assign-indent-numbers two-armed keyword-list KEYWORD2))
    (set 'keyword-list (assign-indent-numbers local-binders keyword-list KEYWORD4))
    (when (opts [read-rc])
     (set 'keyword-list (assign-indent-numbers
                         (lookup dialect (parse-rc-json)) keyword-list nil)))
    keyword-list)
  
  ;; ---------------------------------------------------------------------------------
  
negative.code:       (letn ((brace-start (regex "{" str 0))
               (tag-start (regex "\\[text\\]" str 0))
               (brace-start (if brace-start
                                (+ (brace-start 2) (brace-start 1))
                              -1))
               (tag-start (if tag-start
                              (+ (tag-start 2) (tag-start 1))
                            -1))
               (str-positions (list limit (or brace-start -1) (or tag-start -1)))
               (pos-lst '()))
          (dolist (arg str-positions)
  