From unknown Mon Aug 18 18:00:25 2025 X-Loop: help-debbugs@gnu.org Subject: bug#78291: [PATCH] Add new gv place definitions Resent-From: Zach Shaftel Original-Sender: "Debbugs-submit" Resent-CC: monnier@iro.umontreal.ca, bug-gnu-emacs@gnu.org Resent-Date: Wed, 07 May 2025 04:10:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 78291 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: patch To: 78291@debbugs.gnu.org Cc: Stefan Monnier X-Debbugs-Original-To: bug-gnu-emacs@gnu.org X-Debbugs-Original-Xcc: Stefan Monnier Received: via spool by submit@debbugs.gnu.org id=B.174659097524399 (code B ref -1); Wed, 07 May 2025 04:10:02 +0000 Received: (at submit) by debbugs.gnu.org; 7 May 2025 04:09:35 +0000 Received: from localhost ([127.0.0.1]:37965 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1uCW6B-0006LS-1R for submit@debbugs.gnu.org; Wed, 07 May 2025 00:09:35 -0400 Received: from lists.gnu.org ([2001:470:142::17]:59910) by debbugs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.84_2) (envelope-from ) id 1uCViq-0004z9-QC for submit@debbugs.gnu.org; Tue, 06 May 2025 23:45:29 -0400 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 1uCVik-0002km-Vi for bug-gnu-emacs@gnu.org; Tue, 06 May 2025 23:45:23 -0400 Received: from smtp.forwardemail.net ([149.28.215.223]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1uCVii-0008Cp-QO for bug-gnu-emacs@gnu.org; Tue, 06 May 2025 23:45:22 -0400 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=shaf.tel; h=Content-Type: MIME-Version: Message-ID: Date: Subject: To: From; q=dns/txt; s=fe-acc5b42812; t=1746589516; bh=GILFXU5MELcDCp9SDpQNBU3ZIjd13aegl6Ohob/XWpQ=; b=bbkEanjWhPc8snzP1whsC2v6S2pSqHfP5lXNTi464IuvTJe/t86ixNptahC/dkSIJauk0ZgFd hl2KzjAQdr9vA1i9SA7naWRqSOCW9CHws7BDXnDhPxjZZX+bDmECv2H5Buk8RANvA/WkyGxop16 AXqin7p3aQTSORM6dTeGFBE= X-Forward-Email-ID: 681ad74ab0281deddfb7514b X-Forward-Email-Sender: rfc822; zach@shaf.tel, smtp.forwardemail.net, 149.28.215.223 X-Forward-Email-Version: 1.0.2 X-Forward-Email-Website: https://forwardemail.net X-Complaints-To: abuse@forwardemail.net X-Report-Abuse: abuse@forwardemail.net X-Report-Abuse-To: abuse@forwardemail.net From: Zach Shaftel User-Agent: mu4e 1.12.9; emacs 31.0.50 Date: Tue, 06 May 2025 23:45:10 -0400 Message-ID: <87ikmdcce1.fsf@shaf.tel> MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Received-SPF: pass client-ip=149.28.215.223; envelope-from=SRS0=4862=XX=shaf.tel=zach@fe-bounces.shaf.tel; helo=smtp.forwardemail.net X-Spam_score_int: -20 X-Spam_score: -2.1 X-Spam_bar: -- X-Spam_report: (-2.1 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1, RCVD_IN_VALIDITY_RPBL_BLOCKED=0.001, RCVD_IN_VALIDITY_SAFE_BLOCKED=0.001, SPF_HELO_PASS=-0.001, SPF_PASS=-0.001 autolearn=ham autolearn_force=no X-Spam_action: no action X-Spam-Score: 0.9 (/) X-Mailman-Approved-At: Wed, 07 May 2025 00:09:34 -0400 X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -0.1 (/) --=-=-= Content-Type: text/plain Tags: patch just a few simple gv definitions. also fixed the return on the `terminal-parameter' gv, since `set-terminal-parameter' returns the previous value of the parameter instead of the new one. In GNU Emacs 31.0.50 (build 3, x86_64-pc-linux-gnu, GTK+ Version 3.24.49, cairo version 1.18.4) of 2025-04-30 built on bigbox Repository revision: dd5ae0f3ba56e762ae1265b0cb0fe9f2a28281ec Repository branch: master System Description: Arch Linux Configured using: 'configure --with-modules --without-xwidgets --with-native-compilation --with-tree-sitter --without-gsettings --without-gconf --without-gpm --with-pgtk --without-compress-install 'CFLAGS=-mtune=native -march=native -O2 -g'' --=-=-= Content-Type: text/patch Content-Disposition: attachment; filename=0001-Add-new-gv-place-definitions.patch >From de63c30a0e239817c48698c1fc7f5a793620cdcf Mon Sep 17 00:00:00 2001 From: Zach Shaftel Date: Tue, 6 May 2025 22:07:41 -0400 Subject: [PATCH] Add new gv place definitions * lisp/emacs-lisp/gv.el (char-table-extra-slot, char-table-parent) (default-toplevel-value, marker-insertion-type, process-plist) (process-query-on-exit-flag, process-thread, lookup-key) (window-prev-buffers, window-next-buffers, window-new-normal, font-get) (charset-plist, get-charset-property): Add gv-setters. (terminal-parameter): Fix the return value. --- lisp/emacs-lisp/gv.el | 17 ++++++++++++++++- 1 file changed, 16 insertions(+), 1 deletion(-) diff --git a/lisp/emacs-lisp/gv.el b/lisp/emacs-lisp/gv.el index 6c949f1016b..1e540926e4a 100644 --- a/lisp/emacs-lisp/gv.el +++ b/lisp/emacs-lisp/gv.el @@ -367,6 +367,8 @@ 'gv-place (gv-define-simple-setter aref aset) (gv-define-simple-setter char-table-range set-char-table-range) +(gv-define-simple-setter char-table-extra-slot set-char-table-extra-slot) +(gv-define-simple-setter char-table-parent set-char-table-parent) (gv-define-simple-setter car setcar) (gv-define-simple-setter cdr setcdr) ;; FIXME: add compiler-macros for `cXXr' instead! @@ -400,10 +402,12 @@ symbol-value ;;; Elisp-specific generalized variables. (gv-define-simple-setter default-value set-default) +(gv-define-simple-setter default-toplevel-value set-default-toplevel-value t) (gv-define-simple-setter frame-parameter set-frame-parameter 'fix) -(gv-define-simple-setter terminal-parameter set-terminal-parameter) +(gv-define-simple-setter terminal-parameter set-terminal-parameter t) (gv-define-simple-setter keymap-parent set-keymap-parent) (gv-define-simple-setter match-data set-match-data 'fix) +(gv-define-simple-setter marker-insertion-type set-marker-insertion-type) (gv-define-simple-setter overlay-get overlay-put) (gv-define-setter overlay-start (store ov) (macroexp-let2 nil store store @@ -415,6 +419,9 @@ process-buffer (gv-define-simple-setter process-filter set-process-filter) (gv-define-simple-setter process-sentinel set-process-sentinel) (gv-define-simple-setter process-get process-put 'fix) +(gv-define-simple-setter process-plist set-process-plist) +(gv-define-simple-setter process-query-on-exit-flag set-process-query-on-exit-flag) +(gv-define-simple-setter process-thread set-process-thread) (gv-define-simple-setter window-parameter set-window-parameter) (gv-define-setter window-buffer (v &optional w) (macroexp-let2 nil v v @@ -427,6 +434,14 @@ window-dedicated-p (gv-define-setter window-hscroll (v &optional w) `(set-window-hscroll ,w ,v)) (gv-define-setter window-point (v &optional w) `(set-window-point ,w ,v)) (gv-define-setter window-start (v &optional w) `(set-window-start ,w ,v)) +(gv-define-setter window-prev-buffers (v &optional w) `(set-window-prev-buffers ,w ,v)) +(gv-define-setter window-next-buffers (v &optional w) `(set-window-next-buffers ,w ,v)) +(gv-define-setter window-new-normal (v &optional w) `(set-window-new-normal ,w ,v)) +(gv-define-simple-setter font-get font-put) +(gv-define-simple-setter charset-plist set-charset-plist) +(gv-define-simple-setter get-charset-property put-charset-property t) +(gv-define-setter lookup-key (val keymap key &optional _accept-default) + `(define-key ,keymap ,key ,val)) (gv-define-setter buffer-local-value (val var buf) (macroexp-let2 nil v val -- 2.49.0 --=-=-=-- From unknown Mon Aug 18 18:00:25 2025 X-Loop: help-debbugs@gnu.org Subject: bug#78291: [PATCH] Add new gv place definitions Resent-From: Stefan Monnier Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Wed, 07 May 2025 14:47:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 78291 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: patch To: Zach Shaftel Cc: 78291@debbugs.gnu.org Received: via spool by 78291-submit@debbugs.gnu.org id=B78291.174662920230845 (code B ref 78291); Wed, 07 May 2025 14:47:01 +0000 Received: (at 78291) by debbugs.gnu.org; 7 May 2025 14:46:42 +0000 Received: from localhost ([127.0.0.1]:45411 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1uCg2k-00081Q-50 for submit@debbugs.gnu.org; Wed, 07 May 2025 10:46:42 -0400 Received: from mailscanner.iro.umontreal.ca ([132.204.25.50]:32806) by debbugs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.84_2) (envelope-from ) id 1uCg2i-00081C-Du for 78291@debbugs.gnu.org; Wed, 07 May 2025 10:46:41 -0400 Received: from pmg1.iro.umontreal.ca (localhost.localdomain [127.0.0.1]) by pmg1.iro.umontreal.ca (Proxmox) with ESMTP id 39AB010013E; Wed, 7 May 2025 10:46:33 -0400 (EDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=iro.umontreal.ca; s=mail; t=1746629192; bh=RVNI2c2okfsrpfyYDO7nr3a1wATeZzKbmtGTZcNnmOc=; h=From:To:Cc:Subject:In-Reply-To:References:Date:From; b=BqRL8M8Y7E8dHI3d+6UuFDTA95r1UnHWuvgLNcb9pQXN2yMPSkKm8AMkMIVxLJkwD osYkkC9jAGvzSwU3ziEq/4QomycXfG2mL35aIrqmGAnZjFnQn+z1qGfp0n8AWBpnL0 Xf5Ux/vaZAR5OsyotSxZAhFfLY1uhVGWX6kikdzgO+avGdqoM6GqSiUdUJj7gOKfLd /wd0p5EoJXW0tVAvdSD0B3hcsCXuApu56RbBj24e4fgM9X6qWhAo5PQzxdkMfewsIU f3rSR54GftDu5OsJtCGnb4pvvD3YIhUVpnTAK55wdpvl/AW/j3qtHvefwWm4QIKy4W Cx7zD9SNv2ddg== Received: from mail01.iro.umontreal.ca (unknown [172.31.2.1]) by pmg1.iro.umontreal.ca (Proxmox) with ESMTP id EAF2A100029; Wed, 7 May 2025 10:46:31 -0400 (EDT) Received: from lechazo (lechon.iro.umontreal.ca [132.204.27.242]) by mail01.iro.umontreal.ca (Postfix) with ESMTPSA id DAF9A1201A9; Wed, 7 May 2025 10:46:31 -0400 (EDT) From: Stefan Monnier In-Reply-To: <87ikmdcce1.fsf@shaf.tel> Message-ID: References: <87ikmdcce1.fsf@shaf.tel> Date: Wed, 07 May 2025 10:46:31 -0400 User-Agent: Gnus/5.13 (Gnus v5.13) MIME-Version: 1.0 Content-Type: text/plain X-SPAM-INFO: Spam detection results: 0 ALL_TRUSTED -1 Passed through trusted hosts only via SMTP AWL 0.101 Adjusted score from AWL reputation of From: address BAYES_00 -1.9 Bayes spam probability is 0 to 1% DKIM_SIGNED 0.1 Message has a DKIM or DK signature, not necessarily valid DKIM_VALID -0.1 Message has at least one valid DKIM or DK signature DKIM_VALID_AU -0.1 Message has a valid DKIM or DK signature from author's domain DKIM_VALID_EF -0.1 Message has a valid DKIM or DK signature from envelope-from domain X-SPAM-LEVEL: X-Spam-Score: -2.3 (--) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -3.3 (---) > --- a/lisp/emacs-lisp/gv.el > +++ b/lisp/emacs-lisp/gv.el > @@ -367,6 +367,8 @@ 'gv-place > > (gv-define-simple-setter aref aset) > (gv-define-simple-setter char-table-range set-char-table-range) > +(gv-define-simple-setter char-table-extra-slot set-char-table-extra-slot) > +(gv-define-simple-setter char-table-parent set-char-table-parent) > (gv-define-simple-setter car setcar) > (gv-define-simple-setter cdr setcdr) > ;; FIXME: add compiler-macros for `cXXr' instead! > @@ -400,10 +402,12 @@ symbol-value > ;;; Elisp-specific generalized variables. > > (gv-define-simple-setter default-value set-default) > +(gv-define-simple-setter default-toplevel-value set-default-toplevel-value t) > (gv-define-simple-setter frame-parameter set-frame-parameter 'fix) > -(gv-define-simple-setter terminal-parameter set-terminal-parameter) > +(gv-define-simple-setter terminal-parameter set-terminal-parameter t) > (gv-define-simple-setter keymap-parent set-keymap-parent) > (gv-define-simple-setter match-data set-match-data 'fix) > +(gv-define-simple-setter marker-insertion-type set-marker-insertion-type) > (gv-define-simple-setter overlay-get overlay-put) > (gv-define-setter overlay-start (store ov) > (macroexp-let2 nil store store > @@ -415,6 +419,9 @@ process-buffer > (gv-define-simple-setter process-filter set-process-filter) > (gv-define-simple-setter process-sentinel set-process-sentinel) > (gv-define-simple-setter process-get process-put 'fix) > +(gv-define-simple-setter process-plist set-process-plist) > +(gv-define-simple-setter process-query-on-exit-flag set-process-query-on-exit-flag) > +(gv-define-simple-setter process-thread set-process-thread) > (gv-define-simple-setter window-parameter set-window-parameter) > (gv-define-setter window-buffer (v &optional w) > (macroexp-let2 nil v v LGTM, thanks. > @@ -427,6 +434,14 @@ window-dedicated-p > (gv-define-setter window-hscroll (v &optional w) `(set-window-hscroll ,w ,v)) > (gv-define-setter window-point (v &optional w) `(set-window-point ,w ,v)) > (gv-define-setter window-start (v &optional w) `(set-window-start ,w ,v)) > +(gv-define-setter window-prev-buffers (v &optional w) `(set-window-prev-buffers ,w ,v)) > +(gv-define-setter window-next-buffers (v &optional w) `(set-window-next-buffers ,w ,v)) > +(gv-define-setter window-new-normal (v &optional w) `(set-window-new-normal ,w ,v)) > +(gv-define-simple-setter font-get font-put) > +(gv-define-simple-setter charset-plist set-charset-plist) > +(gv-define-simple-setter get-charset-property put-charset-property t) > +(gv-define-setter lookup-key (val keymap key &optional _accept-default) > + `(define-key ,keymap ,key ,val)) I'd have to check some of them, but at least the last doesn't look like a good idea to me, because they don't quite match. E.g. if you (define-key MAP KEY '(menu-item TEXT CMD)) The corresponding `lookup-key` will return just CMD rather than (menu-item TEXT CMD). Stefan From unknown Mon Aug 18 18:00:25 2025 X-Loop: help-debbugs@gnu.org Subject: bug#78291: [PATCH] Add new gv place definitions Resent-From: Zach Shaftel Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Tue, 13 May 2025 17:39:03 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 78291 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: patch To: Stefan Monnier Cc: 78291@debbugs.gnu.org Received: via spool by 78291-submit@debbugs.gnu.org id=B78291.174715792923694 (code B ref 78291); Tue, 13 May 2025 17:39:03 +0000 Received: (at 78291) by debbugs.gnu.org; 13 May 2025 17:38:49 +0000 Received: from localhost ([127.0.0.1]:33184 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1uEtaa-0006A1-T9 for submit@debbugs.gnu.org; Tue, 13 May 2025 13:38:49 -0400 Received: from smtp.forwardemail.net ([149.28.215.223]:7253) by debbugs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.84_2) (envelope-from ) id 1uEtaX-00069c-Po for 78291@debbugs.gnu.org; Tue, 13 May 2025 13:38:46 -0400 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=shaf.tel; h=Content-Type: MIME-Version: Message-ID: Date: References: In-Reply-To: Subject: Cc: To: From; q=dns/txt; s=fe-acc5b42812; t=1747157920; bh=fEjrDcYa6j6UvgPuo03oUg5J2d5Yejbgfe7BKN+UGiY=; b=C52AfoIt0Y5vkj/Ez2T2EK5Poj70Skz+p4dXqeKT8Z+qaZfbQzp365KbAAKUqOXsZPZFDsVvV XsgKYCA6tklY0rURaWP+ioWVBRrqZvDBCeyRrf83w200xnHX5abqQCMsq4m/K8WOrf7aVjp+AqH P8KiOVBr/Il+KlkU5KnAk+I= X-Forward-Email-ID: 6823839d8f602e87dfe50ecb X-Forward-Email-Sender: rfc822; zach@shaf.tel, smtp.forwardemail.net, 149.28.215.223 X-Forward-Email-Version: 1.0.2 X-Forward-Email-Website: https://forwardemail.net X-Complaints-To: abuse@forwardemail.net X-Report-Abuse: abuse@forwardemail.net X-Report-Abuse-To: abuse@forwardemail.net From: Zach Shaftel In-Reply-To: References: <87ikmdcce1.fsf@shaf.tel> User-Agent: mu4e 1.12.9; emacs 31.0.50 Date: Tue, 13 May 2025 13:38:33 -0400 Message-ID: <87jz6kxvfq.fsf@shaf.tel> MIME-Version: 1.0 Content-Type: text/plain X-Spam-Score: 0.0 (/) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.0 (-) >> @@ -427,6 +434,14 @@ window-dedicated-p >> (gv-define-setter window-hscroll (v &optional w) `(set-window-hscroll ,w ,v)) >> (gv-define-setter window-point (v &optional w) `(set-window-point ,w ,v)) >> (gv-define-setter window-start (v &optional w) `(set-window-start ,w ,v)) >> +(gv-define-setter window-prev-buffers (v &optional w) `(set-window-prev-buffers ,w ,v)) >> +(gv-define-setter window-next-buffers (v &optional w) `(set-window-next-buffers ,w ,v)) >> +(gv-define-setter window-new-normal (v &optional w) `(set-window-new-normal ,w ,v)) >> +(gv-define-simple-setter font-get font-put) >> +(gv-define-simple-setter charset-plist set-charset-plist) >> +(gv-define-simple-setter get-charset-property put-charset-property t) >> +(gv-define-setter lookup-key (val keymap key &optional _accept-default) >> + `(define-key ,keymap ,key ,val)) > > I'd have to check some of them, but at least the last doesn't look like > a good idea to me, because they don't quite match. E.g. if you > > (define-key MAP KEY '(menu-item TEXT CMD)) > > The corresponding `lookup-key` will return just CMD rather than > (menu-item TEXT CMD). > > > Stefan yeah I knew that one was questionable, and considering the keymap-* functions are now the standard interface to key bindings it probably wouldn't get much use anyway. as far as i could tell, the other setters all accept the same values that the getter would return, but there may be other idiosyncrasies i'm not aware of. let me know what ought to be removed and i can submit a new patch. From unknown Mon Aug 18 18:00:25 2025 X-Loop: help-debbugs@gnu.org Subject: bug#78291: [PATCH] Add new gv place definitions Resent-From: Eli Zaretskii Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sat, 24 May 2025 09:10:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 78291 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: patch To: monnier@iro.umontreal.ca, Zach Shaftel Cc: 78291@debbugs.gnu.org Received: via spool by 78291-submit@debbugs.gnu.org id=B78291.174807776729905 (code B ref 78291); Sat, 24 May 2025 09:10:02 +0000 Received: (at 78291) by debbugs.gnu.org; 24 May 2025 09:09:27 +0000 Received: from localhost ([127.0.0.1]:56992 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1uIksh-0007mH-EH for submit@debbugs.gnu.org; Sat, 24 May 2025 05:09:27 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:54762) by debbugs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.84_2) (envelope-from ) id 1uIksf-0007lp-K5 for 78291@debbugs.gnu.org; Sat, 24 May 2025 05:09:26 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1uIksZ-0000wr-P9; Sat, 24 May 2025 05:09:19 -0400 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=gnu.org; s=fencepost-gnu-org; h=References:Subject:In-Reply-To:To:From:Date: mime-version; bh=TuoZv/tRPZYs4P4HyZPwyhWYZ3sSA8+wBWyvxandq3s=; b=iOaLEsirwM4i +b/l10Xr4GcmlypciGkXkaurgLtp8nM3p1p7WUxLAl7nK4SsgP1340BEU2nUwBfalhzUYkzEZEcQW qHSg7q9HYmdVSIUyJHkWWcgj1Q97Qoxn2Hq1BqzGkbYP7DC2yG2IbLCIhPaDgJMFGjg9Ji+VLgZw5 02Iyej8BWgzE10THj8NvGDYMxRn8E/MeX97RnyYoBiHUHfweQ8afYEOpSu8B0wzhXc8KG/0UtSw76 MRhMxUcXxKeWlnFryPpBHsB/UxwU+D5RK4MdID3ILdEbpcMCl7w+DkxpbqeOTNLSCPwt0fLEhRIZi Elm9jQtILbcZo6297Yn1Sw==; Date: Sat, 24 May 2025 12:09:17 +0300 Message-Id: <86tt5a1iki.fsf@gnu.org> From: Eli Zaretskii In-Reply-To: <87jz6kxvfq.fsf@shaf.tel> (bug-gnu-emacs@gnu.org) References: <87ikmdcce1.fsf@shaf.tel> <87jz6kxvfq.fsf@shaf.tel> X-Spam-Score: -2.3 (--) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -3.3 (---) Ping! Can we please make some progress with this? > Cc: 78291@debbugs.gnu.org > Date: Tue, 13 May 2025 13:38:33 -0400 > From: Zach Shaftel via "Bug reports for GNU Emacs, > the Swiss army knife of text editors" > > >> @@ -427,6 +434,14 @@ window-dedicated-p > >> (gv-define-setter window-hscroll (v &optional w) `(set-window-hscroll ,w ,v)) > >> (gv-define-setter window-point (v &optional w) `(set-window-point ,w ,v)) > >> (gv-define-setter window-start (v &optional w) `(set-window-start ,w ,v)) > >> +(gv-define-setter window-prev-buffers (v &optional w) `(set-window-prev-buffers ,w ,v)) > >> +(gv-define-setter window-next-buffers (v &optional w) `(set-window-next-buffers ,w ,v)) > >> +(gv-define-setter window-new-normal (v &optional w) `(set-window-new-normal ,w ,v)) > >> +(gv-define-simple-setter font-get font-put) > >> +(gv-define-simple-setter charset-plist set-charset-plist) > >> +(gv-define-simple-setter get-charset-property put-charset-property t) > >> +(gv-define-setter lookup-key (val keymap key &optional _accept-default) > >> + `(define-key ,keymap ,key ,val)) > > > > I'd have to check some of them, but at least the last doesn't look like > > a good idea to me, because they don't quite match. E.g. if you > > > > (define-key MAP KEY '(menu-item TEXT CMD)) > > > > The corresponding `lookup-key` will return just CMD rather than > > (menu-item TEXT CMD). > > > > > > Stefan > > yeah I knew that one was questionable, and considering the keymap-* > functions are now the standard interface to key bindings it probably > wouldn't get much use anyway. as far as i could tell, the other setters > all accept the same values that the getter would return, but there may > be other idiosyncrasies i'm not aware of. let me know what ought to be > removed and i can submit a new patch. > > > > From unknown Mon Aug 18 18:00:25 2025 X-Loop: help-debbugs@gnu.org Subject: bug#78291: [PATCH] Add new gv place definitions Resent-From: Zach Shaftel Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sun, 25 May 2025 05:29:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 78291 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: patch To: Eli Zaretskii Cc: 78291@debbugs.gnu.org, monnier@iro.umontreal.ca Received: via spool by 78291-submit@debbugs.gnu.org id=B78291.17481508985375 (code B ref 78291); Sun, 25 May 2025 05:29:02 +0000 Received: (at 78291) by debbugs.gnu.org; 25 May 2025 05:28:18 +0000 Received: from localhost ([127.0.0.1]:40740 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1uJ3uD-0001Oc-BB for submit@debbugs.gnu.org; Sun, 25 May 2025 01:28:17 -0400 Received: from smtp.forwardemail.net ([149.28.215.223]:14431) by debbugs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.84_2) (envelope-from ) id 1uJ3u7-0001Nx-Mz for 78291@debbugs.gnu.org; Sun, 25 May 2025 01:28:12 -0400 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=shaf.tel; h=Content-Type: MIME-Version: Message-ID: Date: References: In-Reply-To: Subject: Cc: To: From; q=dns/txt; s=fe-acc5b42812; t=1748150885; bh=PY1GzNkei1bEhkXsM22yX28VHLDtvSIB47dACBVzi8E=; b=UADfPUuNRDJcVq95PxLkNuvkWRHd6eXYRn8graaRKbhoHHOGc1LGUxCqwpQpLdIyh14rfCcBJ IssL7/7tICBN94P09gtZ74Fnj6xCxCKi04zC2Tveb63ak2yLm0JVfbqU2vSlbiPPfx7UNY7AXxZ 2FVdwPc0VY58L2SZr0lnFtM= X-Forward-Email-ID: 6832aa60381421ad6cb1a82f X-Forward-Email-Sender: rfc822; zach@shaf.tel, smtp.forwardemail.net, 149.28.215.223 X-Forward-Email-Version: 1.0.3 X-Forward-Email-Website: https://forwardemail.net X-Complaints-To: abuse@forwardemail.net X-Report-Abuse: abuse@forwardemail.net X-Report-Abuse-To: abuse@forwardemail.net From: Zach Shaftel In-Reply-To: <86tt5a1iki.fsf@gnu.org> References: <87ikmdcce1.fsf@shaf.tel> <87jz6kxvfq.fsf@shaf.tel> <86tt5a1iki.fsf@gnu.org> User-Agent: mu4e 1.12.9; emacs 31.0.50 Date: Sun, 25 May 2025 01:27:56 -0400 Message-ID: <875xhp6yzn.fsf@shaf.tel> MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-Spam-Score: 0.0 (/) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.0 (-) --=-=-= Content-Type: text/plain an updated patch without the `lookup-key' definition is attached. --=-=-= Content-Type: text/patch Content-Disposition: attachment; filename=0001-Add-new-gv-place-definitions.patch Content-Description: new patch >From 6a28665d167af250521bfe64b63bc41dc40b19b2 Mon Sep 17 00:00:00 2001 From: Zach Shaftel Date: Sun, 25 May 2025 01:11:27 -0400 Subject: [PATCH] Add new gv place definitions * lisp/emacs-lisp/gv.el (char-table-extra-slot, char-table-parent) (default-toplevel-value, marker-insertion-type, process-plist) (process-query-on-exit-flag, process-thread, lookup-key) (window-prev-buffers, window-next-buffers, window-new-normal, font-get) (charset-plist, get-charset-property): Add gv-setters. (terminal-parameter): Fix the return value. --- lisp/emacs-lisp/gv.el | 15 ++++++++++++++- 1 file changed, 14 insertions(+), 1 deletion(-) diff --git a/lisp/emacs-lisp/gv.el b/lisp/emacs-lisp/gv.el index 6c949f1016b..b6c1f2c9f9f 100644 --- a/lisp/emacs-lisp/gv.el +++ b/lisp/emacs-lisp/gv.el @@ -367,6 +367,8 @@ 'gv-place (gv-define-simple-setter aref aset) (gv-define-simple-setter char-table-range set-char-table-range) +(gv-define-simple-setter char-table-extra-slot set-char-table-extra-slot) +(gv-define-simple-setter char-table-parent set-char-table-parent) (gv-define-simple-setter car setcar) (gv-define-simple-setter cdr setcdr) ;; FIXME: add compiler-macros for `cXXr' instead! @@ -400,10 +402,12 @@ symbol-value ;;; Elisp-specific generalized variables. (gv-define-simple-setter default-value set-default) +(gv-define-simple-setter default-toplevel-value set-default-toplevel-value t) (gv-define-simple-setter frame-parameter set-frame-parameter 'fix) -(gv-define-simple-setter terminal-parameter set-terminal-parameter) +(gv-define-simple-setter terminal-parameter set-terminal-parameter t) (gv-define-simple-setter keymap-parent set-keymap-parent) (gv-define-simple-setter match-data set-match-data 'fix) +(gv-define-simple-setter marker-insertion-type set-marker-insertion-type) (gv-define-simple-setter overlay-get overlay-put) (gv-define-setter overlay-start (store ov) (macroexp-let2 nil store store @@ -415,6 +419,9 @@ process-buffer (gv-define-simple-setter process-filter set-process-filter) (gv-define-simple-setter process-sentinel set-process-sentinel) (gv-define-simple-setter process-get process-put 'fix) +(gv-define-simple-setter process-plist set-process-plist) +(gv-define-simple-setter process-query-on-exit-flag set-process-query-on-exit-flag) +(gv-define-simple-setter process-thread set-process-thread) (gv-define-simple-setter window-parameter set-window-parameter) (gv-define-setter window-buffer (v &optional w) (macroexp-let2 nil v v @@ -427,6 +434,12 @@ window-dedicated-p (gv-define-setter window-hscroll (v &optional w) `(set-window-hscroll ,w ,v)) (gv-define-setter window-point (v &optional w) `(set-window-point ,w ,v)) (gv-define-setter window-start (v &optional w) `(set-window-start ,w ,v)) +(gv-define-setter window-prev-buffers (v &optional w) `(set-window-prev-buffers ,w ,v)) +(gv-define-setter window-next-buffers (v &optional w) `(set-window-next-buffers ,w ,v)) +(gv-define-setter window-new-normal (v &optional w) `(set-window-new-normal ,w ,v)) +(gv-define-simple-setter font-get font-put) +(gv-define-simple-setter charset-plist set-charset-plist) +(gv-define-simple-setter get-charset-property put-charset-property t) (gv-define-setter buffer-local-value (val var buf) (macroexp-let2 nil v val -- 2.49.0 --=-=-= Content-Type: text/plain Eli Zaretskii writes: > Ping! Can we please make some progress with this? > >> Cc: 78291@debbugs.gnu.org >> Date: Tue, 13 May 2025 13:38:33 -0400 >> From: Zach Shaftel via "Bug reports for GNU Emacs, >> the Swiss army knife of text editors" >> >> >> @@ -427,6 +434,14 @@ window-dedicated-p >> >> (gv-define-setter window-hscroll (v &optional w) `(set-window-hscroll ,w ,v)) >> >> (gv-define-setter window-point (v &optional w) `(set-window-point ,w ,v)) >> >> (gv-define-setter window-start (v &optional w) `(set-window-start ,w ,v)) >> >> +(gv-define-setter window-prev-buffers (v &optional w) `(set-window-prev-buffers ,w ,v)) >> >> +(gv-define-setter window-next-buffers (v &optional w) `(set-window-next-buffers ,w ,v)) >> >> +(gv-define-setter window-new-normal (v &optional w) `(set-window-new-normal ,w ,v)) >> >> +(gv-define-simple-setter font-get font-put) >> >> +(gv-define-simple-setter charset-plist set-charset-plist) >> >> +(gv-define-simple-setter get-charset-property put-charset-property t) >> >> +(gv-define-setter lookup-key (val keymap key &optional _accept-default) >> >> + `(define-key ,keymap ,key ,val)) >> > >> > I'd have to check some of them, but at least the last doesn't look like >> > a good idea to me, because they don't quite match. E.g. if you >> > >> > (define-key MAP KEY '(menu-item TEXT CMD)) >> > >> > The corresponding `lookup-key` will return just CMD rather than >> > (menu-item TEXT CMD). >> > >> > >> > Stefan >> >> yeah I knew that one was questionable, and considering the keymap-* >> functions are now the standard interface to key bindings it probably >> wouldn't get much use anyway. as far as i could tell, the other setters >> all accept the same values that the getter would return, but there may >> be other idiosyncrasies i'm not aware of. let me know what ought to be >> removed and i can submit a new patch. >> >> >> >> --=-=-=-- From unknown Mon Aug 18 18:00:25 2025 X-Loop: help-debbugs@gnu.org Subject: bug#78291: [PATCH] Add new gv place definitions Resent-From: Eli Zaretskii Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sat, 07 Jun 2025 08:34:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 78291 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: patch To: monnier@iro.umontreal.ca, Zach Shaftel Cc: 78291@debbugs.gnu.org Received: via spool by 78291-submit@debbugs.gnu.org id=B78291.174928519120189 (code B ref 78291); Sat, 07 Jun 2025 08:34:01 +0000 Received: (at 78291) by debbugs.gnu.org; 7 Jun 2025 08:33:11 +0000 Received: from localhost ([127.0.0.1]:46767 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1uNozG-0005FY-TM for submit@debbugs.gnu.org; Sat, 07 Jun 2025 04:33:11 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:44334) by debbugs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.84_2) (envelope-from ) id 1uNozE-0005FF-4O for 78291@debbugs.gnu.org; Sat, 07 Jun 2025 04:33:08 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1uNoz8-0004TL-5T; Sat, 07 Jun 2025 04:33:02 -0400 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=gnu.org; s=fencepost-gnu-org; h=References:Subject:In-Reply-To:To:From:Date: mime-version; bh=6Ub9SVJ85FVoKLmwoMWqSMb2arCPL1SingpwjjoRByg=; b=o6eliP/o69g0 LYln0Qeb+4N60aPZ4WvcVy8fvmnFQdZ034kIf0aS59ocYJl3oD5jiU3K36pWsgYQuu+mIk0tyqv3m OGhTbxz8loqQawqQHc9hjfMkoL181Noi81UueCxhV33VKgO1GIBRRvE+EI6etluCqTQOamVJ7d1Si VMWBvCXT+GtWT46kiwmgt0xe1fVmaBDu5HxLNTm23scPwOBx3B+B47Qbj5FyrNvhhu80c3cJG6q7p Dgac6A0yYBwt6KvoAQJDwKcBjQk2a2EZXWUBeuFDXIXhX90oIbMu5Zn1VyH3EjMQQcsYk5uGqHIFC iqM7szuzw0hMmcO9fuCHXA==; Date: Sat, 07 Jun 2025 11:32:59 +0300 Message-Id: <864iwsj6is.fsf@gnu.org> From: Eli Zaretskii In-Reply-To: <875xhp6yzn.fsf@shaf.tel> (message from Zach Shaftel on Sun, 25 May 2025 01:27:56 -0400) References: <87ikmdcce1.fsf@shaf.tel> <87jz6kxvfq.fsf@shaf.tel> <86tt5a1iki.fsf@gnu.org> <875xhp6yzn.fsf@shaf.tel> X-Spam-Score: -2.3 (--) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -3.3 (---) > From: Zach Shaftel > Cc: monnier@iro.umontreal.ca, 78291@debbugs.gnu.org > Date: Sun, 25 May 2025 01:27:56 -0400 > > an updated patch without the `lookup-key' definition is attached. Stefan, are you okay with this updated version? From unknown Mon Aug 18 18:00:25 2025 X-Loop: help-debbugs@gnu.org Subject: bug#78291: [PATCH] Add new gv place definitions Resent-From: Eli Zaretskii Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sat, 28 Jun 2025 09:00:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 78291 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: patch To: monnier@iro.umontreal.ca Cc: 78291@debbugs.gnu.org, zach@shaf.tel Received: via spool by 78291-submit@debbugs.gnu.org id=B78291.175110114910753 (code B ref 78291); Sat, 28 Jun 2025 09:00:02 +0000 Received: (at 78291) by debbugs.gnu.org; 28 Jun 2025 08:59:09 +0000 Received: from localhost ([127.0.0.1]:47783 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1uVROu-0002nE-3c for submit@debbugs.gnu.org; Sat, 28 Jun 2025 04:59:09 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:47998) by debbugs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.84_2) (envelope-from ) id 1uVROr-0002lo-Sn for 78291@debbugs.gnu.org; Sat, 28 Jun 2025 04:59:06 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1uVROl-0002be-Iq; Sat, 28 Jun 2025 04:58:59 -0400 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=gnu.org; s=fencepost-gnu-org; h=References:Subject:In-Reply-To:To:From:Date: mime-version; bh=Xgl7lPjlw0xQXACKhiYA8efhggYGnfqE89a7y1emipA=; b=OlhdpyUndYGK v4AWxIyrNn/MWIvfcLgQQXAy8u9RjCT2DW89Sb+udD5ufIA074OLvpEwFn6RxkjCpb8K/7mBv166P 8JCQzpSYnIIeEj0WneD/K+gC7JbeSmFbP9/Ah9DAaviECRAdTnT85RF6wQzxxgH83aQq4biCjDx+f cM7fZn+Sue1SO1sbSdDnICtk16Zqra6KkZgcolIkSBxyG9kTpoVsez1sKW8rIcu7fKfsDYn6o8wZ4 nwpLYpEO91nwmWabuZvjjCaDSE2bIxPfkuBfB2IV7FenpsLmvISSOJiN1CTlJtf96ia99zEOm8soh yRsjmQiefTjGKnkrDk37hw==; Date: Sat, 28 Jun 2025 11:58:57 +0300 Message-Id: <865xgg8coe.fsf@gnu.org> From: Eli Zaretskii In-Reply-To: <864iwsj6is.fsf@gnu.org> (message from Eli Zaretskii on Sat, 07 Jun 2025 11:32:59 +0300) References: <87ikmdcce1.fsf@shaf.tel> <87jz6kxvfq.fsf@shaf.tel> <86tt5a1iki.fsf@gnu.org> <875xhp6yzn.fsf@shaf.tel> <864iwsj6is.fsf@gnu.org> X-Spam-Score: -2.3 (--) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -3.3 (---) Ping! Stefan, would you please chime in? > Cc: 78291@debbugs.gnu.org > Date: Sat, 07 Jun 2025 11:32:59 +0300 > From: Eli Zaretskii > > > From: Zach Shaftel > > Cc: monnier@iro.umontreal.ca, 78291@debbugs.gnu.org > > Date: Sun, 25 May 2025 01:27:56 -0400 > > > > an updated patch without the `lookup-key' definition is attached. > > Stefan, are you okay with this updated version? > > > > From unknown Mon Aug 18 18:00:25 2025 X-Loop: help-debbugs@gnu.org Subject: bug#78291: [PATCH] Add new gv place definitions Resent-From: Stefan Monnier Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sat, 28 Jun 2025 15:32:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 78291 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: patch To: Eli Zaretskii Cc: 78291@debbugs.gnu.org, Zach Shaftel Received: via spool by 78291-submit@debbugs.gnu.org id=B78291.175112469219013 (code B ref 78291); Sat, 28 Jun 2025 15:32:02 +0000 Received: (at 78291) by debbugs.gnu.org; 28 Jun 2025 15:31:32 +0000 Received: from localhost ([127.0.0.1]:51071 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1uVXWd-0004wW-UQ for submit@debbugs.gnu.org; Sat, 28 Jun 2025 11:31:32 -0400 Received: from mailscanner.iro.umontreal.ca ([132.204.25.50]:23326) by debbugs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.84_2) (envelope-from ) id 1uVXWb-0004vG-Ku for 78291@debbugs.gnu.org; Sat, 28 Jun 2025 11:31:30 -0400 Received: from pmg1.iro.umontreal.ca (localhost.localdomain [127.0.0.1]) by pmg1.iro.umontreal.ca (Proxmox) with ESMTP id 40CED10025E; Sat, 28 Jun 2025 11:31:23 -0400 (EDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=iro.umontreal.ca; s=mail; t=1751124678; bh=ZcvOOHsqGYV3+0tyfb8JtAW/C9K+DuWRSF2NKcW2UCw=; h=From:To:Cc:Subject:In-Reply-To:References:Date:From; b=IqeTPbG27OquwSTHgWbxCaTsrWS+K3oWED0ZSCQEFPqvBxWsQn1OUZsO47lWbn5Ly jYscoF+HA7EUzOoYbFy1vw1CzAYhwfzfXh5+uWHVRh4FUVtDffce4/TOkFnJHowyef pa3DVjRULxIh23SvTF2GN0tJZLH1tODeDMIBKTTsdYEhq8ypUFReQWNp7qFg1NBT8Y R08FoNEx0nLlLP41hFr2JfmFOqecyELbfo6c0Isov92TUUaRNNlLCVp/+RM8En0wiN CX9SH9hktXG9SZFhKgK/nrouJEawESNqPirk78ZTQ5JaP3L59cOwfHgPptU0R+uL3s MVekdQ6KIZy2g== Received: from mail01.iro.umontreal.ca (unknown [172.31.2.1]) by pmg1.iro.umontreal.ca (Proxmox) with ESMTP id 6151010002E; Sat, 28 Jun 2025 11:31:18 -0400 (EDT) Received: from pastel (unknown [104.247.225.139]) by mail01.iro.umontreal.ca (Postfix) with ESMTPSA id 30F2812068A; Sat, 28 Jun 2025 11:31:18 -0400 (EDT) From: Stefan Monnier In-Reply-To: <864iwsj6is.fsf@gnu.org> Message-ID: References: <87ikmdcce1.fsf@shaf.tel> <87jz6kxvfq.fsf@shaf.tel> <86tt5a1iki.fsf@gnu.org> <875xhp6yzn.fsf@shaf.tel> <864iwsj6is.fsf@gnu.org> Date: Sat, 28 Jun 2025 11:31:17 -0400 User-Agent: Gnus/5.13 (Gnus v5.13) MIME-Version: 1.0 Content-Type: text/plain X-SPAM-INFO: Spam detection results: 0 ALL_TRUSTED -1 Passed through trusted hosts only via SMTP AWL -0.309 Adjusted score from AWL reputation of From: address BAYES_00 -1.9 Bayes spam probability is 0 to 1% DKIM_SIGNED 0.1 Message has a DKIM or DK signature, not necessarily valid DKIM_VALID -0.1 Message has at least one valid DKIM or DK signature DKIM_VALID_AU -0.1 Message has a valid DKIM or DK signature from author's domain DKIM_VALID_EF -0.1 Message has a valid DKIM or DK signature from envelope-from domain X-SPAM-LEVEL: X-Spam-Score: -2.3 (--) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -3.3 (---) >> an updated patch without the `lookup-key' definition is attached. > Stefan, are you okay with this updated version? It's OK, yes. Stefan From unknown Mon Aug 18 18:00:25 2025 MIME-Version: 1.0 X-Mailer: MIME-tools 5.505 (Entity 5.505) X-Loop: help-debbugs@gnu.org From: help-debbugs@gnu.org (GNU bug Tracking System) To: Zach Shaftel Subject: bug#78291: closed (Re: bug#78291: [PATCH] Add new gv place definitions) Message-ID: References: <86ikkf5fu0.fsf@gnu.org> <87ikmdcce1.fsf@shaf.tel> X-Gnu-PR-Message: they-closed 78291 X-Gnu-PR-Package: emacs X-Gnu-PR-Keywords: patch Reply-To: 78291@debbugs.gnu.org Date: Sun, 29 Jun 2025 04:32:03 +0000 Content-Type: multipart/mixed; boundary="----------=_1751171523-4713-1" This is a multi-part message in MIME format... ------------=_1751171523-4713-1 Content-Disposition: inline Content-Transfer-Encoding: quoted-printable Content-Type: text/plain; charset="utf-8" Your bug report #78291: [PATCH] Add new gv place definitions which was filed against the emacs package, has been closed. The explanation is attached below, along with your original report. If you require more details, please reply to 78291@debbugs.gnu.org. --=20 78291: https://debbugs.gnu.org/cgi/bugreport.cgi?bug=3D78291 GNU Bug Tracking System Contact help-debbugs@gnu.org with problems ------------=_1751171523-4713-1 Content-Type: message/rfc822 Content-Disposition: inline Content-Transfer-Encoding: 7bit Received: (at 78291-done) by debbugs.gnu.org; 29 Jun 2025 04:31:31 +0000 Received: from localhost ([127.0.0.1]:53937 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1uVjhS-0001AN-1B for submit@debbugs.gnu.org; Sun, 29 Jun 2025 00:31:30 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:39910) by debbugs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.84_2) (envelope-from ) id 1uVjhP-00019S-KC for 78291-done@debbugs.gnu.org; Sun, 29 Jun 2025 00:31:28 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1uVjhJ-0006nk-N9; Sun, 29 Jun 2025 00:31:21 -0400 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=gnu.org; s=fencepost-gnu-org; h=References:Subject:In-Reply-To:To:From:Date: mime-version; bh=qACD2xJpilye2Jpz6/vZC48ovcTh9/+7mA7hVNCGol0=; b=FPfKLK/20q3e Ya+3zU/66qj9ZqyVUVgcHM8MNSJzHVyVUTdabxdiGCmyuM64KXS3nWoIZwHulclZIP7VbXQZrPyKU dotwzlsDnNMBljAVpXIIR5XwHw6703NLyUss0KoYHoczE90eUGJmjEGstdxxLiTwSFPcshUB/CMLb m6bFCUPFEoxZVK+qIP0JyrMxTdBkAUOnAFqQCGPvmm4ygq4SopCiDYSWi9sDgYJD+PKnArKxrVNwF pi8f6NWNPrZySA0wpxk/POJj9lleZl1rp3FONAlnWSE90JbJJMHPUdmbqYuCIe6I+9L/JgOvMqUNW CftzTeG/p3IJXNshM9fPwg==; Date: Sun, 29 Jun 2025 07:31:19 +0300 Message-Id: <86ikkf5fu0.fsf@gnu.org> From: Eli Zaretskii To: Stefan Monnier In-Reply-To: (message from Stefan Monnier on Sat, 28 Jun 2025 11:31:17 -0400) Subject: Re: bug#78291: [PATCH] Add new gv place definitions References: <87ikmdcce1.fsf@shaf.tel> <87jz6kxvfq.fsf@shaf.tel> <86tt5a1iki.fsf@gnu.org> <875xhp6yzn.fsf@shaf.tel> <864iwsj6is.fsf@gnu.org> X-Spam-Score: -2.3 (--) X-Debbugs-Envelope-To: 78291-done Cc: 78291-done@debbugs.gnu.org, zach@shaf.tel X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -3.3 (---) > From: Stefan Monnier > Cc: Zach Shaftel , 78291@debbugs.gnu.org > Date: Sat, 28 Jun 2025 11:31:17 -0400 > > >> an updated patch without the `lookup-key' definition is attached. > > Stefan, are you okay with this updated version? > > It's OK, yes. Thanks, now installed on master, and closing the bug. ------------=_1751171523-4713-1 Content-Type: message/rfc822 Content-Disposition: inline Content-Transfer-Encoding: 7bit Received: (at submit) by debbugs.gnu.org; 7 May 2025 04:09:35 +0000 Received: from localhost ([127.0.0.1]:37965 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1uCW6B-0006LS-1R for submit@debbugs.gnu.org; Wed, 07 May 2025 00:09:35 -0400 Received: from lists.gnu.org ([2001:470:142::17]:59910) by debbugs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.84_2) (envelope-from ) id 1uCViq-0004z9-QC for submit@debbugs.gnu.org; Tue, 06 May 2025 23:45:29 -0400 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 1uCVik-0002km-Vi for bug-gnu-emacs@gnu.org; Tue, 06 May 2025 23:45:23 -0400 Received: from smtp.forwardemail.net ([149.28.215.223]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1uCVii-0008Cp-QO for bug-gnu-emacs@gnu.org; Tue, 06 May 2025 23:45:22 -0400 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=shaf.tel; h=Content-Type: MIME-Version: Message-ID: Date: Subject: To: From; q=dns/txt; s=fe-acc5b42812; t=1746589516; bh=GILFXU5MELcDCp9SDpQNBU3ZIjd13aegl6Ohob/XWpQ=; b=bbkEanjWhPc8snzP1whsC2v6S2pSqHfP5lXNTi464IuvTJe/t86ixNptahC/dkSIJauk0ZgFd hl2KzjAQdr9vA1i9SA7naWRqSOCW9CHws7BDXnDhPxjZZX+bDmECv2H5Buk8RANvA/WkyGxop16 AXqin7p3aQTSORM6dTeGFBE= X-Forward-Email-ID: 681ad74ab0281deddfb7514b X-Forward-Email-Sender: rfc822; zach@shaf.tel, smtp.forwardemail.net, 149.28.215.223 X-Forward-Email-Version: 1.0.2 X-Forward-Email-Website: https://forwardemail.net X-Complaints-To: abuse@forwardemail.net X-Report-Abuse: abuse@forwardemail.net X-Report-Abuse-To: abuse@forwardemail.net From: Zach Shaftel To: bug-gnu-emacs@gnu.org Subject: [PATCH] Add new gv place definitions User-Agent: mu4e 1.12.9; emacs 31.0.50 X-Debbugs-Cc: Stefan Monnier Date: Tue, 06 May 2025 23:45:10 -0400 Message-ID: <87ikmdcce1.fsf@shaf.tel> MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Received-SPF: pass client-ip=149.28.215.223; envelope-from=SRS0=4862=XX=shaf.tel=zach@fe-bounces.shaf.tel; helo=smtp.forwardemail.net X-Spam_score_int: -20 X-Spam_score: -2.1 X-Spam_bar: -- X-Spam_report: (-2.1 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1, RCVD_IN_VALIDITY_RPBL_BLOCKED=0.001, RCVD_IN_VALIDITY_SAFE_BLOCKED=0.001, SPF_HELO_PASS=-0.001, SPF_PASS=-0.001 autolearn=ham autolearn_force=no X-Spam_action: no action X-Spam-Score: 0.9 (/) X-Debbugs-Envelope-To: submit X-Mailman-Approved-At: Wed, 07 May 2025 00:09:34 -0400 X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -0.1 (/) --=-=-= Content-Type: text/plain Tags: patch just a few simple gv definitions. also fixed the return on the `terminal-parameter' gv, since `set-terminal-parameter' returns the previous value of the parameter instead of the new one. In GNU Emacs 31.0.50 (build 3, x86_64-pc-linux-gnu, GTK+ Version 3.24.49, cairo version 1.18.4) of 2025-04-30 built on bigbox Repository revision: dd5ae0f3ba56e762ae1265b0cb0fe9f2a28281ec Repository branch: master System Description: Arch Linux Configured using: 'configure --with-modules --without-xwidgets --with-native-compilation --with-tree-sitter --without-gsettings --without-gconf --without-gpm --with-pgtk --without-compress-install 'CFLAGS=-mtune=native -march=native -O2 -g'' --=-=-= Content-Type: text/patch Content-Disposition: attachment; filename=0001-Add-new-gv-place-definitions.patch >From de63c30a0e239817c48698c1fc7f5a793620cdcf Mon Sep 17 00:00:00 2001 From: Zach Shaftel Date: Tue, 6 May 2025 22:07:41 -0400 Subject: [PATCH] Add new gv place definitions * lisp/emacs-lisp/gv.el (char-table-extra-slot, char-table-parent) (default-toplevel-value, marker-insertion-type, process-plist) (process-query-on-exit-flag, process-thread, lookup-key) (window-prev-buffers, window-next-buffers, window-new-normal, font-get) (charset-plist, get-charset-property): Add gv-setters. (terminal-parameter): Fix the return value. --- lisp/emacs-lisp/gv.el | 17 ++++++++++++++++- 1 file changed, 16 insertions(+), 1 deletion(-) diff --git a/lisp/emacs-lisp/gv.el b/lisp/emacs-lisp/gv.el index 6c949f1016b..1e540926e4a 100644 --- a/lisp/emacs-lisp/gv.el +++ b/lisp/emacs-lisp/gv.el @@ -367,6 +367,8 @@ 'gv-place (gv-define-simple-setter aref aset) (gv-define-simple-setter char-table-range set-char-table-range) +(gv-define-simple-setter char-table-extra-slot set-char-table-extra-slot) +(gv-define-simple-setter char-table-parent set-char-table-parent) (gv-define-simple-setter car setcar) (gv-define-simple-setter cdr setcdr) ;; FIXME: add compiler-macros for `cXXr' instead! @@ -400,10 +402,12 @@ symbol-value ;;; Elisp-specific generalized variables. (gv-define-simple-setter default-value set-default) +(gv-define-simple-setter default-toplevel-value set-default-toplevel-value t) (gv-define-simple-setter frame-parameter set-frame-parameter 'fix) -(gv-define-simple-setter terminal-parameter set-terminal-parameter) +(gv-define-simple-setter terminal-parameter set-terminal-parameter t) (gv-define-simple-setter keymap-parent set-keymap-parent) (gv-define-simple-setter match-data set-match-data 'fix) +(gv-define-simple-setter marker-insertion-type set-marker-insertion-type) (gv-define-simple-setter overlay-get overlay-put) (gv-define-setter overlay-start (store ov) (macroexp-let2 nil store store @@ -415,6 +419,9 @@ process-buffer (gv-define-simple-setter process-filter set-process-filter) (gv-define-simple-setter process-sentinel set-process-sentinel) (gv-define-simple-setter process-get process-put 'fix) +(gv-define-simple-setter process-plist set-process-plist) +(gv-define-simple-setter process-query-on-exit-flag set-process-query-on-exit-flag) +(gv-define-simple-setter process-thread set-process-thread) (gv-define-simple-setter window-parameter set-window-parameter) (gv-define-setter window-buffer (v &optional w) (macroexp-let2 nil v v @@ -427,6 +434,14 @@ window-dedicated-p (gv-define-setter window-hscroll (v &optional w) `(set-window-hscroll ,w ,v)) (gv-define-setter window-point (v &optional w) `(set-window-point ,w ,v)) (gv-define-setter window-start (v &optional w) `(set-window-start ,w ,v)) +(gv-define-setter window-prev-buffers (v &optional w) `(set-window-prev-buffers ,w ,v)) +(gv-define-setter window-next-buffers (v &optional w) `(set-window-next-buffers ,w ,v)) +(gv-define-setter window-new-normal (v &optional w) `(set-window-new-normal ,w ,v)) +(gv-define-simple-setter font-get font-put) +(gv-define-simple-setter charset-plist set-charset-plist) +(gv-define-simple-setter get-charset-property put-charset-property t) +(gv-define-setter lookup-key (val keymap key &optional _accept-default) + `(define-key ,keymap ,key ,val)) (gv-define-setter buffer-local-value (val var buf) (macroexp-let2 nil v val -- 2.49.0 --=-=-=-- ------------=_1751171523-4713-1--