Hello--
I've been trying to get JDEE set up on a Linux system and on a Mac laptop.
Both of them give me the same error when I execute (require 'jde). The
stack trace is reproduced below (except that "....." is actually a binary
string).
I have the most recent versions of cedet and elib installed. On the Linux
side, I tried replacing my usual .emacs file with the minimal .emacs file
suggested on the JDEE site, modifying only the paths to cedet and elib. It
didn't make a difference; I got the same error.
Any suggestions for how to proceed? Thanks in advance.
Debugger entered--Lisp error: (wrong-number-of-arguments #[(form val type)
"....." [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) "....." [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) "....." [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*<3>> nil
"/Users/mcafee/emacs/jde-2.3.5.1/lisp/efc.el" nil t) ; Reading at buffer
position 23806
load-with-code-conversion("/Users/mcafee/emacs/jde-2.3.5.1/lisp/efc.el"
"/Users/mcafee/emacs/jde-2.3.5.1/lisp/efc.el" nil t)
require(efc)
eval-buffer(#<buffer *load*<2>> nil
"/Users/mcafee/emacs/jde-2.3.5.1/lisp/jde-util.el" nil t) ; Reading at
buffer position 1542
load-with-code-conversion("/Users/mcafee/emacs/jde-2.3.5.1/lisp/jde-util.el"
"/Users/mcafee/emacs/jde-2.3.5.1/lisp/jde-util.el" nil t)
require(jde-util)
eval-buffer(#<buffer *load*> nil
"/Users/mcafee/emacs/jde-2.3.5.1/lisp/jde.el" nil t) ; Reading at buffer
position 1961
load-with-code-conversion("/Users/mcafee/emacs/jde-2.3.5.1/lisp/jde.el"
"/Users/mcafee/emacs/jde-2.3.5.1/lisp/jde.el" nil t)
require(jde)
eval((require (quote jde)))
eval-expression((require (quote jde)) nil)
call-interactively(eval-expression)
------------------------------------------------------------------------------
_______________________________________________
jdee-users mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/jdee-users