This also didn't make it our to the list originally, so am resending.
Thanks

Chuck

-----Original Message-----
From: Irvine, Chuck R. 
Sent: Tuesday, November 07, 2000 6:02 PM
To: JDEMailingList (E-mail)
Subject: JDE/JPDA Hanging When Invoking from HP


I am trying to get JDE/JDebug working on an HP box. When I try to start
the debugger via the "JDE->Debug App" command, emacs hangs with the
message "menu-bar JDE Debug App" in the mini buffer (otherwise I would
send a more proper bug report :-) We do know that HP supports JPDA (to
some extent at least). We have been able to attach remotely to a debugee
process started on the HP. To start with, is there any way that I can
figure out how JDE is trying to launch the debugee process, i.e. with
what arguments? (kind of difficult with emacs hanging) Any help is
appreciated at this point! I've attached my .emacs. Basically, I
followed the JDebug setup for jdk1.3 since the HP jdk is supposed to
support JPDA natively. Thanks

Chuck Irvine
Sprint



(custom-set-variables
 '(jde-compile-option-command-line-args "-g")
 '(jde-help-docsets (quote (("javadoc" "/opt/java1.2/docs/api" nil))))
 '(c-basic-offset 2)
 '(default-frame-alist (quote ((menu-bar-lines . 1) (background-color .
"black") (foreground-color . "burlywood") (font . "-*-Courier
New-normal-r-*-*-12-112-96-96-c-*-iso8859-1") (width . 79) (height .
52))))
 '(jde-bug-jdk-directory "/opt/java1.2/")
 '(show-paren-mode t nil (paren))
 '(jde-db-source-directories (quote (".")))
 '(jde-db-debugger (quote ("JDEbug" "" . "Executable")))
 '(frame-background-mode (quote dark))
 '(jde-bug-vm-includes-jpda-p t)
 '(jde-run-classic-mode-vm t))

(custom-set-faces
 '(font-lock-comment-face ((((class color) (background dark))
(:foreground "MistyRose3"))))
 '(info-xref ((t (:bold t :foreground "green"))))
 '(underline ((t (:underline t :foreground "green"))))
 '(info-node ((t (:bold t :italic t :foreground "green"))))
 '(show-paren-match-face ((((class color)) (:bold nil :foreground
"white" :background "slate gray"))))
 '(font-lock-variable-name-face ((((class color) (background dark))
(:foreground "plum"))))
 '(font-lock-function-name-face ((((class color) (background dark))
(:foreground "yellow"))))
 '(bold ((t (:bold t :foreground "green")))))

;;; make a new frame and delete the first one to get around
;;; color bug
(setq first-frame (car (frame-list)))
(make-frame)
;(sit-for 2)
;(delete-frame first-frame)

;; Set the debug option to enable a backtrace when a
;; problem occurs.
;;(setq debug-on-error t)
(setq debug-on-error nil)

;; Update the Emacs load-path to include the path to
;; the JDE and its require packages. This code assumes
;; that you have installed the packages in the emacs/site
;; subdirectory of your home directory.
(add-to-list 'load-path "/home/ccu1258/elisp/jde-2.2.6beta3/lisp")
(add-to-list 'load-path "/home/ccu1258/elisp/semantic-1.3.1")
(add-to-list 'load-path "/home/ccu1258/elisp/speedbar-0.13a")
(add-to-list 'load-path "/home/ccu1258/elisp/elib-1.0")
(add-to-list 'load-path (expand-file-name "~/elisp/ilisp-5.10.1"))

(require 'jde)

;;; get fancy minibuffer completions, e.g. fi-fi --> find-file
(require 'completer)

;;; Mode hook for JDE mode
(defun my-jde-mode-hook ()
  ;; Cause automatic filling (line breaking) in JDE buffer. Especially
  ;; nice for typing in multi-line commments (like this one!).
  (auto-fill-mode 1)
  (set-fill-column 78))
(add-hook 'jde-mode-hook 'my-jde-mode-hook)

(defun restart-debugger ()
  (interactive)
  (unwind-protect
      (progn (jde-bug-exit)
             (jde-bug-remove-dead-processes)
             (sit-for 2))
    (delete-other-windows)
    (sit-for 2)
    (jde-bug-debug-app)))

(defun exit-debugger ()
  (interactive)
  (unwind-protect
      (progn (jde-bug-exit)
             (jde-bug-remove-dead-processes)
             (sit-for 2))
    (delete-other-windows)
    (sit-for 2)))

(setq c-default-style '((jde-mode . "user") (other . "user")))
(setq c-basic-offset 2) 

(defun my-list-buffers ()
  (interactive)
  (list-buffers)
  (select-window (get-buffer-window "*Buffer List*")))
 
;;; command key defitions
(global-set-key [C-return] 'dabbrev-expand)
(global-set-key [(control x)(control b)] 'my-list-buffers)
(global-set-key "\C-xp" 'other-frame)

;; CVS configuration
(require 'vc-hooks)

(set-cursor-color "red")

Reply via email to