udalrich / jdibug

Automatically exported from code.google.com/p/jdibug
17 stars 4 forks source link

'wrong-type-argument stringp 99' when setting breakpoint #1

Open GoogleCodeExporter opened 9 years ago

GoogleCodeExporter commented 9 years ago
What steps will reproduce the problem?
1. Load jdibug, run C-c C-c C-c
2. Then run C-c C-c C-b to set break point, at this point you get:

Debugger entered--Lisp error: (wrong-type-argument stringp 99)
  string-match(99 "c:/Documents and
Settings/u0103223/dev/misc/src/main/java/DirectoryZipper.java")
  (lambda (sp) (string-match sp file))(99)
  cl-position(nil "c:\\Documents and
Settings\\u0103223\\dev\\misc\\src\\main\\java" 0 nil nil)
  position(nil "c:\\Documents and
Settings\\u0103223\\dev\\misc\\src\\main\\java" :if (lambda (sp)
(string-match sp file)))
  apply(position nil "c:\\Documents and
Settings\\u0103223\\dev\\misc\\src\\main\\java" (:if (lambda (sp)
(string-match sp file))))
  find(nil "c:\\Documents and
Settings\\u0103223\\dev\\misc\\src\\main\\java" :if (lambda (sp)
(string-match sp file)))
  apply(find nil "c:\\Documents and
Settings\\u0103223\\dev\\misc\\src\\main\\java" :if (lambda (sp)
(string-match sp file)) nil)
  find-if((lambda (sp) (string-match sp file)) "c:\\Documents and
Settings\\u0103223\\dev\\misc\\src\\main\\java")
  jdi-file-in-source-paths-p([cl-struct-jdi [cl-struct-jdwp nil nil nil 0
nil nil nil (jdi #0) 4 4 4 4 4] "c:\\Documents and
Settings\\u0103223\\dev\\misc\\src\\main\\java" nil nil nil nil nil nil nil
nil nil nil nil nil failed-to-connect nil] "c:/Documents and
Settings/u0103223/dev/misc/src/main/java/DirectoryZipper.java")
  (not (jdi-file-in-source-paths-p jdi source-file))
  (if (not (jdi-file-in-source-paths-p jdi source-file)) (message "JDIbug
setting breakpoint...file not in source path!") (jdi-set-breakpoint jdi
source-file line-number) (let (...) (cond ... ... ...)))
  (lambda (jdibug jdi source-file line-number bp) (if (not ...) (message
"JDIbug setting breakpoint...file not in source path!") (jdi-set-breakpoint
jdi source-file line-number) (let ... ...)))([cl-struct-jdibug
[cl-struct-jdi [cl-struct-jdwp nil nil nil 0 nil nil nil ... 4 4 4 4 4]
"c:\\Documents and Settings\\u0103223\\dev\\misc\\src\\main\\java" nil nil
nil nil nil nil nil nil nil nil nil nil failed-to-connect nil] nil nil nil
nil nil nil nil] [cl-struct-jdi [cl-struct-jdwp nil nil nil 0 nil nil nil
(jdi #0) 4 4 4 4 4] "c:\\Documents and
Settings\\u0103223\\dev\\misc\\src\\main\\java" nil nil nil nil nil nil nil
nil nil nil nil nil failed-to-connect nil] "c:/Documents and
Settings/u0103223/dev/misc/src/main/java/DirectoryZipper.java" 87
[cl-struct-jdibug-breakpoint "c:/Documents and
Settings/u0103223/dev/misc/src/main/java/DirectoryZipper.java" 87 nil nil])
  apply((lambda (jdibug jdi source-file line-number bp) (if (not ...)
(message "JDIbug setting breakpoint...file not in source path!")
(jdi-set-breakpoint jdi source-file line-number) (let ... ...)))
([cl-struct-jdibug [cl-struct-jdi [cl-struct-jdwp nil nil nil 0 nil nil nil
... 4 4 4 4 4] "c:\\Documents and
Settings\\u0103223\\dev\\misc\\src\\main\\java" nil nil nil nil nil nil nil
nil nil nil nil nil failed-to-connect nil] nil nil nil nil nil nil nil]
[cl-struct-jdi [cl-struct-jdwp nil nil nil 0 nil nil nil ... 4 4 4 4 4]
"c:\\Documents and Settings\\u0103223\\dev\\misc\\src\\main\\java" nil nil
nil nil nil nil nil nil nil nil nil nil failed-to-connect nil]
"c:/Documents and
Settings/u0103223/dev/misc/src/main/java/DirectoryZipper.java" 87
[cl-struct-jdibug-breakpoint "c:/Documents and
Settings/u0103223/dev/misc/src/main/java/DirectoryZipper.java" 87 nil nil]))
  (progn (apply (ado-action cc) (ado-saved-args cc)) (setf (ado-action cc)
nil))
  (if (functionp (ado-action cc)) (progn (apply ... ...) (setf ... nil)))
  (when (functionp (ado-action cc)) (apply (ado-action cc) (ado-saved-args
cc)) (setf (ado-action cc) nil))
  (let ((ado-cc cc) (ado-last-return-value ...)) (ado-dump "  executing "
cc) (when (functionp ...) (apply ... ...) (setf ... nil)) (ado-dump " 
executed " cc) (unless (or ... ...) (setq cc ...)) (if (or ... ... ...)
(setq done t)))
  (while (and cc (not done)) (let (... ...) (ado-dump "  executing " cc)
(when ... ... ...) (ado-dump "  executed " cc) (unless ... ...) (if ... ...)))
  (let ((done nil)) (while (and cc ...) (let ... ... ... ... ... ...)))
  ado-start([cl-struct-ado (lambda (jdibug jdi source-file line-number bp)
(if ... ... ... ...)) ([cl-struct-jdibug [cl-struct-jdi [cl-struct-jdwp nil
nil nil 0 nil nil nil ... 4 4 4 4 4] "c:\\Documents and
Settings\\u0103223\\dev\\misc\\src\\main\\java" nil nil nil nil nil nil nil
nil nil nil nil nil failed-to-connect nil] nil nil nil nil nil nil nil]
[cl-struct-jdi [cl-struct-jdwp nil nil nil 0 nil nil nil ... 4 4 4 4 4]
"c:\\Documents and Settings\\u0103223\\dev\\misc\\src\\main\\java" nil nil
nil nil nil nil nil nil nil nil nil nil failed-to-connect nil]
"c:/Documents and
Settings/u0103223/dev/misc/src/main/java/DirectoryZipper.java" 87
[cl-struct-jdibug-breakpoint "c:/Documents and
Settings/u0103223/dev/misc/src/main/java/DirectoryZipper.java" 87 nil nil])
[cl-struct-ado nil nil nil nil (#0) 0] nil nil 0])
  (let ((parent ado-cc) (ado-cc ...)) (if parent (ado-cc-add-child parent
ado-cc)) (mapc (lambda ... ...) (list ...)) (ado-start (car ...)))
  (ado (jdibug jdi source-file line-number bp) (if (not ...) (message
"JDIbug setting breakpoint...file not in source path!") (jdi-set-breakpoint
jdi source-file line-number) (let ... ...)))
  (let ((source-file ...) (line-number ...) (jdi ...)) (message "JDIbug
setting breakpoint...") (ado (jdibug jdi source-file line-number bp) (if
... ... ... ...)))
  jdibug-set-breakpoint([cl-struct-jdibug [cl-struct-jdi [cl-struct-jdwp
nil nil nil 0 nil nil nil ... 4 4 4 4 4] "c:\\Documents and
Settings\\u0103223\\dev\\misc\\src\\main\\java" nil nil nil nil nil nil nil
nil nil nil nil nil failed-to-connect nil] nil nil nil nil nil nil nil]
[cl-struct-jdibug-breakpoint "c:/Documents and
Settings/u0103223/dev/misc/src/main/java/DirectoryZipper.java" 87 nil nil])
  (cond ((and bp ...) (jdibug-disable-breakpoint jdibug-this bp)) ((and bp
...) (jdibug-remove-breakpoint jdibug-this bp)) (t (jdibug-set-breakpoint
jdibug-this ...)))
  (let* ((source-file ...) (line-number ...) (jdi ...) (bp ...)) (cond (...
...) (... ...) (t ...)))
  jdibug-toggle-breakpoint()
  call-interactively(jdibug-toggle-breakpoint nil nil)

What is the expected output? What do you see instead?

What version of the product are you using? On what operating system?

Please provide any additional information below.

Original issue reported on code.google.com by david.b...@gmail.com on 21 May 2008 at 12:44

GoogleCodeExporter commented 9 years ago
My source path is set: "c:\\Documents and 
Settings\\u0103223\\dev\\misc\\src\\main\\java"

Original comment by david.b...@gmail.com on 21 May 2008 at 12:49

GoogleCodeExporter commented 9 years ago
It happens to me when I am using emacs on windows XP, but works ok in OSX 10.4 
(haven't test it on Linux).

Original comment by jjmolin...@gmail.com on 25 Jul 2008 at 6:16