With point in "driverMain":

    (Integer)driverMain.invoke ...

C-c C-v C-y returns

    Wrong type argument: number-or-marker-p, nil

Backtrace attached.

C-c C-v C-y works correctly with a space after the cast:

    (Integer) driverMain.invoke ...

It would be more convenient if jde-parse.el could handle both styles.

-- Ed
Debugger entered--Lisp error: (wrong-type-argument number-or-marker-p nil)
  +(3 nil)
  (setq chop-pos (+ 3 (string-match " : " to-complete)))
  (progn (setq to-complete (car ...)) (setq chop-pos (+ 3 ...)) (let* (... ...) 
uqname))
  (if jde-complete-current-list (progn (setq to-complete ...) (setq chop-pos 
...) (let* ... uqname)))
  (if qualified-name qualified-name (if jde-complete-current-list (progn ... 
... ...)))
  (let* ((result ...) (temp ...) to-complete) (if temp 
(jde-parse-find-completion-for-pair temp) (jde-parse-find-completion-for-pair 
... nil jde-complete-private)) (if (not jde-complete-current-list) 
(jde-parse-find-completion-for-pair ...)) (setq qualified-name 
(jde-parse-get-qualified-name result t)) (if qualified-name qualified-name (if 
jde-complete-current-list ...)))
  (cond ((eq last-char 41) (let* ... ... ... ... ...)) ((eq last-char 93) (let 
... ...)) ((setq temp ...) (jde-parse-find-completion-for-pair temp t) (if 
jde-complete-current-list ... nil)) (t (let ... ... ... ... ...)))
  (let (to-complete (last-char ...)) (cond (... ...) (... ...) (... ... ...) (t 
...)))
  (cond ((integerp expr) "int") ((if ... "long")) ((floatp expr) "double") ((if 
... "float")) ((string-match "false\\|true" expr) "boolean") ((string= "'" ...) 
"char") ((and class-at-point ...) (jde-parse-get-qualified-name class-at-point 
t)) ((and super-at-point ...) (jde-parse-get-qualified-name super-at-point t)) 
((setq qualified-name ...) qualified-name) ((and expr class-at-point ... ...) 
qualified-name) (t (let ... ...)))
  (setq answer (cond (... "int") (...) (... "double") (...) (... "boolean") 
(... "char") (... ...) (... ...) (... qualified-name) (... qualified-name) (t 
...)))
  (let ((class-at-point ...) (super-at-point ...) qualified-name chop-pos temp 
answer) (setq answer (cond ... ... ... ... ... ... ... ... ... ... ...)) answer)
  (if expr (let (... ... qualified-name chop-pos temp answer) (setq answer ...) 
answer))
  jde-parse-eval-type-of("(Integer)")
  jde-open-get-class-to-open(("(Integer)" "driverMain") #("driverMain" 0 10 
(fontified t)))
  jde-open-class-at-point()
* call-interactively(jde-open-class-at-point)

Reply via email to