File: unparse.lisp in the cxml package.
Emacs: XEmacs 21.4.22 [latest stable] on debian etch.
Slime verson: today's cvs.
........
(slime,warning/warning)
"unparse.lisp@gnulou":158:31 (pt=6632).
Caught error during fontification while
searching for forms that are suppressed
by reader-conditionals. The error was:
(cl-assertion-failed (<= (point) limit)).
This is a bug in Slime itself. Please report this
to the mailinglist slime-devel(a)common-lisp.net
and include your Emacs version, the guilty
Lisp source file, the header of this message,
and the following backtrace.
Backtrace:
backtrace() (let ((standard-output
...)) (backtrace)) (save-current-buffer
(set-buffer (get-buffer-create ...)) (setq
buffer-read-only nil) (buffer-disable-undo
(current-buffer)) (erase-buffer) (let
(...) (backtrace)) (prog1 (buffer-string)
(erase-buffer)))
(with-current-buffer (get-buffer-create
(generate-new-buffer-name "
*string-output*")) (setq buffer-read-only
nil) (buffer-disable-undo (current-buffer))
(erase-buffer) (let (...) (backtrace)) (prog1
(buffer-string) (erase-buffer)))
(with-output-to-string (backtrace))
(slime-display-warning "%S:%d:%d
(pt=%d).\n%s\n\nThis is a bug in
Slime itself. Please report this to
the\nmailinglist slime-devel(a)common-lisp.net
and include your Emacs\nversion,
the guilty Lisp source file, the
header of this\nmessage, and the following
backtrace.\n\nBacktrace:\n%s\n-------------
---------------------
------------------
----------\n" (buffer-name) (line-number-at-pos)
(current-column) (point) (apply (function
format) message args) (with-output-to-string
(backtrace)))
slime-bug("Caught error during fontification
while searching for
forms\nthat are suppressed by
reader-conditionals. The error was: %S."
(cl-assertion-failed (<= (point) limit)))
byte-code("..." [condition result nil slime-bug
"Caught error during fontification while
searching for forms\nthat are suppressed by
reader-conditionals. The error was: %S."] 3)
slime-search-suppressed-forms(6226)
font-lock-fontify-keywords-region(6094 6226
nil) font-lock-default-fontify-region(6094
6226 nil) font-lock-fontify-region(6094 6226)
byte-code("..." [end next beg text-property-any
lazy-lock t 0 nil font-lock-fontify-region
lazy-lock-put-text-property] 6)
lazy-lock-fontify-region(5743 6226)
lazy-lock-fontify-window(#<window on
"unparse.lisp@gnulou"
0xfe2>)
walk-windows(lazy-lock-fontify-window
no-minibuf #<x-frame
"emacs" 0xfe1>)
lazy-lock-maybe-fontify-frame(#<x-frame "emacs"
0xfe1>) byte-code("..." [starting-frame frame
selected-frame
frame-visible-p frame-minibuffer-only-p
next-frame visible-nomini throw
lazy-lock-frame-loop-done t
lazy-lock-maybe-fontify-frame] 4)
lazy-lock-pre-idle-fontify-windows()