Hi all,

I see in the mailing list archive, that someone on windows had this
problem, but no solution was given other than to get the CVS version. I
found the SVN version and grabbed the trunk, and got different errors.
Let's try this first.

I'm sure this is common and I hate to ask, but I'm having problems
setting up the JDEE.  I have followed the directions for unix
installation as closely as possible.  I think I'm doing most things
correctly.  I looked at the trouble-shooting.htm and I agree I'm having
the most common problem, but non of the solutions seem correct for me.
I'm just not sure what's happening with the backtrace and not sure where
to begin I would love some help.



Here's the full information:

I've downloaded:
 elib 1.0 
 cedit (from CVS 1.0-pre7 for speedbar,eieio, and semantic bovintor)
 jde-2.3.5.1



I'm using emacs version:
GNU Emacs 23.1.1 (i686-pc-linux-gnu, GTK+ Version 2.12.9) of 2009-07-30 on 
snowblower

Host platform:
Linux snowblower 2.6.25.20-0.4-default #1 SMP 2009-06-01 09:57:12 +0200 i686 
i686 i386 GNU/Linux



I'm running in a test environment where I start up emacs with the command:
"emacs -q -l debug.emacs_jde"
and the full file debug.emacs_jde is:
<emacs_jde>
;; Minimal requirements for running JDE
;; run with:  emacs -q -l debug.emacs_jde
(setq debug-on-error t)

