# HG changeset patch
# User Masatake YAMATO <jet@gyve.org>
# Date 1098577521 0
# Node ID 4d6eec4c1ef8eef2de55d569e20b69c6bbe53076
# Parent  32d43bf879990bfd106bc1386c9fa08933417b0a
* progmodes/gdb-ui.el (gdb-assembler-font-lock-keywords): Handle
periods and underscores in a function name.
Remove the address fontification.

diff -r 32d43bf87999 -r 4d6eec4c1ef8 lisp/ChangeLog
--- a/lisp/ChangeLog	Sat Oct 23 22:04:13 2004 +0000
+++ b/lisp/ChangeLog	Sun Oct 24 00:25:21 2004 +0000
@@ -1,3 +1,9 @@
+2004-10-24  Masatake YAMATO  <jet@gyve.org>
+
+	* progmodes/gdb-ui.el (gdb-assembler-font-lock-keywords): Handle
+	periods and underscores in a function name.
+	Remove the address fontification.
+
 2004-10-24 Masatake YAMATO <jet@gyve.org>
 
 	* progmodes/asm-mode.el (asm-font-lock-keywords): Use
diff -r 32d43bf87999 -r 4d6eec4c1ef8 lisp/progmodes/gdb-ui.el
--- a/lisp/progmodes/gdb-ui.el	Sat Oct 23 22:04:13 2004 +0000
+++ b/lisp/progmodes/gdb-ui.el	Sun Oct 24 00:25:21 2004 +0000
@@ -177,7 +177,7 @@
 
   (setq comint-input-sender 'gdb-send)
   ;;
-  ;; (re-)initialise
+  ;; (re-)initialize
   (setq gdb-current-address "main")
   (setq gdb-previous-address nil)
   (setq gdb-previous-frame nil)
@@ -1950,13 +1950,15 @@
     map))
 
 (defvar gdb-assembler-font-lock-keywords
-  '(("[^\$]0x[0-9a-f]+" . font-lock-constant-face)
-    ("^\\(0x*[0-9a-f]+\\) ?\\(<\\(\\sw+\\)\\+[0-9]+>\\)?:[ \t]+\\(\\sw+\\)"
-     (1 font-lock-constant-face) 
-     (3 font-lock-function-name-face) 
+  '(;; <__function.name+n>
+    ("<\\(\\(\\sw\\|[_.]\\)+\\)\\(\\+[0-9]+\\)?>"
+     (1 font-lock-function-name-face))
+    ;; 0xNNNNNNNN <__function.name+n>: opcode
+    ("^0x[0-9a-f]+ \\(<\\(\\(\\sw\\|[_.]\\)+\\)\\+[0-9]+>\\)?:[ \t]+\\(\\sw+\\)"
      (4 font-lock-keyword-face))
+    ;; %register(at least i386)
     ("%\\sw+" . font-lock-variable-name-face)
-    ("^\\(Dump of assembler code for function\\) \\(.+\\):" 
+    ("^\\(Dump of assembler code for function\\) \\(.+\\):"
      (1 font-lock-comment-face)
      (2 font-lock-function-name-face))
     ("^\\(End of assembler dump\\.\\)" . font-lock-comment-face))