anchor.diff:            syntax-skip-expr-prefix-forward
             syntax-skip-expr-prefix-backward
             syntax-scan-range
  -          in-string-p
  -          in-comment-p
             search-comment-start-forward
             search-comment-start-backward
             search-string-start-forward
  
positive.code:       (setf (buffer-value buffer 'syntax-ppss-cache)
              cache-list)
        state)))
  
negative.code: (defmacro with-point-syntax (point &body body)
    `(let ((*current-syntax* (buffer-syntax-table (point-buffer ,point))))
       ,@body))
  
  (defun %search-syntax-start-forward (point syntax limit)
    (with-point ((curr point))
  