From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: =?UTF-8?Q?Jo=C3=A3o_?= =?UTF-8?Q?T=C3=A1vora?= Newsgroups: gmane.emacs.bugs Subject: bug#73436: eglot-1.17 fails to run in emacs 29.4 Date: Mon, 23 Sep 2024 19:02:02 +0100 Message-ID: References: <861q1ah99i.fsf@gnu.org> Mime-Version: 1.0 Content-Type: multipart/alternative; boundary="00000000000063118b0622cd304b" Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="13267"; mail-complaints-to="usenet@ciao.gmane.io" Cc: Dov Grobgeld , 73436@debbugs.gnu.org To: Eli Zaretskii Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Mon Sep 23 20:04:02 2024 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane-mx.org Original-Received: from lists.gnu.org ([209.51.188.17]) by ciao.gmane.io with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1ssnPl-0003H0-GX for geb-bug-gnu-emacs@m.gmane-mx.org; Mon, 23 Sep 2024 20:04:01 +0200 Original-Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1ssnPR-0004es-V6; Mon, 23 Sep 2024 14:03:43 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1ssnPP-0004ej-86 for bug-gnu-emacs@gnu.org; Mon, 23 Sep 2024 14:03:39 -0400 Original-Received: from debbugs.gnu.org ([2001:470:142:5::43]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1ssnPO-0002cd-V6 for bug-gnu-emacs@gnu.org; Mon, 23 Sep 2024 14:03:39 -0400 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=debbugs.gnu.org; s=debbugs-gnu-org; h=Date:From:In-Reply-To:References:MIME-Version:To:Subject; bh=JbHoi9FGIbKeR+I6fr1ETO3llFeHPdzmnDjRA2BKqiQ=; b=BXYqT11MiBIlWXiA/W8jzimKn2BiTbZrDasbn+T8rNTMXQCvAaMVfSwvpewUBecQKBULiOxoS6u4GWKeHFy/yTs0D+ueeBWPYYzI7vEE2b8f/1H/r9Cwe3ztrEVMTtBXMliHV7dWCEBbtQei484lw8AdIDPir4iKeJhk9ttHoPts+pw7zgAbSyt+Ve40+MD5aHM1VkP4Mb/o1De/AK94isyur27g/Ei5Q9LPaR3f8LQVTHtLzQBlRcHyVnAl/RtpnRNds9ocFQHWY+9hCcDpr+V8QmnfutvU63n1hgS4411Xy2tqniz5beo0dif79CzVwiZGOZlfZhxPoGyfrouFtg==; Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1ssnPl-0004dQ-V5 for bug-gnu-emacs@gnu.org; Mon, 23 Sep 2024 14:04:01 -0400 X-Loop: help-debbugs@gnu.org Resent-From: =?UTF-8?Q?Jo=C3=A3o_?= =?UTF-8?Q?T=C3=A1vora?= Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Mon, 23 Sep 2024 18:04:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 73436 X-GNU-PR-Package: emacs Original-Received: via spool by 73436-submit@debbugs.gnu.org id=B73436.172711463417800 (code B ref 73436); Mon, 23 Sep 2024 18:04:01 +0000 Original-Received: (at 73436) by debbugs.gnu.org; 23 Sep 2024 18:03:54 +0000 Original-Received: from localhost ([127.0.0.1]:44693 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1ssnPb-0004cx-Os for submit@debbugs.gnu.org; Mon, 23 Sep 2024 14:03:54 -0400 Original-Received: from mail-oo1-f43.google.com ([209.85.161.43]:47406) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1ssnPX-0004cb-Pd for 73436@debbugs.gnu.org; Mon, 23 Sep 2024 14:03:50 -0400 Original-Received: by mail-oo1-f43.google.com with SMTP id 006d021491bc7-5df9433ac0cso2114146eaf.3 for <73436@debbugs.gnu.org>; Mon, 23 Sep 2024 11:03:24 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20230601; t=1727114539; x=1727719339; darn=debbugs.gnu.org; h=cc:to:subject:message-id:date:from:in-reply-to:references :mime-version:from:to:cc:subject:date:message-id:reply-to; bh=JbHoi9FGIbKeR+I6fr1ETO3llFeHPdzmnDjRA2BKqiQ=; b=Y2Wo3sMyQawdH/9X/TeCxJ7/C55B2wqe3Aft5uEjUVv5kqAoZbBXXtE4mDKp2Equ4I oVEAQ+1iB+GvCkQSuiGha9fvLtKYcWzjG37qqWNI4LHXqsc4CueYRZkgbRQrXB/gvbHr dbcnW4itJw/+rj0eWUC0VJKPyNmAKGoe5z8II1hglmjpxP0M4CpSkannqGEW/mBjRX3y IqRD9q8hCNkTecre8r8ZD/Y2bzi7kHfzzx0EmNMccFytD8kNHOrhvQpToGyT9riOU6gE uFlcFxaGoYIFAva5C+6ILlete2Cv+Ebh9vxHoTjQ7XrRkd1vVyO3nqINz3+o+B/4Pbqs S69Q== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20230601; t=1727114539; x=1727719339; h=cc:to:subject:message-id:date:from:in-reply-to:references :mime-version:x-gm-message-state:from:to:cc:subject:date:message-id :reply-to; bh=JbHoi9FGIbKeR+I6fr1ETO3llFeHPdzmnDjRA2BKqiQ=; b=SmY6YDCs3rDdyzctftcyAmDIEF7DEFXEAFifp33YD7QIVvsi0z5Qwjbp7XclqsOKpE ch7EoL8t+csuUUtoD/pHatVRgmAZxwT5WOR6WOr0r4lxq2OjdqkRG7oFV/KaUj9KI6hE zIk9qkTGAdcKc3So5A9eY0/ZqxoNvf6cmxQ/5itS+Z0RXu0YUgOHQeBc/7X+KEdjjL/l 8dqOcEENW4FbJDdTCOfMecbZxfo8fc9+DoNLnT1LPf7PsegIbIhE0oYOkk8FwQZ+8KXQ T6ltkTskbRQwfzBRCMnNBmfOFhvzrp9wDGj48Pu2JreYcbnF+JR82H3V5UzsN+3epBs1 rnXw== X-Forwarded-Encrypted: i=1; AJvYcCVfv/ZaMayuhgQfcSI3Bv0I7vMzuOzlOUZTDUZvvPR/Fy8r+TgAQS338z3NT8DbHGkbfWxjSQ==@debbugs.gnu.org X-Gm-Message-State: AOJu0YzOxiZWUNYAQxdBgUJ12XEw+k+xSJXfRxLfYN5W2r617gKVal9f P7vn9S8yPbzW/lbtF//yHvieyuL+o+s30YUgWmRS4kwUl2ytmLs/gtonlw1pFi6fo5b5N19YaQo mWrfd47NIajnl7ga+11tyiwLA3A0= X-Google-Smtp-Source: AGHT+IHW3UJskjfAfNKwyn5pMkK2R2Ffo8HpSANeYDZXYaWr6ohO7Zoaqi5eqlrv3ZnsyrkpsaVpEOTE1Zsg3XnWK1M= X-Received: by 2002:a05:6820:1c98:b0:5d8:e6a:236 with SMTP id 006d021491bc7-5e58ba5d1fbmr5632734eaf.3.1727114535699; Mon, 23 Sep 2024 11:02:15 -0700 (PDT) In-Reply-To: <861q1ah99i.fsf@gnu.org> X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Xref: news.gmane.io gmane.emacs.bugs:292288 Archived-At: --00000000000063118b0622cd304b Content-Type: text/plain; charset="UTF-8" Content-Transfer-Encoding: quoted-printable Dov, I don't know where you may have obtained the idea that this eval-buffer activation method is supported. It isn't. Eglot has dependencies, so either use package.el facilities to ensure that they are installed and activated or use Emacs master. IIRC, in Emacs 29.4 one can use M-x eglot-upgrade-eglot to get and activate the latest version from GNU Elpa (or GNU-devel Elpa) correctly. Other methods are not supported. On Mon, Sep 23, 2024, 12:58 Eli Zaretskii wrote: > > From: Dov Grobgeld > > Date: Mon, 23 Sep 2024 11:58:03 +0300 > > > > Running the latest version of eglot, version 1.17, installed by > > package-list-packages, on emacs 29.4 fails. > > Adding Jo=C3=A3o. > > > Here's what I did: > > > > $ cd /tmp/eglot-1.17 > > $ emacs -Q -nw eglot.el > > > > and then the interactive commands > > > > M-x eval-buffer > > C-x C-f hello.c > > C-: (setq debug-on-error t) > > M-x eglot > > > > This resulted in an error. Here is the stack trace: > > > > Debugger entered--Lisp error: (invalid-slot-name "# > eglot-lsp-server-93e4e78>" :events-buffer-config) > > signal(invalid-slot-name ("# > eglot-lsp-server-93e4e78>" :events-buffer-config)) > > slot-missing(# > > :events-buffer-config oset (:size 2000000 :format full)) > > #f(compiled-function (obj slots) "Set slots of OBJ with SLOTS which > > is a list of name/value pairs.\nCalled from the constructor routine." > > #)(# > eglot-lsp-server-93e4e78> (:name "EGLOT (eglot-1.17/(c-mode c-ts-mode > > c++-mode c++-t..." :events-buffer-config (:size 2000000 :format full) > > :notification-dispatcher (closure ((fn . eglot-handle-notification)) > > (server method params) (let ((eglot--cached-server server)) (apply fn > > server method (append params nil)))) :request-dispatcher (closure ((fn > > . eglot-handle-request)) (server method params) (let > > ((eglot--cached-server server)) (apply fn server method (append params > > nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > > "/usr/bin/clangd") (server-info) (readable-name . "EGLOT > > (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...") > > tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > > nil (let ((default-directory default-directory) > > (tramp-use-ssh-controlmaster-options 'suppress) > > (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o > > ControlPath=3Dnone")) (make-process :name readable-name :command (setq > > server-info (eglot--cmd contact)) :connection-type 'pipe :coding > > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format "*%s > > stderr*" readable-name)) :file-handler t))))) > > apply(#f(compiled-function (obj slots) "Set slots of OBJ with SLOTS > > which is a list of name/value pairs.\nCalled from the constructor > > routine." #) # > eglot-lsp-server-93e4e78> (:name "EGLOT (eglot-1.17/(c-mode c-ts-mode > > c++-mode c++-t..." :events-buffer-config (:size 2000000 :format full) > > :notification-dispatcher (closure ((fn . eglot-handle-notification)) > > (server method params) (let ((eglot--cached-server server)) (apply fn > > server method (append params nil)))) :request-dispatcher (closure ((fn > > . eglot-handle-request)) (server method params) (let > > ((eglot--cached-server server)) (apply fn server method (append params > > nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > > "/usr/bin/clangd") (server-info) (readable-name . "EGLOT > > (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...") > > tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > > nil (let ((default-directory default-directory) > > (tramp-use-ssh-controlmaster-options 'suppress) > > (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o > > ControlPath=3Dnone")) (make-process :name readable-name :command (setq > > server-info (eglot--cmd contact)) :connection-type 'pipe :coding > > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format "*%s > > stderr*" readable-name)) :file-handler t))))) > > shared-initialize(# > > (:name "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t..." > > :events-buffer-config (:size 2000000 :format full) > > :notification-dispatcher (closure ((fn . eglot-handle-notification)) > > (server method params) (let ((eglot--cached-server server)) (apply fn > > server method (append params nil)))) :request-dispatcher (closure ((fn > > . eglot-handle-request)) (server method params) (let > > ((eglot--cached-server server)) (apply fn server method (append params > > nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > > "/usr/bin/clangd") (server-info) (readable-name . "EGLOT > > (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...") > > tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > > nil (let ((default-directory default-directory) > > (tramp-use-ssh-controlmaster-options 'suppress) > > (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o > > ControlPath=3Dnone")) (make-process :name readable-name :command (setq > > server-info (eglot--cmd contact)) :connection-type 'pipe :coding > > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format "*%s > > stderr*" readable-name)) :file-handler t))))) > > #f(compiled-function (this &optional args) "Construct the new object > > THIS based on ARGS.\nARGS is a property list where odd numbered > > elements are tags, and\neven numbered elements are the values to store > > in the tagged slot.\nIf you overload the `initialize-instance', there > > you will need to\ncall `shared-initialize' yourself, or you can call > > `call-next-method'\nto have this constructor called automatically. If > > these steps are\nnot taken, then new objects of your class will not > > have their values\ndynamically set from ARGS." # > -0x1f60eebd0e85d7f7>)(# > > (:name "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t..." > > :events-buffer-config (:size 2000000 :format full) > > :notification-dispatcher (closure ((fn . eglot-handle-notification)) > > (server method params) (let ((eglot--cached-server server)) (apply fn > > server method (append params nil)))) :request-dispatcher (closure ((fn > > . eglot-handle-request)) (server method params) (let > > ((eglot--cached-server server)) (apply fn server method (append params > > nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > > "/usr/bin/clangd") (server-info) (readable-name . "EGLOT > > (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...") > > tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > > nil (let ((default-directory default-directory) > > (tramp-use-ssh-controlmaster-options 'suppress) > > (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o > > ControlPath=3Dnone")) (make-process :name readable-name :command (setq > > server-info (eglot--cmd contact)) :connection-type 'pipe :coding > > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format "*%s > > stderr*" readable-name)) :file-handler t))))) > > apply(#f(compiled-function (this &optional args) "Construct the new > > object THIS based on ARGS.\nARGS is a property list where odd numbered > > elements are tags, and\neven numbered elements are the values to store > > in the tagged slot.\nIf you overload the `initialize-instance', there > > you will need to\ncall `shared-initialize' yourself, or you can call > > `call-next-method'\nto have this constructor called automatically. If > > these steps are\nnot taken, then new objects of your class will not > > have their values\ndynamically set from ARGS." # > -0x1f60eebd0e85d7f7>) (# > > (:name "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t..." > > :events-buffer-config (:size 2000000 :format full) > > :notification-dispatcher (closure ((fn . eglot-handle-notification)) > > (server method params) (let ((eglot--cached-server server)) (apply fn > > server method (append params nil)))) :request-dispatcher (closure ((fn > > . eglot-handle-request)) (server method params) (let > > ((eglot--cached-server server)) (apply fn server method (append params > > nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > > "/usr/bin/clangd") (server-info) (readable-name . "EGLOT > > (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...") > > tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > > nil (let ((default-directory default-directory) > > (tramp-use-ssh-controlmaster-options 'suppress) > > (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o > > ControlPath=3Dnone")) (make-process :name readable-name :command (setq > > server-info (eglot--cmd contact)) :connection-type 'pipe :coding > > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format "*%s > > stderr*" readable-name)) :file-handler t)))))) > > #f(compiled-function (&rest args) #)() > > #f(compiled-function (cl--cnm conn slots) # > 0x18a7bfd9b312194c>)(#f(compiled-function (&rest args) # > -0x7469b45b80fef61>) # > > (:name "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t..." > > :events-buffer-config (:size 2000000 :format full) > > :notification-dispatcher (closure ((fn . eglot-handle-notification)) > > (server method params) (let ((eglot--cached-server server)) (apply fn > > server method (append params nil)))) :request-dispatcher (closure ((fn > > . eglot-handle-request)) (server method params) (let > > ((eglot--cached-server server)) (apply fn server method (append params > > nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > > "/usr/bin/clangd") (server-info) (readable-name . "EGLOT > > (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...") > > tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > > nil (let ((default-directory default-directory) > > (tramp-use-ssh-controlmaster-options 'suppress) > > (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o > > ControlPath=3Dnone")) (make-process :name readable-name :command (setq > > server-info (eglot--cmd contact)) :connection-type 'pipe :coding > > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format "*%s > > stderr*" readable-name)) :file-handler t))))) > > apply(#f(compiled-function (cl--cnm conn slots) # > 0x18a7bfd9b312194c>) #f(compiled-function (&rest args) # > -0x7469b45b80fef61>) (# > > (:name "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t..." > > :events-buffer-config (:size 2000000 :format full) > > :notification-dispatcher (closure ((fn . eglot-handle-notification)) > > (server method params) (let ((eglot--cached-server server)) (apply fn > > server method (append params nil)))) :request-dispatcher (closure ((fn > > . eglot-handle-request)) (server method params) (let > > ((eglot--cached-server server)) (apply fn server method (append params > > nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > > "/usr/bin/clangd") (server-info) (readable-name . "EGLOT > > (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...") > > tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > > nil (let ((default-directory default-directory) > > (tramp-use-ssh-controlmaster-options 'suppress) > > (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o > > ControlPath=3Dnone")) (make-process :name readable-name :command (setq > > server-info (eglot--cmd contact)) :connection-type 'pipe :coding > > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format "*%s > > stderr*" readable-name)) :file-handler t)))))) > > #f(compiled-function (conn slots) # > 0x164956dec53e81bc>)(# > > (:name "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t..." > > :events-buffer-config (:size 2000000 :format full) > > :notification-dispatcher (closure ((fn . eglot-handle-notification)) > > (server method params) (let ((eglot--cached-server server)) (apply fn > > server method (append params nil)))) :request-dispatcher (closure ((fn > > . eglot-handle-request)) (server method params) (let > > ((eglot--cached-server server)) (apply fn server method (append params > > nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > > "/usr/bin/clangd") (server-info) (readable-name . "EGLOT > > (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...") > > tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > > nil (let ((default-directory default-directory) > > (tramp-use-ssh-controlmaster-options 'suppress) > > (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o > > ControlPath=3Dnone")) (make-process :name readable-name :command (setq > > server-info (eglot--cmd contact)) :connection-type 'pipe :coding > > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format "*%s > > stderr*" readable-name)) :file-handler t))))) > > apply(#f(compiled-function (conn slots) # > 0x164956dec53e81bc>) (# > > (:name "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t..." > > :events-buffer-config (:size 2000000 :format full) > > :notification-dispatcher (closure ((fn . eglot-handle-notification)) > > (server method params) (let ((eglot--cached-server server)) (apply fn > > server method (append params nil)))) :request-dispatcher (closure ((fn > > . eglot-handle-request)) (server method params) (let > > ((eglot--cached-server server)) (apply fn server method (append params > > nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > > "/usr/bin/clangd") (server-info) (readable-name . "EGLOT > > (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...") > > tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > > nil (let ((default-directory default-directory) > > (tramp-use-ssh-controlmaster-options 'suppress) > > (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o > > ControlPath=3Dnone")) (make-process :name readable-name :command (setq > > server-info (eglot--cmd contact)) :connection-type 'pipe :coding > > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format "*%s > > stderr*" readable-name)) :file-handler t)))))) > > #f(compiled-function (&rest args) # > -0xb77c4438ff27908>)(# > > (:name "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t..." > > :events-buffer-config (:size 2000000 :format full) > > :notification-dispatcher (closure ((fn . eglot-handle-notification)) > > (server method params) (let ((eglot--cached-server server)) (apply fn > > server method (append params nil)))) :request-dispatcher (closure ((fn > > . eglot-handle-request)) (server method params) (let > > ((eglot--cached-server server)) (apply fn server method (append params > > nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > > "/usr/bin/clangd") (server-info) (readable-name . "EGLOT > > (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...") > > tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > > nil (let ((default-directory default-directory) > > (tramp-use-ssh-controlmaster-options 'suppress) > > (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o > > ControlPath=3Dnone")) (make-process :name readable-name :command (setq > > server-info (eglot--cmd contact)) :connection-type 'pipe :coding > > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format "*%s > > stderr*" readable-name)) :file-handler t))))) > > apply(#f(compiled-function (&rest args) # > -0xb77c4438ff27908>) # > > (:name "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t..." > > :events-buffer-config (:size 2000000 :format full) > > :notification-dispatcher (closure ((fn . eglot-handle-notification)) > > (server method params) (let ((eglot--cached-server server)) (apply fn > > server method (append params nil)))) :request-dispatcher (closure ((fn > > . eglot-handle-request)) (server method params) (let > > ((eglot--cached-server server)) (apply fn server method (append params > > nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > > "/usr/bin/clangd") (server-info) (readable-name . "EGLOT > > (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...") > > tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > > nil (let ((default-directory default-directory) > > (tramp-use-ssh-controlmaster-options 'suppress) > > (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o > > ControlPath=3Dnone")) (make-process :name readable-name :command (setq > > server-info (eglot--cmd contact)) :connection-type 'pipe :coding > > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format "*%s > > stderr*" readable-name)) :file-handler t))))) > > initialize-instance(# > > (:name "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t..." > > :events-buffer-config (:size 2000000 :format full) > > :notification-dispatcher (closure ((fn . eglot-handle-notification)) > > (server method params) (let ((eglot--cached-server server)) (apply fn > > server method (append params nil)))) :request-dispatcher (closure ((fn > > . eglot-handle-request)) (server method params) (let > > ((eglot--cached-server server)) (apply fn server method (append params > > nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > > "/usr/bin/clangd") (server-info) (readable-name . "EGLOT > > (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...") > > tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > > nil (let ((default-directory default-directory) > > (tramp-use-ssh-controlmaster-options 'suppress) > > (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o > > ControlPath=3Dnone")) (make-process :name readable-name :command (setq > > server-info (eglot--cmd contact)) :connection-type 'pipe :coding > > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format "*%s > > stderr*" readable-name)) :file-handler t))))) > > #f(compiled-function (class &rest slots) "Default constructor for > > CLASS `eieio-default-superclass'.\nSLOTS are the initialization slots > > used by `initialize-instance'.\nThis static method is called when an > > object is constructed.\nIt allocates the vector used to represent an > > EIEIO object, and then\ncalls `initialize-instance' on that object." > > #)(eglot-lsp-server :name "EGLOT > > (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t..." :events-buffer-config > > (:size 2000000 :format full) :notification-dispatcher (closure ((fn . > > eglot-handle-notification)) (server method params) (let > > ((eglot--cached-server server)) (apply fn server method (append params > > nil)))) :request-dispatcher (closure ((fn . eglot-handle-request)) > > (server method params) (let ((eglot--cached-server server)) (apply fn > > server method (append params nil)))) :on-shutdown eglot--on-shutdown > > :process (closure ((contact "/usr/bin/clangd") (server-info) > > (readable-name . "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode > > c++-t...") tramp-ssh-controlmaster-options > > tramp-use-ssh-controlmaster-options) nil (let ((default-directory > > default-directory) (tramp-use-ssh-controlmaster-options 'suppress) > > (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o > > ControlPath=3Dnone")) (make-process :name readable-name :command (setq > > server-info (eglot--cmd contact)) :connection-type 'pipe :coding > > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format "*%s > > stderr*" readable-name)) :file-handler t)))) > > apply(#f(compiled-function (class &rest slots) "Default constructor > > for CLASS `eieio-default-superclass'.\nSLOTS are the initialization > > slots used by `initialize-instance'.\nThis static method is called > > when an object is constructed.\nIt allocates the vector used to > > represent an EIEIO object, and then\ncalls `initialize-instance' on > > that object." #) eglot-lsp-server (:name > > "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t..." > > :events-buffer-config (:size 2000000 :format full) > > :notification-dispatcher (closure ((fn . eglot-handle-notification)) > > (server method params) (let ((eglot--cached-server server)) (apply fn > > server method (append params nil)))) :request-dispatcher (closure ((fn > > . eglot-handle-request)) (server method params) (let > > ((eglot--cached-server server)) (apply fn server method (append params > > nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > > "/usr/bin/clangd") (server-info) (readable-name . "EGLOT > > (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...") > > tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > > nil (let ((default-directory default-directory) > > (tramp-use-ssh-controlmaster-options 'suppress) > > (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o > > ControlPath=3Dnone")) (make-process :name readable-name :command (setq > > server-info (eglot--cmd contact)) :connection-type 'pipe :coding > > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format "*%s > > stderr*" readable-name)) :file-handler t))))) > > make-instance(eglot-lsp-server :name "EGLOT (eglot-1.17/(c-mode > > c-ts-mode c++-mode c++-t..." :events-buffer-config (:size 2000000 > > :format full) :notification-dispatcher (closure ((fn . > > eglot-handle-notification)) (server method params) (let > > ((eglot--cached-server server)) (apply fn server method (append params > > nil)))) :request-dispatcher (closure ((fn . eglot-handle-request)) > > (server method params) (let ((eglot--cached-server server)) (apply fn > > server method (append params nil)))) :on-shutdown eglot--on-shutdown > > :process (closure ((contact "/usr/bin/clangd") (server-info) > > (readable-name . "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode > > c++-t...") tramp-ssh-controlmaster-options > > tramp-use-ssh-controlmaster-options) nil (let ((default-directory > > default-directory) (tramp-use-ssh-controlmaster-options 'suppress) > > (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o > > ControlPath=3Dnone")) (make-process :name readable-name :command (setq > > server-info (eglot--cmd contact)) :connection-type 'pipe :coding > > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format "*%s > > stderr*" readable-name)) :file-handler t)))) > > apply(make-instance eglot-lsp-server :name "EGLOT > > (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t..." :events-buffer-config > > (:size 2000000 :format full) :notification-dispatcher (closure ((fn . > > eglot-handle-notification)) (server method params) (let > > ((eglot--cached-server server)) (apply fn server method (append params > > nil)))) :request-dispatcher (closure ((fn . eglot-handle-request)) > > (server method params) (let ((eglot--cached-server server)) (apply fn > > server method (append params nil)))) :on-shutdown eglot--on-shutdown > > (:process (closure ((contact "/usr/bin/clangd") (server-info) > > (readable-name . "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode > > c++-t...") tramp-ssh-controlmaster-options > > tramp-use-ssh-controlmaster-options) nil (let ((default-directory > > default-directory) (tramp-use-ssh-controlmaster-options 'suppress) > > (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o > > ControlPath=3Dnone")) (make-process :name readable-name :command (setq > > server-info (eglot--cmd contact)) :connection-type 'pipe :coding > > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format "*%s > > stderr*" readable-name)) :file-handler t))))) > > (let* ((default-directory (project-root project)) (nickname > > (project-name project)) (readable-name (format "EGLOT (%s/%s)" > > nickname managed-modes)) server-info (contact (if (functionp contact) > > (funcall contact) contact)) (initargs (cond ((keywordp (car contact)) > > contact) ((integerp (car (cdr contact))) (setq server-info (list > > (format "%s:%s" ... ...))) (list ':process #'(lambda nil ...))) ((and > > (stringp (car contact)) (cl-find-if #'... contact)) (setq server-info > > (list "")) (list ':process > > (jsonrpc-autoport-bootstrap readable-name contact :connect-args > > '...))) ((stringp (car contact)) (let* ((probe ...) (more-initargs > > ...) (contact ...)) (cons ':process (cons ... more-initargs)))))) > > (spread #'(lambda (fn) #'(lambda (server method params) (let ... > > ...)))) (server (apply #'make-instance class :name readable-name > > :events-buffer-config eglot-events-buffer-config > > :notification-dispatcher (funcall spread #'eglot-handle-notification) > > :request-dispatcher (funcall spread #'eglot-handle-request) > > :on-shutdown #'eglot--on-shutdown initargs)) (canceled nil) (tag > > (make-symbol "connected-catch-tag"))) (if server-info (progn > > (jsonrpc--debug server "Running language server: %s" (string-join > > server-info " ")))) (let* ((v server)) (\(setf\ > > eglot--saved-initargs\) initargs v)) (let* ((v server)) (\(setf\ > > eglot--project\) project v)) (let* ((v server)) (\(setf\ > > eglot--project-nickname\) nickname v)) (let* ((v server)) (\(setf\ > > eglot--languages\) (let* ((--cl-var-- managed-modes) (m nil) > > (--cl-var-- language-ids) (l nil) (--cl-var-- nil)) (while (and (consp > > --cl-var--) (progn (setq m ...) (consp --cl-var--))) (setq l (car > > --cl-var--)) (setq --cl-var-- (cons (cons m l) --cl-var--)) (setq > > --cl-var-- (cdr --cl-var--)) (setq --cl-var-- (cdr --cl-var--))) > > (nreverse --cl-var--)) v)) (run-hook-with-args > > 'eglot-server-initialized-hook server) (unwind-protect (condition-case > > _quit (let ((retval (catch tag (jsonrpc-async-request server > > :initialize ... :success-fn ... :timeout eglot-connect-timeout > > :error-fn ... :timeout-fn ...) (cond ... ...)))) (cond ((consp retval) > > (let* (...) (if ... ... ...))) ((null retval) (let nil (eglot--message > > "Waiting in background for server `%s'" ...) nil)) (t (let nil > > server)))) (quit (jsonrpc-shutdown server) (setq canceled 'quit))) > > (setq tag nil))) > > eglot--connect((c-mode c-ts-mode c++-mode c++-ts-mode objc-mode) > > (transient . "/tmp/eglot-1.17/") eglot-lsp-server ("/usr/bin/clangd") > > ("c" "c" "c++" "c++" "objc")) > > eglot((c-mode c-ts-mode c++-mode c++-ts-mode objc-mode) (transient . > > "/tmp/eglot-1.17/") eglot-lsp-server ("/usr/bin/clangd") ("c" "c" > > "c++" "c++" "objc") t) > > funcall-interactively(eglot (c-mode c-ts-mode c++-mode c++-ts-mode > > objc-mode) (transient . "/tmp/eglot-1.17/") eglot-lsp-server > > ("/usr/bin/clangd") ("c" "c" "c++" "c++" "objc") t) > > command-execute(eglot record) > > execute-extended-command(nil "eglot" "eglot") > > funcall-interactively(execute-extended-command nil "eglot" "eglot") > > command-execute(execute-extended-command) > > > > > > > > > --00000000000063118b0622cd304b Content-Type: text/html; charset="UTF-8" Content-Transfer-Encoding: quoted-printable
Dov, I don't know where you may have obtained th= e idea that this eval-buffer activation method is supported. It isn't.= =C2=A0

