Add a syntax table to dwarf-mode.el
authorTom Tromey <tom@tromey.com>
Mon, 25 Jun 2018 03:25:44 +0000 (21:25 -0600)
committerTom Tromey <tom@tromey.com>
Mon, 25 Jun 2018 14:38:00 +0000 (08:38 -0600)
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-25  Tom Tromey  <tom@tromey.com>

* dwarf-mode.el (dwarf-mode-syntax-table): New variable.
Bump version number.

binutils/ChangeLog
binutils/dwarf-mode.el

index 28babb2224010f420c5d85b31b75bbad4d8a823a..08c00c6f1d542bf92e14caf34c3d13f7768e1fc6 100644 (file)
@@ -1,3 +1,8 @@
+2018-06-25  Tom Tromey  <tom@tromey.com>
+
+       * dwarf-mode.el (dwarf-mode-syntax-table): New variable.
+       Bump version number.
+
 2018-06-24  Nick Clifton  <nickc@redhat.com>
 
        * README-how-to-make-a-release: Update with experiences from
index 8eed1b7df6053ab2e292b5c556dade5c6ed48ba1..3692f0ef27d789241ea2e50904b3bc21486cb8bb 100644 (file)
@@ -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)