Subject: bug#14646: 24.3.50; edebug-defun causes an error for eval-when-compile

From: Katsumi Yamaoka <[email-masked]>
Date: Wed, 20 Nov 2013 16:15:22 +0900

Does anyone have a solution for this?

-------------------- Start of forwarded message --------------------
From: Katsumi Yamaoka <[email-masked]>
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: <[email-masked]>
To: [email-masked]

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 --------------------