C-u M-x eval-defun RET fails in diff-context->unified

[Reiner Steib]

Please describe exactly what actions triggered the bug
and the precise symptoms of the bug:

emacs-cvs -Q -l diff-mode --eval "(describe-function 'diff-context->unified)"

Follow the link `diff-mode' to the defun.

C-u M-x eval-defun RET

I get (I can post a full lisp backtrace when needed):

Debugger entered--Lisp error: (invalid-read-syntax "Expected lambda expression")
  signal(invalid-read-syntax ("Expected lambda expression"))
  edebug-syntax-error("Expected lambda expression")
  apply(edebug-syntax-error "Expected lambda expression")
[...]

Point is on the second opening bracket of the last line:

                (while (< (point) pt2)
                  (case (char-after)
                    ((?! ?-) (delete-char 2) (insert "-") (forward-line 1))



If emacs crashed, and you have the emacs process in the gdb debugger,
please include the output from the following gdb commands:
    `bt full' and `xbacktrace'.
If you would like to further debug the crash, please read the file
/import/xtra/emacs/HEAD/share/emacs/22.0.50/etc/DEBUG for instructions.


Bye, Reiner.
-- 
       ,,,
      (o o)
---ooO-(_)-Ooo---  |  PGP key available  |  http://rsteib.home.pages.de/