[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/gdb-ui.el
From: |
Nick Roberts |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/gdb-ui.el |
Date: |
Mon, 07 Jul 2003 14:53:43 -0400 |
Index: emacs/lisp/gdb-ui.el
diff -c emacs/lisp/gdb-ui.el:1.37 emacs/lisp/gdb-ui.el:1.38
*** emacs/lisp/gdb-ui.el:1.37 Sun Jun 29 09:52:50 2003
--- emacs/lisp/gdb-ui.el Mon Jul 7 14:53:42 2003
***************
*** 178,187 ****
(gdb-enqueue-input (list "set new-console off\n" 'ignore)))
(gdb-enqueue-input (list "set height 0\n" 'ignore))
;; find source file and compilation directory here
! (gdb-enqueue-input (list "server list main\n" 'ignore)) ; C program
(gdb-enqueue-input (list "server list MAIN__\n" 'ignore)) ; Fortran
program
! (gdb-enqueue-input (list "server info source\n"
! 'gdb-source-info))
;;
(run-hooks 'gdba-mode-hook))
--- 178,186 ----
(gdb-enqueue-input (list "set new-console off\n" 'ignore)))
(gdb-enqueue-input (list "set height 0\n" 'ignore))
;; find source file and compilation directory here
! (gdb-enqueue-input (list "server list main\n" 'ignore)) ; C program
(gdb-enqueue-input (list "server list MAIN__\n" 'ignore)) ; Fortran
program
! (gdb-enqueue-input (list "server info source\n" 'gdb-source-info))
;;
(run-hooks 'gdba-mode-hook))
***************
*** 2085,2090 ****
--- 2084,2090 ----
(gdb-display-breakpoints-buffer)
(gdb-display-display-buffer)
(delete-other-windows)
+ (switch-to-buffer gud-comint-buffer)
(split-window nil ( / ( * (window-height) 3) 4))
(split-window nil ( / (window-height) 3))
(split-window-horizontally)
***************
*** 2183,2188 ****
--- 2183,2189 ----
(setq gdb-main-file (match-string 0)))
(setq gdb-view-source nil))
(delete-other-windows)
+ (switch-to-buffer gud-comint-buffer)
(if gdb-many-windows
(gdb-setup-windows)
(gdb-display-breakpoints-buffer)
***************
*** 2191,2197 ****
(split-window)
(other-window 1)
(if gdb-view-source
! (switch-to-buffer (gud-find-file gdb-main-file))
(switch-to-buffer (gdb-get-create-buffer 'gdb-assembler-buffer))
(gdb-invalidate-assembler))
(setq gdb-source-window (get-buffer-window (current-buffer)))
--- 2192,2201 ----
(split-window)
(other-window 1)
(if gdb-view-source
! (switch-to-buffer
! (if gud-last-last-frame
! (gud-find-file (car gud-last-last-frame))
! (gud-find-file gdb-main-file)))
(switch-to-buffer (gdb-get-create-buffer 'gdb-assembler-buffer))
(gdb-invalidate-assembler))
(setq gdb-source-window (get-buffer-window (current-buffer)))
- [Emacs-diffs] Changes to emacs/lisp/gdb-ui.el,
Nick Roberts <=