[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master fcf2f7aeada: Make the byte compiler give correct warning position
From: |
Alan Mackenzie |
Subject: |
master fcf2f7aeada: Make the byte compiler give correct warning positions in eval-and-compile |
Date: |
Fri, 17 Feb 2023 12:33:39 -0500 (EST) |
branch: master
commit fcf2f7aeada365eeb1b3bcc9288b59cdb70fc02a
Author: Alan Mackenzie <acm@muc.de>
Commit: Alan Mackenzie <acm@muc.de>
Make the byte compiler give correct warning positions in eval-and-compile
This fixes bug #61579.
* lisp/emacs-lisp/bytecomp.el (byte-compile-initial-environment): Remove a
spurious `byte-run-strip-symbol-position' from the core form of the
eval-and-compile element.
---
lisp/emacs-lisp/bytecomp.el | 7 +++----
1 file changed, 3 insertions(+), 4 deletions(-)
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index e8a8fe37756..a0e124bcf1b 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -530,10 +530,9 @@ Return the compile-time value of FORM."
;; or byte-compile-file-form.
(let* ((print-symbols-bare t) ; Possibly
redundant binding.
(expanded
- (byte-run-strip-symbol-positions
- (macroexpand--all-toplevel
- form
- macroexpand-all-environment))))
+ (macroexpand--all-toplevel
+ form
+ macroexpand-all-environment)))
(eval expanded lexical-binding)
expanded)))))
(with-suppressed-warnings
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master fcf2f7aeada: Make the byte compiler give correct warning positions in eval-and-compile,
Alan Mackenzie <=