From 985c035f2d4cf326a816fe463c400be96e358be2 Mon Sep 17 00:00:00 2001 From: Daniel Colascione Date: Mon, 21 Apr 2014 02:34:21 -0700 Subject: Correctly treat progn contents as toplevel forms when byte compiling --- lisp/emacs-lisp/macroexp.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'lisp/emacs-lisp/macroexp.el') diff --git a/lisp/emacs-lisp/macroexp.el b/lisp/emacs-lisp/macroexp.el index e3a746fa69e..c2bfc891b72 100644 --- a/lisp/emacs-lisp/macroexp.el +++ b/lisp/emacs-lisp/macroexp.el @@ -97,7 +97,10 @@ each clause." (defun macroexp--compiler-macro (handler form) (condition-case err (apply handler form (cdr form)) - (error (message "Compiler-macro error for %S: %S" (car form) err) + (error + (message "--------------------------------------------------") + (backtrace) + (message "Compiler-macro error for %S: %S" (car form) err) form))) (defun macroexp--funcall-if-compiled (_form) -- cgit v1.2.3