Mercurial > emacs
changeset 57664:4d6eec4c1ef8
* progmodes/gdb-ui.el (gdb-assembler-font-lock-keywords): Handle
periods and underscores in a function name.
Remove the address fontification.
author | Masatake YAMATO <jet@gyve.org> |
---|---|
date | Sun, 24 Oct 2004 00:25:21 +0000 |
parents | 32d43bf87999 |
children | b8ccc605c96d |
files | lisp/ChangeLog lisp/progmodes/gdb-ui.el |
diffstat | 2 files changed, 14 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- 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
--- 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))