anchor.diff:  
         (#\- (open-possible-modeline-handler parser))
   
  -      ((or (text-char-p token) (eql token #\\))
  +      #+(or)(#\[ (open-possible-link-definition parser))
  +
  +      ((or (text-char-p token) (eql (content token) #\\))
          (open-paragraph parser "p")
          (process-token parser token))
   
  
positive.code:        (setf (current-indentation parser) (spaces token))
         (pop-frame-and-element item)
         (process-token parser token))
        ((eql list-marker token)
         (pop-frame-and-element item)
         (process-token parser token)))))
  
  
negative.code:        (incf blanks)
         (setf bol t))
  
        ((characterp (content token))
         (when bol
           (loop repeat blanks do (add-text parser *blank*))
           (setf blanks 0)
  