[nongnu] elpa/macrostep 94d40f2 093/110: Check that compiler-macros return a changed form

[ELPA Syncer]

branch: elpa/macrostep
commit 94d40f223f6a2f5136c89f922f5f8436f8363d33
Author: joddie <jonxfi...@gmail.com>
Commit: joddie <jonxfi...@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)))