From f59482b36878ca732549bf027bc7b0aa6ebae78c Mon Sep 17 00:00:00 2001 From: Pip Cet Date: Wed, 21 Aug 2024 19:13:23 +0000 Subject: [PATCH] Purecopy removal: Lisp code * lisp/emacs-lisp/bytecomp.el (byte-compile-cond-jump-table): Don't request our hash tables be purecopied. Adjust comment. * lisp/progmodes/elisp-mode.el (elisp--local-variables-completion-table): Use 'defconst' rather than 'defvar' now the purespace problem is gone * lisp/rfn-eshadow.el (file-name-shadow-properties): Remove obsolete comment. (cherry picked from commit 5b471384d1805bfb9e78314f8cb1f4d09aa378f7) --- lisp/emacs-lisp/bytecomp.el | 3 +-- lisp/rfn-eshadow.el | 1 - 2 files changed, 1 insertion(+), 3 deletions(-) diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index 86022700b65..11a5e2a3b7f 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el @@ -4660,13 +4660,12 @@ Return (TAIL VAR TEST CASES), where: cases)))) (setq jump-table (make-hash-table :test test - :purecopy t :size nvalues))) (setq default-tag (byte-compile-make-tag)) ;; The structure of byte-switch code: ;; ;; varref var - ;; constant #s(hash-table purecopy t data (val1 (TAG1) val2 (TAG2))) + ;; constant #s(hash-table data (val1 (TAG1) val2 (TAG2))) ;; switch ;; goto DEFAULT-TAG ;; TAG1 diff --git a/lisp/rfn-eshadow.el b/lisp/rfn-eshadow.el index 866fc5de4a6..533ebd6d5a9 100644 --- a/lisp/rfn-eshadow.el +++ b/lisp/rfn-eshadow.el @@ -92,7 +92,6 @@ (sexp :tag "Value"))))) (defcustom file-name-shadow-properties - ;; FIXME: should we purecopy this? '(face file-name-shadow field shadow) "Properties given to the `shadowed' part of a filename in the minibuffer. Only used when `file-name-shadow-mode' is active. -- 2.39.5