master 68fb06f47f 1/3: Fix compiler macro expansion bug

[Mattias Engdegård]

branch: master
commit 68fb06f47fd09d36a3d1d35a4d24bf40489bea19
Author: Mattias Engdegård <mattiase@acm.org>
Commit: Mattias Engdegård <mattiase@acm.org>

    Fix compiler macro expansion bug
    
    * lisp/emacs-lisp/macroexp.el (macroexp--expand-all):
    When a compiler-macro handler is re-invoked (after macro-expanding
    arguments), actually use the result instead of pointlessly dropping it
    on the floor.
---
 lisp/emacs-lisp/macroexp.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/macroexp.el b/lisp/emacs-lisp/macroexp.el
index f4df40249d..8953e5fd01 100644
--- a/lisp/emacs-lisp/macroexp.el
+++ b/lisp/emacs-lisp/macroexp.el
@@ -486,7 +486,7 @@ Assumes the caller has bound `macroexpand-all-environment'."
                          (setq form (macroexp--compiler-macro handler newform))
                          (if (eq newform form)
                              newform
-                           (macroexp--expand-all newform)))
+                           (macroexp--expand-all form)))
                      (macroexp--expand-all newform))))))
             (_ form))))
     (pop byte-compile-form-stack)))