* dwarf-mode.el: Add final comment. Bump version.
(dwarf-insert-substructure-button): Use string-to-number. (dwarf-browse): Fix autoload cookie.
This commit is contained in:
parent
5eb3b0622d
commit
6f7b1488df
@ -1,3 +1,9 @@
|
|||||||
|
2012-06-12 Tom Tromey <tromey@redhat.com>
|
||||||
|
|
||||||
|
* dwarf-mode.el: Add final comment. Bump version.
|
||||||
|
(dwarf-insert-substructure-button): Use string-to-number.
|
||||||
|
(dwarf-browse): Fix autoload cookie.
|
||||||
|
|
||||||
2012-06-08 Jakub Jelinek <jakub@redhat.com>
|
2012-06-08 Jakub Jelinek <jakub@redhat.com>
|
||||||
|
|
||||||
* dwarf.c (read_and_display_attr_value): Handle
|
* dwarf.c (read_and_display_attr_value): Handle
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
;;; dwarf-mode.el --- Browser for DWARF information.
|
;;; dwarf-mode.el --- Browser for DWARF information.
|
||||||
|
|
||||||
;; Version: 1.0
|
;; Version: 1.1
|
||||||
|
|
||||||
;; This file is not part of GNU Emacs, but is distributed under the
|
;; This file is not part of GNU Emacs, but is distributed under the
|
||||||
;; same terms:
|
;; same terms:
|
||||||
@ -56,7 +56,7 @@
|
|||||||
(beginning-of-line)
|
(beginning-of-line)
|
||||||
(unless (looking-at "^ <\\([0-9]+\\)>")
|
(unless (looking-at "^ <\\([0-9]+\\)>")
|
||||||
(error "Unrecognized line."))
|
(error "Unrecognized line."))
|
||||||
(let ((new-depth (1+ (string-to-int (match-string 1)))))
|
(let ((new-depth (1+ (string-to-number (match-string 1)))))
|
||||||
(dwarf-do-insert-substructure new-depth die)))
|
(dwarf-do-insert-substructure new-depth die)))
|
||||||
|
|
||||||
(defun dwarf-insert-substructure (arg)
|
(defun dwarf-insert-substructure (arg)
|
||||||
@ -152,7 +152,7 @@ A prefix argument means expand all children."
|
|||||||
|
|
||||||
(define-key dwarf-mode-map [(control ?m)] #'dwarf-insert-substructure)
|
(define-key dwarf-mode-map [(control ?m)] #'dwarf-insert-substructure)
|
||||||
|
|
||||||
;;:###autoload
|
;;;###autoload
|
||||||
(defun dwarf-browse (file)
|
(defun dwarf-browse (file)
|
||||||
"Invoke `objdump' and put output into a `dwarf-mode' buffer.
|
"Invoke `objdump' and put output into a `dwarf-mode' buffer.
|
||||||
This is the main interface to `dwarf-mode'."
|
This is the main interface to `dwarf-mode'."
|
||||||
@ -165,3 +165,5 @@ This is the main interface to `dwarf-mode'."
|
|||||||
(dwarf-do-refresh)))
|
(dwarf-do-refresh)))
|
||||||
|
|
||||||
(provide 'dwarf-mode)
|
(provide 'dwarf-mode)
|
||||||
|
|
||||||
|
;;; dwarf-mode.el ends here
|
||||||
|
Loading…
Reference in New Issue
Block a user