[jdee-devel] JDEE and XEmacs
Brought to you by:
paullandes
Menu
▾
▴
[jdee-devel] JDEE and XEmacs
|
From: Paul L. <la...@ma...> - 2009-08-10 05:31:02
|
ebib-init.el isn't in the FSF version (maybe an XEmacs, if there are
any left, can give a hand here). In addition, it's hard to analyse
given the function if fails in is compiled.
You might want to re-evaluate (i.e. `eval-defun') function `regexp' to
get a better stack.
Jobst Hoffmann writes:
> Hi,
>
> first I have to thank you for your ongoing effort on developping JDEE
> further.
>
> I didn't test it until now, because I missed an up-to-date installation
> documentation, which was published today. So I tried it out, the
> installation with my XEmacs (XEmacs 21.5.28 on a Fedora 11 box) went
> yery smoothly, but starting the XEmacs - even with a very small init.el
> - ended in an error.
>
> I attach both, the init.el and the error message and also the log
> messages. I appreciate any help, I will regive reports on co-operation
> of XEmacs and JDEE.
>
> Thanks in advance, kind regards and best wishes to the developing team
> Jobst
> --
> Prof. Dr. Jobst Hoffmann Tel: +49 (241) 6009-5 31 59
> Fachhochschule Aachen Abt. Jülich Fax: +49 (241) 6009-5 31 89
> Fachbereich 09 email: j.h...@fh...
>
>
> (add-to-list 'load-path "/usr/share/xemacs/site-packages/lisp/jdee/lisp")
> (load "jde-autoload")
>
> Recent minibuffer messages (most recent first):
>
> Fontifying *scratch*... done.
> Loading timer-funcs...done
> Fontifying *scratch*... (syntactically).
> Fontifying *scratch*...
> Loading timer-funcs...
> Loading lazy-lock...done
> Loading lazy-lock...
> Loading guided-tour...done
> Loading guided-tour...
> Loading cus-face...done
> Loading cus-face...
> Loading mwheel...done
> Loading mwheel...
> Loading jde-autoload...done
> Loading jde-autoload...
> Loading leim-list...done
> Loading leim-list...
> Loading /usr/share/xemacs/site-packages/lisp/site-start.d/ebib-init.el...done
> Loading /usr/share/xemacs/site-packages/lisp/site-start.d/ebib-init.el...
>
> (1) (file-mode-spec/warning) Error in File mode specification: Wrong type argument: number-char-or-marker-p, nil
>
> Backtrace follows:
>
> byte-code("..." [emacs-patch-level emacs-minor-version emacs-major-version fboundp replace-regexp-in-string #<compiled-function (regexp rep string &optional fixedcase literal subexp start) "...(119)" [str me string matches mb start 0 nil match-data ((store-match-data match-data)) string-match replace-match match-string apply concat l rep regexp match-data fixedcase literal subexp] 7 "Replace all matches for REGEXP with REP in STRING.\n\nReturn a new string containing the replacements.\n\nOptional arguments FIXEDCASE, LITERAL and SUBEXP are like the\narguments with the same names of function `replace-match'. If START\nis non-nil, start replacements at that index in STRING.\n\nREP is either a string used as the NEWTEXT arg of `replace-match' or a\nfunction. If it is a function it is applied to each match to generate\nthe replacement passed to `replace-match'; the match-data at this\npoint are such that match 0 is the function's argument.\n\nTo replace only the first match (if any), make REGEXP match up to \\'\nand replace a sub-expression, e.g.\n (replace-regexp-in-string \"\\(foo\\).*\\'\" \"bar\" \" foo foo\" nil nil 1)\n => \" bar foo\"\n"> subst-char-in-string #<compiled-function (fromchar tochar string &optional inplace) "...(38)" [tochar fromchar inplace string newstr i copy-sequence 0] 3 "Replace FROMCHAR with TOCHAR in STRING each time it occurs.\nUnless optional argument INPLACE is non-nil, return a new string."> coding-system-list #<compiled-function (&optional base-only) "...(2)" [(raw-text)] 1> match-string-no-properties #<compiled-function (num &optional string) "...(19)" [string num match match-string set-text-properties 0 nil] 6 "Return string of text matched by last search, without text properties.\nNUM specifies which parenthesized expression in the last regexp.\nValue is nil if NUMth pair didn't match, or there were less than NUM pairs.\nZero means the entire text matched by the whole regexp or whole string.\nSTRING should be given if the last search was by `string-match' on STRING."> line-beginning-position #<compiled-function (&optional n) "...(8)" [n beginning-of-line] 2 "Return the character position of the first character on the \ncurrent line. With argument N not nil or 1, move forward N - 1 lines first.\nIf scan reaches end of buffer, return that position."> line-end-position #<compiled-function (&optional n) "...(7)" [n] 1 "Return the character position of the last character on the \ncurrent line. With argument N not nil or 1, move forward N - 1 lines first.\nIf scan reaches end of buffer, return that position."> run-with-timer #<compiled-function (secs repeat function &rest args) "...(14)" [repeat secs function args start-itimer "timer" nil t] 8> run-with-idle-timer #<compiled-function (secs repeat function &rest args) "...(17)" [repeat function args secs start-itimer "idle timer" t] 8> featurep toolbar require debug-toolbar jde-bug jde-compile widget 21 4 10 efc-xemacs] 2)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> load-internal("jde-xemacs" nil require nil binary)
> # bind (path handler filename nosuffix nomessage noerror file)
> load("jde-xemacs" nil require nil)
> # (unwind-protect ...)
> require(jde-xemacs)
> byte-code("..." [jde-xemacsp fboundp char-int defalias identity require jde-xemacs] 3)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> load-internal("jde-parse-class" nil require nil binary)
> # bind (path handler filename nosuffix nomessage noerror file)
> load("jde-parse-class" nil require nil)
> # (unwind-protect ...)
> require(jde-parse-class)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> load-internal("jde-class" nil require nil binary)
> # bind (path handler filename nosuffix nomessage noerror file)
> load("jde-class" nil require nil)
> # (unwind-protect ...)
> require(jde-class)
> byte-code("..." [jde-emacs22p jde-emacs21p jde-xemacs20p jde-xemacsp emacs-major-version current-load-list 20 string-match "\\bEmacs\\b" emacs-version 21 22 fboundp custom-set-default defalias set-default require jde-autoload jde-util file-exists-p expand-file-name "jde/auto-autoloads.el" jde-root jde-custom jde-help semantic-load easymenu cl font-lock cc-mode cus-edit comint jde-compile jde-db jde-bug jde-jdb jde-run jde-gen compile imenu browse-url beanshell jde-plugins jde-wiz jde-java-grammar jde-complete jde-which-method jde-java-font-lock jde-import jde-class executable efc etags jde-open-source jde-annotations regress custom-declare-group jde nil "Java Development Environment" :group tools :prefix "jde-"] 8)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> # (unwind-protect ...)
> load-internal("jde" nil nil nil binary)
> # bind (path handler filename nosuffix nomessage noerror file)
> load("jde" nil nil nil)
> # (unwind-protect ...)
> jde-mode()
> # bind (alist mode name keep-going)
> # (unwind-protect ...)
> # bind (just-from-file-name)
> set-auto-mode()
> #<compiled-function nil "...(5)" [set-auto-mode t] 1>()
> # (unwind-protect ...)
> call-with-condition-handler(#<compiled-function (__call_trapping_errors_arg__) "...(17)" [__call_trapping_errors_arg__ errstr error-message-string lwarn file-mode-spec warning "Error in %s: %s\n\nBacktrace follows:\n\n%s" "File mode specification" backtrace-in-condition-handler-eliminating-handler] 8> #<compiled-function nil "...(5)" [set-auto-mode t] 1>)
> # (condition-case ... . ((error)))
> # bind (find-file)
> normal-mode(t)
> # bind (nomodes after-find-file-from-revert-buffer noauto warn error)
> after-find-file(nil t)
> # (unwind-protect ...)
> # bind (inhibit-read-only error number truename rawfile nowarn filename buf)
> find-file-noselect-1(#<buffer "Basis.java"> "/home/ax006ho/tests/java/Basis.java" nil nil "/home/ax006ho/tests/java/Basis.java" (177602 2304))
> byte-code("..." [number truename rawfile nowarn filename buf set-buffer-major-mode find-file-noselect-1] 7)
> # (condition-case ... . ((t (byte-code "Â!Ã @ A\"" [buf data kill-buffer signal] 3))))
> # bind (number truename buf wildcards rawfile nowarn filename)
> find-file-noselect("~/tests/java/Basis.java" nil nil t)
> # bind (wildcards codesys filename)
> #<compiled-function (filename &optional codesys wildcards) "...(77)" [wildcards filename coding-system-for-read codesys bufname value get-coding-system find-file-noselect nil file-exists-p buffer-file-name local-variable-p buffer-file-coding-system switch-to-buffer mapcar] 6 1157324 (list (read-file-name "Find file: ") (and current-prefix-arg (read-coding-system "Coding system: ")) t)>("~/tests/java/Basis.java" nil t)
> call-interactively(find-file)
> #<compiled-function nil "...(4)" [toolbar-open-function call-interactively] 2 nil nil>()
> call-interactively(toolbar-open)
> # bind (callback button event)
> release-and-activate-toolbar-button(#<buttonup-event button1up>)
> # bind (command-debug-status)
> call-interactively(release-and-activate-toolbar-button)
> # (condition-case ... . error)
> # (catch top-level ...)
>
>
> ------------------------------------------------------------------------------
> Let Crystal Reports handle the reporting - Free Crystal Reports 2008 30-Day
> trial. Simplify your report design, integration and deployment - and focus on
> what you do best, core application coding. Discover what's new with
> Crystal Reports now. http://p.sf.net/sfu/bobj-july_______________________________________________
> jdee-devel mailing list
> jde...@li...
> https://lists.sourceforge.net/lists/listinfo/jdee-devel
--
Paul Landes
la...@ma... |