mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(asm-font-lock-keywords): Allow arbitrary

Browse source 
words separated by dots.  Match optional parenthesized word at
start of line.
This commit is contained in:
Andreas Schwab 2003-02-02 17:35:47 +00:00
parent 4cac2fc3fa
commit 769c4c6377
2 changed files with 14 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lisp/ChangeLog
View file

@ -1,3 +1,13 @@
2003-02-02 Andreas Schwab <schwab@suse.de>
* progmodes/asm-mode.el (asm-font-lock-keywords): Allow arbitrary
words separated by dots. Match optional parenthesized word at
start of line.
* font-lock.el
(font-lock-match-c-style-declaration-item-and-skip-to-next):
Don't require underscore in word before double open-paren.
2003-02-02 John Paul Wallington <jpw@gnu.org>
* hexl.el (hexl-mode-map): Bind C-m to `hexl-self-insert-command'.

7
lisp/progmodes/asm-mode.el
View file

@ -1,6 +1,6 @@
;;; asm-mode.el --- mode for editing assembler code
;; Copyright (C) 1991 Free Software Foundation, Inc.
;; Copyright (C) 1991, 2003 Free Software Foundation, Inc.
;; Author: Eric S. Raymond <esr@snark.thyrsus.com>
;; Maintainer: FSF
@ -80,9 +80,10 @@
)
(defconst asm-font-lock-keywords
'(("^\\(\\(\\sw\\|\\s_\\)+\\)\\>:?[ \t]*\\(\\sw+\\(\\.[lLwWbBsS]\\)?\\)?"
'(("^\\(\\(\\sw\\|\\s_\\)+\\)\\>:?[ \t]*\\(\\sw+\\(\\.\\sw+\\)*\\)?"
(1 font-lock-function-name-face) (3 font-lock-keyword-face nil t))
("^\\s +\\(\\(\\sw\\|\\s_\\)+\\(\\.[lLwWbBsS]\\)?\\)" 1 font-lock-keyword-face))
("^\\((\\sw+)\\)?\\s +\\(\\(\\sw\\|\\s_\\)+\\(\\.\\sw+\\)*\\)"
2 font-lock-keyword-face))
"Additional expressions to highlight in Assembler mode.")
(defvar asm-code-level-empty-comment-pattern nil)