Eglot has dependencies,= so either use package.el facilities to ensure that they are installed and = activated or use Emacs master. IIRC, in Emacs 29.4 one can use M-x eglot-up= grade-eglot to get and activate the latest version from GNU Elpa (or GNU-de= vel Elpa) correctly. Other methods are not supported.


On Mon, Sep 23, 20= 24, 12:58 Eli Zaretskii <eliz@gnu.org> wrote:
> From: Dov Grobgeld <dov.grobgeld@gmail.com>
> Date: Mon, 23 Sep 2024 11:58:03 +0300
>
> Running the latest version of eglot, version 1.17, installed by
> package-list-packages, on emacs 29.4 fails.

Adding Jo=C3=A3o.

> Here's what I did:
>
> $ cd /tmp/eglot-1.17
> $ emacs -Q -nw eglot.el
>
> and then the interactive commands
>
> M-x eval-buffer
> C-x C-f hello.c
> C-: (setq debug-on-error t)
> M-x eglot
>
> This resulted in an error. Here is the stack trace:
>
> Debugger entered--Lisp error: (invalid-slot-name "#<eglot-lsp-= server
> eglot-lsp-server-93e4e78>" :events-buffer-config)
>=C2=A0 =C2=A0signal(invalid-slot-name ("#<eglot-lsp-server
> eglot-lsp-server-93e4e78>" :events-buffer-config))
>=C2=A0 =C2=A0slot-missing(#<eglot-lsp-server eglot-lsp-server-93e4e7= 8>
> :events-buffer-config oset (:size 2000000 :format full))
>=C2=A0 =C2=A0#f(compiled-function (obj slots) "Set slots of OBJ wi= th SLOTS which
> is a list of name/value pairs.\nCalled from the constructor routine.&q= uot;
> #<bytecode 0x4590eddf9051ddd>)(#<eglot-lsp-server
> eglot-lsp-server-93e4e78> (:name "EGLOT (eglot-1.17/(c-mode c-= ts-mode
> c++-mode c++-t..." :events-buffer-config (:size 2000000 :format f= ull)
> :notification-dispatcher (closure ((fn . eglot-handle-notification)) > (server method params) (let ((eglot--cached-server server)) (apply fn<= br> > server method (append params nil)))) :request-dispatcher (closure ((fn=
> . eglot-handle-request)) (server method params) (let
> ((eglot--cached-server server)) (apply fn server method (append params=
> nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > "/usr/bin/clangd") (server-info) (readable-name . "EGLO= T
> (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...")
> tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > nil (let ((default-directory default-directory)
> (tramp-use-ssh-controlmaster-options 'suppress)
> (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o
> ControlPath=3Dnone")) (make-process :name readable-name :command = (setq
> server-info (eglot--cmd contact)) :connection-type 'pipe :coding > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format &q= uot;*%s
> stderr*" readable-name)) :file-handler t)))))
>=C2=A0 =C2=A0apply(#f(compiled-function (obj slots) "Set slots of = OBJ with SLOTS
> which is a list of name/value pairs.\nCalled from the constructor
> routine." #<bytecode 0x4590eddf9051ddd>) #<eglot-lsp-ser= ver
> eglot-lsp-server-93e4e78> (:name "EGLOT (eglot-1.17/(c-mode c-= ts-mode
> c++-mode c++-t..." :events-buffer-config (:size 2000000 :format f= ull)
> :notification-dispatcher (closure ((fn . eglot-handle-notification)) > (server method params) (let ((eglot--cached-server server)) (apply fn<= br> > server method (append params nil)))) :request-dispatcher (closure ((fn=
> . eglot-handle-request)) (server method params) (let
> ((eglot--cached-server server)) (apply fn server method (append params=
> nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > "/usr/bin/clangd") (server-info) (readable-name . "EGLO= T
> (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...")
> tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > nil (let ((default-directory default-directory)
> (tramp-use-ssh-controlmaster-options 'suppress)
> (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o
> ControlPath=3Dnone")) (make-process :name readable-name :command = (setq
> server-info (eglot--cmd contact)) :connection-type 'pipe :coding > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format &q= uot;*%s
> stderr*" readable-name)) :file-handler t)))))
>=C2=A0 =C2=A0shared-initialize(#<eglot-lsp-server eglot-lsp-server-9= 3e4e78>
> (:name "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...&quo= t;
> :events-buffer-config (:size 2000000 :format full)
> :notification-dispatcher (closure ((fn . eglot-handle-notification)) > (server method params) (let ((eglot--cached-server server)) (apply fn<= br> > server method (append params nil)))) :request-dispatcher (closure ((fn=
> . eglot-handle-request)) (server method params) (let
> ((eglot--cached-server server)) (apply fn server method (append params=
> nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > "/usr/bin/clangd") (server-info) (readable-name . "EGLO= T
> (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...")
> tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > nil (let ((default-directory default-directory)
> (tramp-use-ssh-controlmaster-options 'suppress)
> (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o
> ControlPath=3Dnone")) (make-process :name readable-name :command = (setq
> server-info (eglot--cmd contact)) :connection-type 'pipe :coding > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format &q= uot;*%s
> stderr*" readable-name)) :file-handler t)))))
>=C2=A0 =C2=A0#f(compiled-function (this &optional args) "Const= ruct the new object
> THIS based on ARGS.\nARGS is a property list where odd numbered
> elements are tags, and\neven numbered elements are the values to store=
> in the tagged slot.\nIf you overload the `initialize-instance', th= ere
> you will need to\ncall `shared-initialize' yourself, or you can ca= ll
> `call-next-method'\nto have this constructor called automatically.= =C2=A0 If
> these steps are\nnot taken, then new objects of your class will not > have their values\ndynamically set from ARGS." #<bytecode
> -0x1f60eebd0e85d7f7>)(#<eglot-lsp-server eglot-lsp-server-93e4e7= 8>
> (:name "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...&quo= t;
> :events-buffer-config (:size 2000000 :format full)
> :notification-dispatcher (closure ((fn . eglot-handle-notification)) > (server method params) (let ((eglot--cached-server server)) (apply fn<= br> > server method (append params nil)))) :request-dispatcher (closure ((fn=
> . eglot-handle-request)) (server method params) (let
> ((eglot--cached-server server)) (apply fn server method (append params=
> nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > "/usr/bin/clangd") (server-info) (readable-name . "EGLO= T
> (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...")
> tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > nil (let ((default-directory default-directory)
> (tramp-use-ssh-controlmaster-options 'suppress)
> (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o
> ControlPath=3Dnone")) (make-process :name readable-name :command = (setq
> server-info (eglot--cmd contact)) :connection-type 'pipe :coding > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format &q= uot;*%s
> stderr*" readable-name)) :file-handler t)))))
>=C2=A0 =C2=A0apply(#f(compiled-function (this &optional args) "= ;Construct the new
> object THIS based on ARGS.\nARGS is a property list where odd numbered=
> elements are tags, and\neven numbered elements are the values to store=
> in the tagged slot.\nIf you overload the `initialize-instance', th= ere
> you will need to\ncall `shared-initialize' yourself, or you can ca= ll
> `call-next-method'\nto have this constructor called automatically.= =C2=A0 If
> these steps are\nnot taken, then new objects of your class will not > have their values\ndynamically set from ARGS." #<bytecode
> -0x1f60eebd0e85d7f7>) (#<eglot-lsp-server eglot-lsp-server-93e4e= 78>
> (:name "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...&quo= t;
> :events-buffer-config (:size 2000000 :format full)
> :notification-dispatcher (closure ((fn . eglot-handle-notification)) > (server method params) (let ((eglot--cached-server server)) (apply fn<= br> > server method (append params nil)))) :request-dispatcher (closure ((fn=
> . eglot-handle-request)) (server method params) (let
> ((eglot--cached-server server)) (apply fn server method (append params=
> nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > "/usr/bin/clangd") (server-info) (readable-name . "EGLO= T
> (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...")
> tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > nil (let ((default-directory default-directory)
> (tramp-use-ssh-controlmaster-options 'suppress)
> (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o
> ControlPath=3Dnone")) (make-process :name readable-name :command = (setq
> server-info (eglot--cmd contact)) :connection-type 'pipe :coding > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format &q= uot;*%s
> stderr*" readable-name)) :file-handler t))))))
>=C2=A0 =C2=A0#f(compiled-function (&rest args) #<bytecode -0x746= 9b45b80fef61>)()
>=C2=A0 =C2=A0#f(compiled-function (cl--cnm conn slots) #<bytecode > 0x18a7bfd9b312194c>)(#f(compiled-function (&rest args) #<byt= ecode
> -0x7469b45b80fef61>) #<eglot-lsp-server eglot-lsp-server-93e4e78= >
> (:name "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...&quo= t;
> :events-buffer-config (:size 2000000 :format full)
> :notification-dispatcher (closure ((fn . eglot-handle-notification)) > (server method params) (let ((eglot--cached-server server)) (apply fn<= br> > server method (append params nil)))) :request-dispatcher (closure ((fn=
> . eglot-handle-request)) (server method params) (let
> ((eglot--cached-server server)) (apply fn server method (append params=
> nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > "/usr/bin/clangd") (server-info) (readable-name . "EGLO= T
> (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...")
> tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > nil (let ((default-directory default-directory)
> (tramp-use-ssh-controlmaster-options 'suppress)
> (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o
> ControlPath=3Dnone")) (make-process :name readable-name :command = (setq
> server-info (eglot--cmd contact)) :connection-type 'pipe :coding > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format &q= uot;*%s
> stderr*" readable-name)) :file-handler t)))))
>=C2=A0 =C2=A0apply(#f(compiled-function (cl--cnm conn slots) #<bytec= ode
> 0x18a7bfd9b312194c>) #f(compiled-function (&rest args) #<byt= ecode
> -0x7469b45b80fef61>) (#<eglot-lsp-server eglot-lsp-server-93e4e7= 8>
> (:name "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...&quo= t;
> :events-buffer-config (:size 2000000 :format full)
> :notification-dispatcher (closure ((fn . eglot-handle-notification)) > (server method params) (let ((eglot--cached-server server)) (apply fn<= br> > server method (append params nil)))) :request-dispatcher (closure ((fn=
> . eglot-handle-request)) (server method params) (let
> ((eglot--cached-server server)) (apply fn server method (append params=
> nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > "/usr/bin/clangd") (server-info) (readable-name . "EGLO= T
> (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...")
> tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > nil (let ((default-directory default-directory)
> (tramp-use-ssh-controlmaster-options 'suppress)
> (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o
> ControlPath=3Dnone")) (make-process :name readable-name :command = (setq
> server-info (eglot--cmd contact)) :connection-type 'pipe :coding > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format &q= uot;*%s
> stderr*" readable-name)) :file-handler t))))))
>=C2=A0 =C2=A0#f(compiled-function (conn slots) #<bytecode
> 0x164956dec53e81bc>)(#<eglot-lsp-server eglot-lsp-server-93e4e78= >
> (:name "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...&quo= t;
> :events-buffer-config (:size 2000000 :format full)
> :notification-dispatcher (closure ((fn . eglot-handle-notification)) > (server method params) (let ((eglot--cached-server server)) (apply fn<= br> > server method (append params nil)))) :request-dispatcher (closure ((fn=
> . eglot-handle-request)) (server method params) (let
> ((eglot--cached-server server)) (apply fn server method (append params=
> nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > "/usr/bin/clangd") (server-info) (readable-name . "EGLO= T
> (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...")
> tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > nil (let ((default-directory default-directory)
> (tramp-use-ssh-controlmaster-options 'suppress)
> (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o
> ControlPath=3Dnone")) (make-process :name readable-name :command = (setq
> server-info (eglot--cmd contact)) :connection-type 'pipe :coding > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format &q= uot;*%s
> stderr*" readable-name)) :file-handler t)))))
>=C2=A0 =C2=A0apply(#f(compiled-function (conn slots) #<bytecode
> 0x164956dec53e81bc>) (#<eglot-lsp-server eglot-lsp-server-93e4e7= 8>
> (:name "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...&quo= t;
> :events-buffer-config (:size 2000000 :format full)
> :notification-dispatcher (closure ((fn . eglot-handle-notification)) > (server method params) (let ((eglot--cached-server server)) (apply fn<= br> > server method (append params nil)))) :request-dispatcher (closure ((fn=
> . eglot-handle-request)) (server method params) (let
> ((eglot--cached-server server)) (apply fn server method (append params=
> nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > "/usr/bin/clangd") (server-info) (readable-name . "EGLO= T
> (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...")
> tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > nil (let ((default-directory default-directory)
> (tramp-use-ssh-controlmaster-options 'suppress)
> (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o
> ControlPath=3Dnone")) (make-process :name readable-name :command = (setq
> server-info (eglot--cmd contact)) :connection-type 'pipe :coding > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format &q= uot;*%s
> stderr*" readable-name)) :file-handler t))))))
>=C2=A0 =C2=A0#f(compiled-function (&rest args) #<bytecode
> -0xb77c4438ff27908>)(#<eglot-lsp-server eglot-lsp-server-93e4e78= >
> (:name "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...&quo= t;
> :events-buffer-config (:size 2000000 :format full)
> :notification-dispatcher (closure ((fn . eglot-handle-notification)) > (server method params) (let ((eglot--cached-server server)) (apply fn<= br> > server method (append params nil)))) :request-dispatcher (closure ((fn=
> . eglot-handle-request)) (server method params) (let
> ((eglot--cached-server server)) (apply fn server method (append params=
> nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > "/usr/bin/clangd") (server-info) (readable-name . "EGLO= T
> (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...")
> tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > nil (let ((default-directory default-directory)
> (tramp-use-ssh-controlmaster-options 'suppress)
> (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o
> ControlPath=3Dnone")) (make-process :name readable-name :command = (setq
> server-info (eglot--cmd contact)) :connection-type 'pipe :coding > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format &q= uot;*%s
> stderr*" readable-name)) :file-handler t)))))
>=C2=A0 =C2=A0apply(#f(compiled-function (&rest args) #<bytecode<= br> > -0xb77c4438ff27908>) #<eglot-lsp-server eglot-lsp-server-93e4e78= >
> (:name "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...&quo= t;
> :events-buffer-config (:size 2000000 :format full)
> :notification-dispatcher (closure ((fn . eglot-handle-notification)) > (server method params) (let ((eglot--cached-server server)) (apply fn<= br> > server method (append params nil)))) :request-dispatcher (closure ((fn=
> . eglot-handle-request)) (server method params) (let
> ((eglot--cached-server server)) (apply fn server method (append params=
> nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > "/usr/bin/clangd") (server-info) (readable-name . "EGLO= T
> (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...")
> tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > nil (let ((default-directory default-directory)
> (tramp-use-ssh-controlmaster-options 'suppress)
> (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o
> ControlPath=3Dnone")) (make-process :name readable-name :command = (setq
> server-info (eglot--cmd contact)) :connection-type 'pipe :coding > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format &q= uot;*%s
> stderr*" readable-name)) :file-handler t)))))
>=C2=A0 =C2=A0initialize-instance(#<eglot-lsp-server eglot-lsp-server= -93e4e78>
> (:name "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...&quo= t;
> :events-buffer-config (:size 2000000 :format full)
> :notification-dispatcher (closure ((fn . eglot-handle-notification)) > (server method params) (let ((eglot--cached-server server)) (apply fn<= br> > server method (append params nil)))) :request-dispatcher (closure ((fn=
> . eglot-handle-request)) (server method params) (let
> ((eglot--cached-server server)) (apply fn server method (append params=
> nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > "/usr/bin/clangd") (server-info) (readable-name . "EGLO= T
> (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...")
> tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > nil (let ((default-directory default-directory)
> (tramp-use-ssh-controlmaster-options 'suppress)
> (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o
> ControlPath=3Dnone")) (make-process :name readable-name :command = (setq
> server-info (eglot--cmd contact)) :connection-type 'pipe :coding > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format &q= uot;*%s
> stderr*" readable-name)) :file-handler t)))))
>=C2=A0 =C2=A0#f(compiled-function (class &rest slots) "Default= constructor for
> CLASS `eieio-default-superclass'.\nSLOTS are the initialization sl= ots
> used by `initialize-instance'.\nThis static method is called when = an
> object is constructed.\nIt allocates the vector used to represent an > EIEIO object, and then\ncalls `initialize-instance' on that object= ."
> #<bytecode -0x982733269180e59>)(eglot-lsp-server :name "EGL= OT
> (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t..." :events-buffer-c= onfig
> (:size 2000000 :format full) :notification-dispatcher (closure ((fn .<= br> > eglot-handle-notification)) (server method params) (let
> ((eglot--cached-server server)) (apply fn server method (append params=
> nil)))) :request-dispatcher (closure ((fn . eglot-handle-request))
> (server method params) (let ((eglot--cached-server server)) (apply fn<= br> > server method (append params nil)))) :on-shutdown eglot--on-shutdown > :process (closure ((contact "/usr/bin/clangd") (server-info)=
> (readable-name . "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode > c++-t...") tramp-ssh-controlmaster-options
> tramp-use-ssh-controlmaster-options) nil (let ((default-directory
> default-directory) (tramp-use-ssh-controlmaster-options 'suppress)=
> (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o
> ControlPath=3Dnone")) (make-process :name readable-name :command = (setq
> server-info (eglot--cmd contact)) :connection-type 'pipe :coding > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format &q= uot;*%s
> stderr*" readable-name)) :file-handler t))))
>=C2=A0 =C2=A0apply(#f(compiled-function (class &rest slots) "D= efault constructor
> for CLASS `eieio-default-superclass'.\nSLOTS are the initializatio= n
> slots used by `initialize-instance'.\nThis static method is called=
> when an object is constructed.\nIt allocates the vector used to
> represent an EIEIO object, and then\ncalls `initialize-instance' o= n
> that object." #<bytecode -0x982733269180e59>) eglot-lsp-ser= ver (:name
> "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t..."
> :events-buffer-config (:size 2000000 :format full)
> :notification-dispatcher (closure ((fn . eglot-handle-notification)) > (server method params) (let ((eglot--cached-server server)) (apply fn<= br> > server method (append params nil)))) :request-dispatcher (closure ((fn=
> . eglot-handle-request)) (server method params) (let
> ((eglot--cached-server server)) (apply fn server method (append params=
> nil)))) :on-shutdown eglot--on-shutdown :process (closure ((contact > "/usr/bin/clangd") (server-info) (readable-name . "EGLO= T
> (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t...")
> tramp-ssh-controlmaster-options tramp-use-ssh-controlmaster-options) > nil (let ((default-directory default-directory)
> (tramp-use-ssh-controlmaster-options 'suppress)
> (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o
> ControlPath=3Dnone")) (make-process :name readable-name :command = (setq
> server-info (eglot--cmd contact)) :connection-type 'pipe :coding > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format &q= uot;*%s
> stderr*" readable-name)) :file-handler t)))))
>=C2=A0 =C2=A0make-instance(eglot-lsp-server :name "EGLOT (eglot-1.= 17/(c-mode
> c-ts-mode c++-mode c++-t..." :events-buffer-config (:size 2000000=
> :format full) :notification-dispatcher (closure ((fn .
> eglot-handle-notification)) (server method params) (let
> ((eglot--cached-server server)) (apply fn server method (append params=
> nil)))) :request-dispatcher (closure ((fn . eglot-handle-request))
> (server method params) (let ((eglot--cached-server server)) (apply fn<= br> > server method (append params nil)))) :on-shutdown eglot--on-shutdown > :process (closure ((contact "/usr/bin/clangd") (server-info)=
> (readable-name . "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode > c++-t...") tramp-ssh-controlmaster-options
> tramp-use-ssh-controlmaster-options) nil (let ((default-directory
> default-directory) (tramp-use-ssh-controlmaster-options 'suppress)=
> (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o
> ControlPath=3Dnone")) (make-process :name readable-name :command = (setq
> server-info (eglot--cmd contact)) :connection-type 'pipe :coding > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format &q= uot;*%s
> stderr*" readable-name)) :file-handler t))))
>=C2=A0 =C2=A0apply(make-instance eglot-lsp-server :name "EGLOT
> (eglot-1.17/(c-mode c-ts-mode c++-mode c++-t..." :events-buffer-c= onfig
> (:size 2000000 :format full) :notification-dispatcher (closure ((fn .<= br> > eglot-handle-notification)) (server method params) (let
> ((eglot--cached-server server)) (apply fn server method (append params=
> nil)))) :request-dispatcher (closure ((fn . eglot-handle-request))
> (server method params) (let ((eglot--cached-server server)) (apply fn<= br> > server method (append params nil)))) :on-shutdown eglot--on-shutdown > (:process (closure ((contact "/usr/bin/clangd") (server-info= )
> (readable-name . "EGLOT (eglot-1.17/(c-mode c-ts-mode c++-mode > c++-t...") tramp-ssh-controlmaster-options
> tramp-use-ssh-controlmaster-options) nil (let ((default-directory
> default-directory) (tramp-use-ssh-controlmaster-options 'suppress)=
> (tramp-ssh-controlmaster-options "-o ControlMaster=3Dno -o
> ControlPath=3Dnone")) (make-process :name readable-name :command = (setq
> server-info (eglot--cmd contact)) :connection-type 'pipe :coding > 'utf-8-emacs-unix :noquery t :stderr (get-buffer-create (format &q= uot;*%s
> stderr*" readable-name)) :file-handler t)))))
>=C2=A0 =C2=A0(let* ((default-directory (project-root project)) (nicknam= e
> (project-name project)) (readable-name (format "EGLOT (%s/%s)&quo= t;
> nickname managed-modes)) server-info (contact (if (functionp contact)<= br> > (funcall contact) contact)) (initargs (cond ((keywordp (car contact))<= br> > contact) ((integerp (car (cdr contact))) (setq server-info (list
> (format "%s:%s" ... ...))) (list ':process #'(lambda= nil ...))) ((and
> (stringp (car contact)) (cl-find-if #'... contact)) (setq server-i= nfo
> (list "<inferior process>")) (list ':process
> (jsonrpc-autoport-bootstrap readable-name contact :connect-args
> '...))) ((stringp (car contact)) (let* ((probe ...) (more-initargs=
> ...) (contact ...)) (cons ':process (cons ... more-initargs))))))<= br> > (spread #'(lambda (fn) #'(lambda (server method params) (let .= ..
> ...)))) (server (apply #'make-instance class :name readable-name > :events-buffer-config eglot-events-buffer-config
> :notification-dispatcher (funcall spread #'eglot-handle-notificati= on)
> :request-dispatcher (funcall spread #'eglot-handle-request)
> :on-shutdown #'eglot--on-shutdown initargs)) (canceled nil) (tag > (make-symbol "connected-catch-tag"))) (if server-info (progn=
> (jsonrpc--debug server "Running language server: %s" (string= -join
> server-info " ")))) (let* ((v server)) (\(setf\
> eglot--saved-initargs\) initargs v)) (let* ((v server)) (\(setf\
> eglot--project\) project v)) (let* ((v server)) (\(setf\
> eglot--project-nickname\) nickname v)) (let* ((v server)) (\(setf\
> eglot--languages\) (let* ((--cl-var-- managed-modes) (m nil)
> (--cl-var-- language-ids) (l nil) (--cl-var-- nil)) (while (and (consp=
> --cl-var--) (progn (setq m ...) (consp --cl-var--))) (setq l (car
> --cl-var--)) (setq --cl-var-- (cons (cons m l) --cl-var--)) (setq
> --cl-var-- (cdr --cl-var--)) (setq --cl-var-- (cdr --cl-var--)))
> (nreverse --cl-var--)) v)) (run-hook-with-args
> 'eglot-server-initialized-hook server) (unwind-protect (condition-= case
> _quit (let ((retval (catch tag (jsonrpc-async-request server
> :initialize ... :success-fn ... :timeout eglot-connect-timeout
> :error-fn ... :timeout-fn ...) (cond ... ...)))) (cond ((consp retval)=
> (let* (...) (if ... ... ...))) ((null retval) (let nil (eglot--message=
> "Waiting in background for server `%s'" ...) nil)) (t (l= et nil
> server)))) (quit (jsonrpc-shutdown server) (setq canceled 'quit)))=
> (setq tag nil)))
>=C2=A0 =C2=A0eglot--connect((c-mode c-ts-mode c++-mode c++-ts-mode objc= -mode)
> (transient . "/tmp/eglot-1.17/") eglot-lsp-server ("/us= r/bin/clangd")
> ("c" "c" "c++" "c++" "obj= c"))
>=C2=A0 =C2=A0eglot((c-mode c-ts-mode c++-mode c++-ts-mode objc-mode) (t= ransient .
> "/tmp/eglot-1.17/") eglot-lsp-server ("/usr/bin/clangd&= quot;) ("c" "c"
> "c++" "c++" "objc") t)
>=C2=A0 =C2=A0funcall-interactively(eglot (c-mode c-ts-mode c++-mode c++= -ts-mode
> objc-mode) (transient . "/tmp/eglot-1.17/") eglot-lsp-server=
> ("/usr/bin/clangd") ("c" "c" "c++&q= uot; "c++" "objc") t)
>=C2=A0 =C2=A0command-execute(eglot record)
>=C2=A0 =C2=A0execute-extended-command(nil "eglot" "eglot= ")
>=C2=A0 =C2=A0funcall-interactively(execute-extended-command nil "e= glot" "eglot")
>=C2=A0 =C2=A0command-execute(execute-extended-command)
>
>
>
>
--00000000000063118b0622cd304b--