anchor.diff:    end-char
     block-comment-depth
     block-pair
  -  paren-stack)
  +  paren-stack
  +  (paren-depth 0))
   
   (defun parse-partial-sexp (from to &optional state comment-stop)
     (assert (eq (point-buffer from)
  
positive.code:           pps-state-block-comment-depth
            pps-state-block-pair
            pps-state-paren-stack
            parse-partial-sexp
            syntax-ppss
            in-string-p
  
negative.code:                 (pps-state-end-char state) end-char
                  (pps-state-block-comment-depth state) block-comment-depth
                  (pps-state-block-pair state) block-pair
                  (pps-state-paren-stack state) paren-stack
                  (pps-state-paren-depth state) paren-depth))
          state))))
  
  (define-editor-variable syntax-ppss-cache nil)
  