Mercurial > emacs
changeset 51655:abc46b69deaa
* progmodes/asm-mode.el (asm-font-lock-keywords): Support
labels starting with "." and directives starting with ".".
| author | Masatake YAMATO <jet@gyve.org> |
|---|---|
| date | Wed, 25 Jun 2003 06:52:04 +0000 |
| parents | 24b62b8f3def |
| children | 67ba18a34bfd |
| files | lisp/ChangeLog lisp/progmodes/asm-mode.el |
| diffstat | 2 files changed, 13 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Tue Jun 24 18:16:37 2003 +0000 +++ b/lisp/ChangeLog Wed Jun 25 06:52:04 2003 +0000 @@ -1,3 +1,8 @@ +2003-06-20 Masatake YAMATO <jet@gyve.org> + + * progmodes/asm-mode.el (asm-font-lock-keywords): Support + labels starting with "." and directives starting with ".". + 2003-06-22 Andreas Schwab <schwab@suse.de> * emacs-lisp/easy-mmode.el (easy-mmode-define-navigation): Avoid
--- a/lisp/progmodes/asm-mode.el Tue Jun 24 18:16:37 2003 +0000 +++ b/lisp/progmodes/asm-mode.el Wed Jun 25 06:52:04 2003 +0000 @@ -83,8 +83,14 @@ (defconst asm-font-lock-keywords '(("^\\(\\(\\sw\\|\\s_\\)+\\)\\>:?[ \t]*\\(\\sw+\\(\\.\\sw+\\)*\\)?" (1 font-lock-function-name-face) (3 font-lock-keyword-face nil t)) - ("^\\((\\sw+)\\)?\\s +\\(\\(\\sw\\|\\s_\\)+\\(\\.\\sw+\\)*\\)" - 2 font-lock-keyword-face)) + ;; label started from ".". + ("^\\(\\.\\(\\sw\\|\\s_\\)+\\)\\>:" + 1 font-lock-function-name-face) + ("^\\((\\sw+)\\)?\\s +\\(\\(\\.?\\sw\\|\\s_\\)+\\(\\.\\sw+\\)*\\)" + 2 font-lock-keyword-face) + ;; directive started from ".". + ("^\\(\\.\\(\\sw\\|\\s_\\)+\\)\\>[^:]?" + 1 font-lock-keyword-face)) "Additional expressions to highlight in Assembler mode.") ;;;###autoload