emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/macrostep 94d40f2 093/110: Check that compiler-macros retu


From: ELPA Syncer
Subject: [nongnu] elpa/macrostep 94d40f2 093/110: Check that compiler-macros return a changed form
Date: Sat, 7 Aug 2021 09:18:09 -0400 (EDT)

branch: elpa/macrostep
commit 94d40f223f6a2f5136c89f922f5f8436f8363d33
Author: joddie <jonxfield@gmail.com>
Commit: joddie <jonxfield@gmail.com>

    Check that compiler-macros return a changed form
---
 macrostep.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/macrostep.el b/macrostep.el
index 3ab62c4..7efd4c1 100644
--- a/macrostep.el
+++ b/macrostep.el
@@ -798,7 +798,9 @@ value of DEFINITION in the result will be nil."
           (let ((compiler-macro-definition
                  (and macrostep-expand-compiler-macros
                       (get head 'compiler-macro))))
-            (if compiler-macro-definition
+            (if (and compiler-macro-definition
+                     (not (eq form
+                              (apply compiler-macro-definition form (cdr 
form)))))
                 `(compiler-macro . ,compiler-macro-definition)
               (condition-case _
                   (let ((fun (indirect-function head)))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]