diff options
author | Tom Tromey <tromey@redhat.com> | 2012-06-13 14:01:41 +0000 |
---|---|---|
committer | Tom Tromey <tromey@redhat.com> | 2012-06-13 14:01:41 +0000 |
commit | 76be551890698c0cb0a74f7dc3440f5ddd30dd20 (patch) | |
tree | 1051a604a95cfbb411254aa411613b5eb3e1ead8 /binutils/dwarf-mode.el | |
parent | 623c389fb0355b08723219c30b27dbc72e017f9d (diff) | |
download | binutils-redhat-76be551890698c0cb0a74f7dc3440f5ddd30dd20.tar.gz |
* dwarf-mode.el: Add final comment. Bump version.
(dwarf-insert-substructure-button): Use string-to-number.
(dwarf-browse): Fix autoload cookie.
Diffstat (limited to 'binutils/dwarf-mode.el')
-rw-r--r-- | binutils/dwarf-mode.el | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/binutils/dwarf-mode.el b/binutils/dwarf-mode.el index f95319ded5..4c995ef763 100644 --- a/binutils/dwarf-mode.el +++ b/binutils/dwarf-mode.el @@ -1,6 +1,6 @@ ;;; 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 ;; same terms: @@ -56,7 +56,7 @@ (beginning-of-line) (unless (looking-at "^ <\\([0-9]+\\)>") (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))) (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) -;;:###autoload +;;;###autoload (defun dwarf-browse (file) "Invoke `objdump' and put output into a `dwarf-mode' buffer. This is the main interface to `dwarf-mode'." @@ -165,3 +165,5 @@ This is the main interface to `dwarf-mode'." (dwarf-do-refresh))) (provide 'dwarf-mode) + +;;; dwarf-mode.el ends here |