I'm running XEmacs 21.4 (patch 6) and aspectj-mode.el version
1.1b2.
When I visit a new (empty) .java file and then hit enter
(inserting a newline), I get an args-out-of-range error (backtrace
below). I suspect the aspectj-maybe-adjust-annotation-overlay-1
function, which adds 1 to eol for empty lines; perhaps it shouldn't do
this at the end of file.
Signaling: (args-out-of-range #<buffer
"foo.java"> 2 3)
map-extents(#<compiled-function (ex junk)
"...(8)" [ex function *result* nil] 2> nil 2 3 nil all-extents-closed-open
overlay nil)
mapcar-extents(identity nil nil 2 3 all-extents-closed-
open overlay)
overlays-in(2 3)
(cond ((eq point-or-t t) (overlays-
in ... ...)) ((listp point-or-t) (overlays-in ... ...)) (t (overlays-at point-or-
t)))
aspectj-get-overlays((2 3))
(remove-if-not (quote aspectj-
annotation-p) (aspectj-get-overlays (list bol eol+1)))
(let* ((bol ...)
(eol ...) (eol+1 ...) (existing-annotation-overlays ...)) (when existing-
annotation-overlays (let* ... ... ...)))
aspectj-maybe-adjust-
annotation-overlay-1(2)
(if (not (= start end)) (aspectj-maybe-
adjust-annotation-overlay-1 end))
(when (not (= start end))
(aspectj-maybe-adjust-annotation-overlay-1 end))
aspectj-
maybe-adjust-overlays(1 2 0)
self-insert-command(1)
ad-
Orig-newline(nil)
(setq ad-return-value (ad-Orig-newline n))
(if
(not (or skk-j-mode skk-abbrev-mode)) (setq ad-return-value (ad-Orig-
newline n)) (let (... ...) (and skk-mode ...) (if ... ...)))
(let (ad-return-
value) (if (not ...) (setq ad-return-value ...) (let ... ... ...)) ad-return-
value)
newline(nil)
call-interactively(newline)
Logged In: NO
I've been getting what I think is essentially the same error
using jde-gen-new-class:
Signaling: (args-out-of-range #<buffer "test.java"> 15 16)
map-extents(#<compiled-function (ex junk) "...(8)" [ex
function *result* nil] 2> nil 15 16 nil
all-extents-closed-open overlay nil)
mapcar-extents(identity nil nil 15 16
all-extents-closed-open overlay)
overlays-in(15 16)
(cond ((eq point-or-t t) (overlays-in ... ...)) ((listp
point-or-t) (overlays-in ... ...)) (t (overlays-at point-or-t)))
aspectj-get-overlays((15 16))
(remove-if-not (quote aspectj-annotation-p)
(aspectj-get-overlays (list bol eol+1)))
(let* ((bol ...) (eol ...) (eol+1 ...)
(existing-annotation-overlays ...)) (when
existing-annotation-overlays (let* ... ... ...)))
aspectj-maybe-adjust-annotation-overlay-1(15)
(if (not (= start end))
(aspectj-maybe-adjust-annotation-overlay-1 end))
(when (not (= start end))
(aspectj-maybe-adjust-annotation-overlay-1 end))
aspectj-maybe-adjust-overlays(1 15 0)
tempo-process-and-insert-string("package sao;\n\n")
tempo-insert("package sao;\n\n" nil)
tempo-insert((jde-gen-get-package-statement) nil)
#<compiled-function (elt) "...(5)" [on-region elt
tempo-insert] 3>((jde-gen-get-package-statement))
mapcar(#<compiled-function (elt) "...(5)" [on-region elt
tempo-insert] 3> ((funcall jde-gen-boilerplate-function)
(jde-gen-get-package-statement) (progn (require ...)
(jde-javadoc-insert-start-block)) " * "
(file-name-nondirectory buffer-file-name) (quote >) (quote
n) " " (jde-javadoc-insert-empty-line) " "
(jde-javadoc-insert-empty-line) " * Created: "
(current-time-string) (quote >) (quote n) " "
(jde-javadoc-insert-empty-line) " " (jde-javadoc-insert
(quote tempo-template-jde-javadoc-author-tag)) " "
(jde-javadoc-insert (quote
tempo-template-jde-javadoc-version-tag)) " "
(jde-javadoc-insert (quote
tempo-template-jde-javadoc-end-block) "*/") "public class "
(file-name-sans-extension (file-name-nondirectory
buffer-file-name)) " " (jde-gen-get-extend-class) (if
jde-gen-k&r nil (quote >) (quote n)) "{" (quote >) (quote n)
(jde-gen-method-signature "public" ""
(file-name-sans-extension ...) "") (if jde-gen-k&r nil
(quote >) (quote n)) "{" (quote >) (quote n) (quote >)
(quote p) (quote n) "}" > " // " (file-name-sans-extension
(file-name-nondirectory buffer-file-name)) " constructor"
(quote >) (quote n) (jde-gen-get-interface-implementation)
(quote >) (quote n) "}" > ...))
tempo-insert-template(tempo-template-java-class-buffer-template
nil)
tempo-template-java-class-buffer-template()
jde-gen-class()
jde-gen-class-buffer("~/Code/DynEmerge/dynemerge/sao/test.java")
call-interactively(jde-gen-class-buffer)
Logged In: YES
user_id=700499
Whoops, the gen new class bug was posted by me :)
I'm using XEmacs 21.4.10 and JDE 2.3.2.
Kurt