* bug#14646: 24.3.50; edebug-defun causes an error for eval-when-compile
@ 2013-06-18 0:07 Katsumi Yamaoka
2013-11-20 7:15 ` Katsumi Yamaoka
0 siblings, 1 reply; 4+ messages in thread
From: Katsumi Yamaoka @ 2013-06-18 0:07 UTC (permalink / raw
To: 14646
Hi,
I'm unable to debug a function that uses eval-when-compile.
Could you try edebug-defun on this form?
(defun foo ()
(eval-when-compile
(concat "foo" "+" "bar")))
Debugger entered--Lisp error: (wrong-type-argument consp nil)
edebug-before(1)
(edebug-after (edebug-before 1) 2 (concat "foo" "+" "bar"))
(progn (edebug-after (edebug-before 1) 2 (concat "foo" "+" "bar")))
eval((progn (edebug-after (edebug-before 1) 2 (concat "foo" "+" "bar"))) nil)
[...]
edebug-defun()
call-interactively(edebug-defun nil nil)
command-execute(edebug-defun)
Thanks.
In GNU Emacs 24.3.50.1 (i686-pc-cygwin, X toolkit, Xaw3d scroll bars)
of 2013-06-18 on localhost
Bzr revision: 113028 yamaoka@jpl.org-20130617220627-fag61aiyko1lmuoq
Windowing system distributor `The Cygwin/X Project', version 11.0.11401000
Configured using:
`configure --verbose --with-x-toolkit=lucid --without-imagemagick
--without-dbus --without-gconf --without-gsettings'
^ permalink raw reply [flat|nested] 4+ messages in thread
* bug#14646: 24.3.50; edebug-defun causes an error for eval-when-compile
2013-06-18 0:07 bug#14646: 24.3.50; edebug-defun causes an error for eval-when-compile Katsumi Yamaoka
@ 2013-11-20 7:15 ` Katsumi Yamaoka
2013-11-21 2:46 ` Stefan Monnier
0 siblings, 1 reply; 4+ messages in thread
From: Katsumi Yamaoka @ 2013-11-20 7:15 UTC (permalink / raw
To: 14646
Does anyone have a solution for this?
-------------------- Start of forwarded message --------------------
From: Katsumi Yamaoka <yamaoka@jpl.org>
Subject: bug#14646: 24.3.50; edebug-defun causes an error for eval-when-compile
Date: Tue, 18 Jun 2013 09:07:19 +0900
Message-ID: <b4m1u80l1s8.fsf@jpl.org>
To: 14646@debbugs.gnu.org
Hi,
I'm unable to debug a function that uses eval-when-compile.
Could you try edebug-defun on this form?
(defun foo ()
(eval-when-compile
(concat "foo" "+" "bar")))
Debugger entered--Lisp error: (wrong-type-argument consp nil)
edebug-before(1)
(edebug-after (edebug-before 1) 2 (concat "foo" "+" "bar"))
(progn (edebug-after (edebug-before 1) 2 (concat "foo" "+" "bar")))
eval((progn (edebug-after (edebug-before 1) 2 (concat "foo" "+" "bar"))) nil)
[...]
edebug-defun()
call-interactively(edebug-defun nil nil)
command-execute(edebug-defun)
Thanks.
-------------------- End of forwarded message --------------------
^ permalink raw reply [flat|nested] 4+ messages in thread
* bug#14646: 24.3.50; edebug-defun causes an error for eval-when-compile
2013-11-20 7:15 ` Katsumi Yamaoka
@ 2013-11-21 2:46 ` Stefan Monnier
2013-11-21 23:21 ` Katsumi Yamaoka
0 siblings, 1 reply; 4+ messages in thread
From: Stefan Monnier @ 2013-11-21 2:46 UTC (permalink / raw
To: Katsumi Yamaoka; +Cc: 14646
> Does anyone have a solution for this?
I installed the patch below which seems to fix it,
Stefan
--- lisp/emacs-lisp/byte-run.el 2013-11-04 20:06:02 +0000
+++ lisp/emacs-lisp/byte-run.el 2013-11-21 02:43:15 +0000
@@ -392,7 +391,7 @@
"Like `progn', but evaluates the body at compile time if you're compiling.
Thus, the result of the body appears to the compiler as a quoted constant.
In interpreted code, this is entirely equivalent to `progn'."
- (declare (debug t) (indent 0))
+ (declare (debug (def-body)) (indent 0))
(list 'quote (eval (cons 'progn body) lexical-binding)))
(defmacro eval-and-compile (&rest body)
^ permalink raw reply [flat|nested] 4+ messages in thread
* bug#14646: 24.3.50; edebug-defun causes an error for eval-when-compile
2013-11-21 2:46 ` Stefan Monnier
@ 2013-11-21 23:21 ` Katsumi Yamaoka
0 siblings, 0 replies; 4+ messages in thread
From: Katsumi Yamaoka @ 2013-11-21 23:21 UTC (permalink / raw
To: Stefan Monnier; +Cc: 14646-done
Stefan Monnier wrote:
>> Does anyone have a solution for this?
> I installed the patch below which seems to fix it,
Works nicely. Thank you!
^ permalink raw reply [flat|nested] 4+ messages in thread
end of thread, other threads:[~2013-11-21 23:21 UTC | newest]
Thread overview: 4+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2013-06-18 0:07 bug#14646: 24.3.50; edebug-defun causes an error for eval-when-compile Katsumi Yamaoka
2013-11-20 7:15 ` Katsumi Yamaoka
2013-11-21 2:46 ` Stefan Monnier
2013-11-21 23:21 ` Katsumi Yamaoka
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.