[FYI] Add a syntax table to dwarf-mode.el

Message ID 20180625032749.9314-1-tom@tromey.com
State New
Headers show
Series
  • [FYI] Add a syntax table to dwarf-mode.el
Related show

Commit Message

Tom Tromey June 25, 2018, 3:27 a.m.
This adds a syntax table for dwarf-mode to dwarf-mode.el.  I noticed
the need for this when trying to use mark-sexp (C-M-SPC) on a hex
number -- it copied the trailing ">" as well, which isn't desirable.

I've also bumped the version number to make this simpler to install
via the Emacs package system.

Tested locally.  I'm checking this in.

binutils/ChangeLog
2018-06-24  Tom Tromey  <tom@tromey.com>

	* dwarf-mode.el (dwarf-mode-syntax-table): New variable.
	Bump version number.
---
 binutils/ChangeLog     |  5 +++++
 binutils/dwarf-mode.el | 11 ++++++++++-
 2 files changed, 15 insertions(+), 1 deletion(-)

-- 
2.13.6

Patch

diff --git a/binutils/dwarf-mode.el b/binutils/dwarf-mode.el
index 8eed1b7df60..3692f0ef27d 100644
--- a/binutils/dwarf-mode.el
+++ b/binutils/dwarf-mode.el
@@ -1,6 +1,6 @@ 
 ;;; dwarf-mode.el --- Browser for DWARF information. -*-lexical-binding:t-*-
 
-;; Version: 1.4
+;; Version: 1.5
 
 ;; Copyright (C) 2012-2018 Free Software Foundation, Inc.
 
@@ -181,6 +181,15 @@  A prefix argument means expand all children."
 		   (expand-file-name dwarf-file))
     (set-buffer-modified-p nil)))
 
+(defvar dwarf-mode-syntax-table
+  (let ((table (make-syntax-table)))
+    ;; This at least makes it so mark-sexp on some hex digits inside
+    ;; <...> does not also copy the ">".
+    (modify-syntax-entry ?< "(>" table)
+    (modify-syntax-entry ?> ")<" table)
+    table)
+  "Syntax table for dwarf-mode buffers.")
+
 (defvar dwarf-mode-map
   (let ((map (make-sparse-keymap)))
     (set-keymap-parent map special-mode-map)