anchor.diff:          (values start-point end-point |newText|)))))
   
   (defun text-document-identifier (buffer)
  -  ({} "uri" (pathname-to-uri buffer)))
  +  ({} "uri" (buffer-uri buffer)))
   
   (defun text-document-item (buffer)
     ({} "uri" (buffer-uri buffer)
  
positive.code:       *response-methods*)))
  
  (defun pathname-to-uri (pathname)
    (format nil "file://~A" pathname))
  
  (defun {} (&rest plist)
    (alexandria:plist-hash-table plist :test 'equal))
  
negative.code:                         (lem:buffer-end-point buffer)))
  
  (defun buffer-uri (buffer)
    (pathname-to-uri (lem:buffer-filename buffer)))
  
  (defun lsp-position (point)
    ({} "line" (1- (lem:line-number-at-point point))
  