anchor.diff:  * The server provides folding provider support.
   *
   * @since 3.10.0"
  -                        :TYPE (COMMON-LISP:OR COMMON-LISP:BOOLEAN FOLDING-RANGE-OPTIONS FOLDING-RANGE-REGISTRATION-OPTIONS) :READER
  -                        SERVER-CAPABILITIES-FOLDING-RANGE-PROVIDER)
  +                        :TYPE (COMMON-LISP:OR COMMON-LISP:BOOLEAN FOLDING-RANGE-OPTIONS FOLDING-RANGE-REGISTRATION-OPTIONS) :READER SERVER-CAPABILITIES-FOLDING-RANGE-PROVIDER)
                          (EXECUTE-COMMAND-PROVIDER? :INITARG :EXECUTE-COMMAND-PROVIDER :DOCUMENTATION "*
   * The server provides execute command support."
                           :TYPE EXECUTE-COMMAND-OPTIONS :READER SERVER-CAPABILITIES-EXECUTE-COMMAND-PROVIDER)
  
positive.code:                         :TYPE COMMON-LISP:STRING :READER MARKUP-CONTENT-VALUE)))
  
  (COMMON-LISP:DEFCLASS WORK-DONE-PROGRESS-BEGIN (LEM-LSP-MODE/JSON:OBJECT)
                        ((KIND :INITARG :KIND :DOCUMENTATION "" :TYPE (LEM-LSP-MODE/TYPE:TS-EQUAL-SPECIALIZER "begin") :READER
                          WORK-DONE-PROGRESS-BEGIN-KIND)
                         (TITLE :INITARG :TITLE :DOCUMENTATION "*
  * Mandatory title of the progress operation. Used to briefly inform about
  * the kind of operation being performed.
  
negative.code: * that is used to visualize a hover, e.g. by changing the background color."
                          :TYPE RANGE :READER HOVER-RANGE)))
  
  (COMMON-LISP:DEFTYPE MARKED-STRING ()
    '(COMMON-LISP:OR COMMON-LISP:STRING
                     (LEM-LSP-MODE/TYPE:TS-INTERFACE ("language" :TYPE COMMON-LISP:STRING :OPTIONAL-P COMMON-LISP:NIL) ("value" :TYPE COMMON-LISP:STRING :OPTIONAL-P COMMON-LISP:NIL))))
  
  (COMMON-LISP:DEFCLASS SIGNATURE-HELP-CLIENT-CAPABILITIES (LEM-LSP-MODE/JSON:OBJECT)
                        ((DYNAMIC-REGISTRATION? :INITARG :DYNAMIC-REGISTRATION :DOCUMENTATION "*
  