(setq my-lisp-dir "/homes/snowblower/savoie/lisp/")
(add-to-list 'load-path (expand-file-name (concat my-lisp-dir "jde/lisp")))
(add-to-list 'load-path (expand-file-name (concat my-lisp-dir "cedet/common")))
(load-file (expand-file-name (concat my-lisp-dir "cedet/common/cedet.el")))
(add-to-list 'load-path (concat my-lisp-dir "elib"))
;; Currently debugging this
(require 'jde)

</emacs_jde>




These are the relevant load-path-shadows (homes/snowblower/savoie/lisp
is the new stuff):
/homes/snowblower/savoie/lisp/cedet/common/ezimage hides 
/homes/snowblower/savoie/local/share/emacs/23.1/lisp/ezimage
/homes/snowblower/savoie/lisp/cedet/speedbar/dframe hides 
/homes/snowblower/savoie/local/share/emacs/23.1/lisp/dframe
/homes/snowblower/savoie/lisp/cedet/speedbar/speedbar hides 
/homes/snowblower/savoie/local/share/emacs/23.1/lisp/speedbar
/homes/snowblower/savoie/lisp/cedet/speedbar/sb-image hides 
/homes/snowblower/savoie/local/share/emacs/23.1/lisp/sb-image

I'm not sure what other files the jde/elib/cedet should hide?
I do have 42 full shadows, but they are all org-mode or IDLWAVE
related...(important or red herring?)


If I don't try to compile JDEE I get this backtrace on start up.
<backtrace>
   Debugger entered--Lisp error: (wrong-number-of-arguments #[(form val type) 
".!ƒ2.Æ  .!\".È
        \".>„..        !ƒ .
‚0.Ë.!.Í       DC.    
#E))‡‡" [type val res temp form cl-const-expr-p cl-make-type-test 
cl-const-expr-val cl-expr-contains (nil 1) cl-simple-expr-p make-symbol 
"--cl-var--" let subst] 6] 2)
  #[(form val type) ".!ƒ2.Æ    .!\".È\n       \".>„..        !ƒ .\n‚0.Ë.!.Í 
DC.    \n#E))‡\f‡" [type val res temp form cl-const-expr-p cl-make-type-test 
cl-const-expr-val cl-expr-contains (nil 1) cl-simple-expr-p make-symbol 
"--cl-var--" let subst] 6]((typep item) item)
  apply(#[(form val type) ".!ƒ2.Æ      .!\".È\n       \".>„..        !ƒ 
.\n‚0.Ë.!.Í DC.    \n#E))‡\f‡" [type val res temp form cl-const-expr-p 
cl-make-type-test cl-const-expr-val cl-expr-contains (nil 1) cl-simple-expr-p 
make-symbol "--cl-var--" let subst] 6] (typep item) item)
  compiler-macroexpand((typep item))
  byte-optimize-form-code-walker((typep item) nil)
  byte-optimize-form((typep item))
  mapcar(byte-optimize-form ("Tried to add an item of type %s to a list of 
items of type %s" (typep item) (oref this elem-type)))
  byte-optimize-form-code-walker((error "Tried to add an item of type %s to a 
list of items of type %s" (typep item) (oref this elem-type)) nil)
  byte-optimize-form((error "Tried to add an item of type %s to a list of items 
of type %s" (typep item) (oref this elem-type)) nil)
  byte-optimize-body(((error "Tried to add an item of type %s to a list of 
items of type %s" (typep item) (oref this elem-type))) nil)
  byte-optimize-form-code-walker((if (efc-coll-type-compatible-p this item) 
(oset this items (append ... ...)) (error "Tried to add an item of type %s to a 
list of items of type %s" (typep item) (oref this elem-type))) nil)
  byte-optimize-form((if (efc-coll-type-compatible-p this item) (oset this 
items (append ... ...)) (error "Tried to add an item of type %s to a list of 
items of type %s" (typep item) (oref this elem-type))) nil)
  byte-optimize-form-code-walker((progn (if (efc-coll-type-compatible-p this 
item) (oset this items ...) (error "Tried to add an item of type %s to a list 
of items of type %s" ... ...))) nil)
  byte-optimize-form((progn (if (efc-coll-type-compatible-p this item) (oset 
this items ...) (error "Tried to add an item of type %s to a list of items of 
type %s" ... ...))) nil)
  byte-compile-top-level((progn (if (efc-coll-type-compatible-p this item) 
(oset this items ...) (error "Tried to add an item of type %s to a list of 
items of type %s" ... ...))) nil lambda)
  byte-compile-lambda((lambda (this item) "Adds an item to the list." (if 
(efc-coll-type-compatible-p this item) (oset this items ...) (error "Tried to 
add an item of type %s to a list of items of type %s" ... ...))))
  byte-compile-function-form((function (lambda (this item) "Adds an item to the 
list." (if ... ... ...))))
  byte-compile-form((function (lambda (this item) "Adds an item to the list." 
(if ... ... ...))))
  mapc(byte-compile-form ((function (lambda ... "Adds an item to the list." 
...)) local-args))
  byte-compile-normal-call((apply (function (lambda ... "Adds an item to the 
list." ...)) local-args))
  byte-compile-funarg((apply (quote (lambda ... "Adds an item to the list." 
...)) local-args))
  byte-compile-form((apply (quote (lambda ... "Adds an item to the list." ...)) 
local-args) nil)
  byte-compile-body(((apply (quote ...) local-args)) nil)
  byte-compile-let((let ((scoped-class ...) 
(eieio-generic-call-next-method-list nil) (eieio-generic-call-key 
method-primary) (eieio-generic-call-methodname ...) (eieio-generic-call-arglst 
local-args)) (apply (quote ...) local-args)))
  byte-compile-form((let ((scoped-class ...) 
(eieio-generic-call-next-method-list nil) (eieio-generic-call-key 
method-primary) (eieio-generic-call-methodname ...) (eieio-generic-call-arglst 
local-args)) (apply (quote ...) local-args)) nil)
  byte-compile-body(((let (... ... ... ... ...) (apply ... local-args))) nil)
  byte-compile-if((if (not (child-of-class-p ... ...)) (apply (quote 
no-applicable-method) (car local-args) (quote efc-coll-add) local-args) (let 
(... ... ... ... ...) (apply ... local-args))))
  byte-compile-form((if (not (child-of-class-p ... ...)) (apply (quote 
no-applicable-method) (car local-args) (quote efc-coll-add) local-args) (let 
(... ... ... ... ...) (apply ... local-args))) nil)
  byte-compile-body(((if (not ...) (apply ... ... ... local-args) (let ... 
...))) nil)
  byte-compile-if((if (not (condition-case nil ... ...)) (signal (quote 
no-method-definition) (list ... local-args)) (if (not ...) (apply ... ... ... 
local-args) (let ... ...))))
  byte-compile-form((if (not (condition-case nil ... ...)) (signal (quote 
no-method-definition) (list ... local-args)) (if (not ...) (apply ... ... ... 
local-args) (let ... ...))) nil)
  byte-compile-top-level((progn (if (not ...) (signal ... ...) (if ... ... 
...))) nil lambda)
  byte-compile-lambda((lambda (&rest local-args) "Adds an item to the list." 
(if (not ...) (signal ... ...) (if ... ... ...))))
  eieio-defgeneric-form-primary-only-one(efc-coll-add "Adds an item to the 
list." efc-list (lambda (this item) "Adds an item to the list." (if 
(efc-coll-type-compatible-p this item) (oset this items ...) (error "Tried to 
add an item of type %s to a list of items of type %s" ... ...))))
  eieio-defmethod(efc-coll-add (((this efc-list) item) "Adds an item to the 
list." (if (efc-coll-type-compatible-p this item) (oset this items ...) (error 
"Tried to add an item of type %s to a list of items of type %s" ... ...))))
  (defmethod efc-coll-add ((this efc-list) item) "Adds an item to the list." 
(if (efc-coll-type-compatible-p this item) (oset this items ...) (error "Tried 
to add an item of type %s to a list of items of type %s" ... ...)))
  eval-buffer(#<buffer  *load*<4>> nil 
"/homes/snowblower/savoie/lisp/jde/lisp/efc.el" nil t)  ; Reading at buffer 
position 23806
  load-with-code-conversion("/homes/snowblower/savoie/lisp/jde/lisp/efc.el" 
"/homes/snowblower/savoie/lisp/jde/lisp/efc.el" nil t)
  require(efc)
  eval-buffer(#<buffer  *load*<3>> nil 
"/homes/snowblower/savoie/lisp/jde/lisp/jde-util.el" nil t)  ; Reading at 
buffer position 1542
  
load-with-code-conversion("/homes/snowblower/savoie/lisp/jde/lisp/jde-util.el" 
"/homes/snowblower/savoie/lisp/jde/lisp/jde-util.el" nil t)
  require(jde-util)
  eval-buffer(#<buffer  *load*<2>> nil 
"/homes/snowblower/savoie/lisp/jde/lisp/jde.el" nil t)  ; Reading at buffer 
position 1961
  load-with-code-conversion("/homes/snowblower/savoie/lisp/jde/lisp/jde.el" 
"/homes/snowblower/savoie/lisp/jde/lisp/jde.el" nil t)
  require(jde)
  eval-buffer(#<buffer  *load*> nil "/home/savoie/lisp/debug.emacs_jde" nil t)  
; Reading at buffer position 487
  load-with-code-conversion("/home/savoie/lisp/debug.emacs_jde" 
"/home/savoie/lisp/debug.emacs_jde" nil t)
  load("/home/savoie/lisp/debug.emacs_jde" nil t)
  command-line-1(("-l" "debug.emacs_jde"))
  command-line()
  normal-top-level()

        
</backtrace>



Contents of the *message* buffer
<*message*>
For information about GNU Emacs and the GNU system, type C-h C-a.
Loading /homes/snowblower/savoie/lisp/cedet/common/cedet.el (source)...
Setting up CEDET packages...done
Loading /homes/snowblower/savoie/lisp/cedet/common/cedet.el (source)...done
Entering debugger...
</*message*>




If I do try to compile the jde files using the makefile:
I believe #6 on the JDEE Installation Guide is outdated and should have
elib and cedet paths described, but that could also be my ignorance. 

I get the error file attached: compilation_error.txt
<compile_error>
-*- mode: compilation; default-directory: "~/lisp/jde/lisp/" -*-
Compilation started at Mon Aug 31 11:21:32

make -k all
test -d ../../cedet -a -d ../../elib
rm -f *.elc jde-compile-script-init
echo "(add-to-list 'load-path \".\")" > jde-compile-script-init
echo "(add-to-list 'load-path \"../../elib\")" >>jde-compile-script-init
echo "(setq debug-on-error t)" >> jde-compile-script-init
echo "(load-file \"../../cedet/common/cedet.el\")" >> jde-compile-script-init
echo "(require 'jde-compat)" >> jde-compile-script-init
echo "(require 'jde)" >>jde-compile-script-init
if echo "/home/savoie/local/bin/emacs" | grep -w xemacs ; \
          then /home/savoie/local/bin/emacs -batch -l jde-compile-script-init 
-f batch-byte-compile `echo *.el` ; \
          else /home/savoie/local/bin/emacs -batch -l jde-compile-script-init \
            -f batch-byte-compile `ls -1 *.el | egrep -v '.*-xemacs.el'`; \
        fi;
Loading /home/savoie/lisp/cedet/common/cedet.el (source)...
Setting up CEDET packages...
Setting up CEDET packages...done
Loading `jde-compat': old-style backquotes detected!
...
  byte-optimize-form((if (efc-coll-type-compatible-p this item) (oset this 
items (append ... ...)) (error "Tried to add an item of type %s to a list of 
items of type %s" (typep item) (oref this elem-type))) nil)
  byte-optimize-form-code-walker((progn (if (efc-coll-type-compatible-p this 
item) (oset this items ...) (error "Tried to add an item of type %s to a list 
of items of type %s" ... ...))) nil)
  byte-optimize-form((progn (if (efc-coll-type-compatible-p this item) (oset 
this items ...) (error "Tried to add an item of type %s to a list of items of 
type %s" ... ...))) nil)
  byte-compile-top-level((progn (if (efc-coll-type-compatible-p this item) 
(oset this items ...) (error "Tried to add an item of type %s to a list of 
items of type %s" ... ...))) nil lambda)
  byte-compile-lambda((lambda (this item) "Adds an item to the list." (if 
(efc-coll-type-compatible-p this item) (oset this items ...) (error "Tried to 
add an item of type %s to a list of items of type %s" ... ...))))
  byte-compile-function-form((function (lambda (this item) "Adds an item to the 
list." (if ... ... ...))))
  byte-compile-form((function (lambda (this item) "Adds an item to the list." 
(if ... ... ...))))
  mapc(byte-compile-form ((function (lambda ... "Adds an item to the list." 
...)) local-args))
  byte-compile-normal-call((apply (function (lambda ... "Adds an item to the 
list." ...)) local-args))
  byte-compile-funarg((apply (quote (lambda ... "Adds an item to the list." 
...)) local-args))
  byte-compile-form((apply (quote (lambda ... "Adds an item to the list." ...)) 
local-args) nil)
  byte-compile-body(((apply (quote ...) local-args)) nil)
  byte-compile-let((let ((scoped-class ...) 
(eieio-generic-call-next-method-list nil) (eieio-generic-call-key 
method-primary) (eieio-generic-call-methodname ...) (eieio-generic-call-arglst 
local-args)) (apply (quote ...) local-args)))
  byte-compile-form((let ((scoped-class ...) 
(eieio-generic-call-next-method-list nil) (eieio-generic-call-key 
method-primary) (eieio-generic-call-methodname ...) (eieio-generic-call-arglst 
local-args)) (apply (quote ...) local-args)) nil)
  byte-compile-body(((let (... ... ... ... ...) (apply ... local-args))) nil)
  byte-compile-if((if (not (child-of-class-p ... ...)) (apply (quote 
no-applicable-method) (car local-args) (quote efc-coll-add) local-args) (let 
(... ... ... ... ...) (apply ... local-args))))
  byte-compile-form((if (not (child-of-class-p ... ...)) (apply (quote 
no-applicable-method) (car local-args) (quote efc-coll-add) local-args) (let 
(... ... ... ... ...) (apply ... local-args))) nil)
  byte-compile-body(((if (not ...) (apply ... ... ... local-args) (let ... 
...))) nil)
  byte-compile-if((if (not (condition-case nil ... ...)) (signal (quote 
no-method-definition) (list ... local-args)) (if (not ...) (apply ... ... ... 
local-args) (let ... ...))))
  byte-compile-form((if (not (condition-case nil ... ...)) (signal (quote 
no-method-definition) (list ... local-args)) (if (not ...) (apply ... ... ... 
local-args) (let ... ...))) nil)
  byte-compile-top-level((progn (if (not ...) (signal ... ...) (if ... ... 
...))) nil lambda)
  byte-compile-lambda((lambda (&rest local-args) "Adds an item to the list." 
(if (not ...) (signal ... ...) (if ... ... ...))))
  eieio-defgeneric-form-primary-only-one(efc-coll-add "Adds an item to the 
list." efc-list (lambda (this item) "Adds an item to the list." (if 
(efc-coll-type-compatible-p this item) (oset this items ...) (error "Tried to 
add an item of type %s to a list of items of type %s" ... ...))))
  eieio-defmethod(efc-coll-add (((this efc-list) item) "Adds an item to the 
list." (if (efc-coll-type-compatible-p this item) (oset this items ...) (error 
"Tried to add an item of type %s to a list of items of type %s" ... ...))))
  (defmethod efc-coll-add ((this efc-list) item) "Adds an item to the list." 
(if (efc-coll-type-compatible-p this item) (oset this items ...) (error "Tried 
to add an item of type %s to a list of items of type %s" ... ...)))
  eval-buffer(#<buffer  *load*<4>> nil "/home/savoie/lisp/jde/lisp/efc.el" nil 
t)  ; Reading at buffer position 23806
  load-with-code-conversion("/home/savoie/lisp/jde/lisp/efc.el" 
"/home/savoie/lisp/jde/lisp/efc.el" nil t)
  require(efc)
  eval-buffer(#<buffer  *load*<3>> nil "/home/savoie/lisp/jde/lisp/jde-util.el" 
nil t)  ; Reading at buffer position 1542
  load-with-code-conversion("/home/savoie/lisp/jde/lisp/jde-util.el" 
"/home/savoie/lisp/jde/lisp/jde-util.el" nil t)
  require(jde-util)
  eval-buffer(#<buffer  *load*<2>> nil "/home/savoie/lisp/jde/lisp/jde.el" nil 
t)  ; Reading at buffer position 1961
  load-with-code-conversion("/home/savoie/lisp/jde/lisp/jde.el" 
"/home/savoie/lisp/jde/lisp/jde.el" nil t)
  require(jde)
  eval-buffer(#<buffer  *load*> nil 
"/home/savoie/lisp/jde/lisp/jde-compile-script-init" nil t)  ; Reading at 
buffer position 170
  
load-with-code-conversion("/home/savoie/lisp/jde/lisp/jde-compile-script-init" 
"/home/savoie/lisp/jde/lisp/jde-compile-script-init" nil t)
  load("/home/savoie/lisp/jde/lisp/jde-compile-script-init" nil t)
  command-line-1(("-l" "jde-compile-script-init" "-f" "batch-byte-compile" 
"beanshell.el" "efc.el" "jde-annotations.el" "jde-ant.el" "jde-autoload.el" 
"jde-bug.el" "jde-checkstyle.el" "jde-class.el" "jde-compat.el" 
"jde-compile.el" "jde-complete.el" "jde-custom.el" "jde-db.el" "jde-dbo.el" 
"jde-dbs.el" "jde-ejb.el" "jde-gen.el" "jde-help.el" "jde-imenu.el" 
"jde-import.el" "jde-java-font-lock.el" "jde-java-grammar.el" 
"jde-javadoc-gen.el" "jde-javadoc.el" "jde-jdb.el" "jde-junit.el" "jde-make.el" 
"jde-open-source.el" "jde-package.el" "jde-parse-class.el" "jde-parse.el" 
"jde-plugins.el" "jde-project-file.el" "jde-run.el" "jde-sregex.el" 
"jde-stat.el" "jde-tree-widget.el" "jde-util.el" "jde-which-method.el" 
"jde-widgets.el" "jde-wiz.el" "jde-xref.el" "jde.el" "regress.el" "setnu.el"))
  command-line()
  normal-top-level()

make: *** [all] Error 255

Compilation exited abnormally with code 2 at Mon Aug 31 11:21:33

</compile_error>


And as the side effect of the compilation I get this
jde-compile-script-ini file:
<jde-compile-script-ini>
(add-to-list 'load-path ".")
(add-to-list 'load-path "../../elib")
(setq debug-on-error t)
(load-file "../../cedet/common/cedet.el")
(require 'jde-compat)
(require 'jde)
</jde-compile-script-ini>



Sorry again to be dense, but I appreciate the help.

Thanks

Matt Savoie
-- 
Matthew Savoie  -  Scientific Programmer
National Snow and Ice Data Center
(303) 735-0785   http://nsidc.org


------------------------------------------------------------------------------
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-users mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/jdee-users

Reply via email to