[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/progmodes/gdb-ui.el
From: |
Nick Roberts |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/progmodes/gdb-ui.el |
Date: |
Sun, 29 May 2005 06:48:29 -0400 |
Index: emacs/lisp/progmodes/gdb-ui.el
diff -c emacs/lisp/progmodes/gdb-ui.el:1.73 emacs/lisp/progmodes/gdb-ui.el:1.74
*** emacs/lisp/progmodes/gdb-ui.el:1.73 Sat May 28 12:15:33 2005
--- emacs/lisp/progmodes/gdb-ui.el Sun May 29 10:48:29 2005
***************
*** 1766,1772 ****
gdb-read-memory-handler
gdb-read-memory-custom)
! (defun gdb-read-memory-custom ())
(defvar gdb-memory-mode-map
(let ((map (make-sparse-keymap)))
--- 1766,1776 ----
gdb-read-memory-handler
gdb-read-memory-custom)
! (defun gdb-read-memory-custom ()
! (save-excursion
! (goto-char (point-min))
! (if (looking-at "0x[[:xdigit:]]+")
! (setq gdb-memory-address (match-string 0)))))
(defvar gdb-memory-mode-map
(let ((map (make-sparse-keymap)))
***************
*** 1790,1797 ****
(select-window (posn-window (event-start event)))
(let* ((arg (read-from-minibuffer "Repeat count: "))
(count (string-to-number arg)))
! (if (< count 0)
! (error "Non-negative numbers only")
(customize-set-variable 'gdb-memory-repeat-count count)
(gdb-invalidate-memory)))))
--- 1794,1801 ----
(select-window (posn-window (event-start event)))
(let* ((arg (read-from-minibuffer "Repeat count: "))
(count (string-to-number arg)))
! (if (<= count 0)
! (error "Positive numbers only")
(customize-set-variable 'gdb-memory-repeat-count count)
(gdb-invalidate-memory)))))
***************
*** 1944,1950 ****
(setq header-line-format
'(:eval
(concat
! "Read address: "
(propertize gdb-memory-address
'face font-lock-warning-face
'help-echo "mouse-1: Set memory address"
--- 1948,1985 ----
(setq header-line-format
'(:eval
(concat
! "Read address["
! (propertize
! "-"
! 'face font-lock-warning-face
! 'help-echo "mouse-1: Decrement address"
! 'mouse-face 'mode-line-highlight
! 'local-map
! (gdb-make-header-line-mouse-map
! 'mouse-1
! #'(lambda () (interactive)
! (let ((gdb-memory-address
! ;; let GDB do the arithmetic
! (concat
! gdb-memory-address " - "
! (number-to-string
! (* gdb-memory-repeat-count
! (cond ((string= gdb-memory-unit "b") 1)
! ((string= gdb-memory-unit "h") 2)
! ((string= gdb-memory-unit "w") 4)
! ((string= gdb-memory-unit "g") 8)))))))
! (gdb-invalidate-memory)))))
! "|"
! (propertize "+"
! 'face font-lock-warning-face
! 'help-echo "mouse-1: Increment address"
! 'mouse-face 'mode-line-highlight
! 'local-map (gdb-make-header-line-mouse-map
! 'mouse-1
! #'(lambda () (interactive)
! (let ((gdb-memory-address nil))
! (gdb-invalidate-memory)))))
! "]: "
(propertize gdb-memory-address
'face font-lock-warning-face
'help-echo "mouse-1: Set memory address"
- [Emacs-diffs] Changes to emacs/lisp/progmodes/gdb-ui.el, (continued)
- [Emacs-diffs] Changes to emacs/lisp/progmodes/gdb-ui.el, Nick Roberts, 2005/05/04
- [Emacs-diffs] Changes to emacs/lisp/progmodes/gdb-ui.el, Eli Zaretskii, 2005/05/06
- [Emacs-diffs] Changes to emacs/lisp/progmodes/gdb-ui.el, Nick Roberts, 2005/05/06
- [Emacs-diffs] Changes to emacs/lisp/progmodes/gdb-ui.el, Nick Roberts, 2005/05/09
- [Emacs-diffs] Changes to emacs/lisp/progmodes/gdb-ui.el, Nick Roberts, 2005/05/22
- [Emacs-diffs] Changes to emacs/lisp/progmodes/gdb-ui.el, Nick Roberts, 2005/05/23
- [Emacs-diffs] Changes to emacs/lisp/progmodes/gdb-ui.el, Nick Roberts, 2005/05/26
- [Emacs-diffs] Changes to emacs/lisp/progmodes/gdb-ui.el, Nick Roberts, 2005/05/26
- [Emacs-diffs] Changes to emacs/lisp/progmodes/gdb-ui.el, Nick Roberts, 2005/05/27
- [Emacs-diffs] Changes to emacs/lisp/progmodes/gdb-ui.el, Nick Roberts, 2005/05/28
- [Emacs-diffs] Changes to emacs/lisp/progmodes/gdb-ui.el,
Nick Roberts <=
- [Emacs-diffs] Changes to emacs/lisp/progmodes/gdb-ui.el, Nick Roberts, 2005/05/30
- [Emacs-diffs] Changes to emacs/lisp/progmodes/gdb-ui.el, Nick Roberts, 2005/05/31