diff options
| author | Richard M. Stallman | 2008-02-04 16:54:05 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2008-02-04 16:54:05 +0000 |
| commit | f4c4910c9e72b4e3f3cbfed42b0203cde1e8f22f (patch) | |
| tree | a93c4e2d7f76b5e923910e943e7dd940b3182947 | |
| parent | 7e2a60001ef4611850e77105dac5ec443a023288 (diff) | |
| download | emacs-f4c4910c9e72b4e3f3cbfed42b0203cde1e8f22f.tar.gz emacs-f4c4910c9e72b4e3f3cbfed42b0203cde1e8f22f.zip | |
Comment changes.
| -rw-r--r-- | lisp/emacs-lisp/edebug.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el index b988a8ac79d..e825f2434b4 100644 --- a/lisp/emacs-lisp/edebug.el +++ b/lisp/emacs-lisp/edebug.el | |||
| @@ -1496,7 +1496,7 @@ expressions; a `progn' form will be returned enclosing these forms." | |||
| 1496 | (cond | 1496 | (cond |
| 1497 | ((symbolp head) | 1497 | ((symbolp head) |
| 1498 | (cond | 1498 | (cond |
| 1499 | ((null head) nil) ; () is legal. | 1499 | ((null head) nil) ; () is valid. |
| 1500 | ((eq head 'interactive-p) | 1500 | ((eq head 'interactive-p) |
| 1501 | ;; Special case: replace (interactive-p) with variable | 1501 | ;; Special case: replace (interactive-p) with variable |
| 1502 | (setq edebug-def-interactive 'check-it) | 1502 | (setq edebug-def-interactive 'check-it) |
| @@ -2076,7 +2076,7 @@ expressions; a `progn' form will be returned enclosing these forms." | |||
| 2076 | ;; doesn't handle (a . ,b). The straightforward fix: | 2076 | ;; doesn't handle (a . ,b). The straightforward fix: |
| 2077 | ;; (backquote-form . [&or nil backquote-form]) | 2077 | ;; (backquote-form . [&or nil backquote-form]) |
| 2078 | ;; uses up too much stack space. | 2078 | ;; uses up too much stack space. |
| 2079 | ;; Note that `(foo . ,@bar) is not legal, so we don't need to handle it. | 2079 | ;; Note that `(foo . ,@bar) is not valid, so we don't need to handle it. |
| 2080 | (backquote-form [&rest [¬ ","] backquote-form] | 2080 | (backquote-form [&rest [¬ ","] backquote-form] |
| 2081 | . [&or nil backquote-form]) | 2081 | . [&or nil backquote-form]) |
| 2082 | ;; If you use dotted forms in backquotes, replace the previous line | 2082 | ;; If you use dotted forms in backquotes, replace the previous line |