anchor.diff:           (path (or (real-path fname)
                      (real-path (string home *os-sep* fname))""))
            (contents (or (read-file path) "")))
  -  (or (json-parse contents) '())))
  +    (or (json-parse contents) '())))
   
   (define (assign-indent-numbers lst assoc-list inum)
     " Builds an associative list with keys as keywords and values as their indentation
  
positive.code: 
  (define (detabify text options)
    (letn ((opts (parse-args options)))
    (if (< (opts [tab-width]) 1)
        (expand-tabs text 4)
      (expand-tabs text (opts [tab-width])))))
  
  
  (define (tabify text options)
  
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)
  