diff options
| author | Tom Tromey <tromey@redhat.com> | 2012-06-13 14:01:42 +0000 |
|---|---|---|
| committer | Tom Tromey <tromey@redhat.com> | 2012-06-13 14:01:42 +0000 |
| commit | 6f7b1488dfef186af999051b4c6d7a020340b201 (patch) | |
| tree | b51be5c72a4048429354a45d9f1dcbd2d6ddca0e /binutils/dwarf-mode.el | |
| parent | 5eb3b0622d103b592574538605fb0c6b16b24576 (diff) | |
| download | binutils-gdb-6f7b1488dfef186af999051b4c6d7a020340b201.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 f95319ded5c..4c995ef763b 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 |