# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 970857470 0
# Node ID d22ae991ac5fe9a5b049b70c8e573e95cc75331e
# Parent  2af46c6c8bde8c9965a2f332ea223a5317d5d262
Comment.

diff -r 2af46c6c8bde -r d22ae991ac5f lisp/emacs-lisp/edebug.el
--- a/lisp/emacs-lisp/edebug.el	Fri Oct 06 18:35:24 2000 +0000
+++ b/lisp/emacs-lisp/edebug.el	Fri Oct 06 18:37:50 2000 +0000
@@ -540,6 +540,8 @@
 	  (let ((edebug-all-forms edebugging)
 		(edebug-all-defs (eq edebug-all-defs (not edebug-it))))
 	    (edebug-read-top-level-form))))
+    ;; This should be consistent with `eval-defun-1', but not the
+    ;; same, since that gets a macroexpended form.
     (cond ((and (eq (car form) 'defvar)
 		(cdr-safe (cdr-safe form)))
 	   ;; Force variable to be bound.