From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: Masatake YAMATO Newsgroups: gmane.emacs.devel Subject: a label starting from . Date: Fri, 20 Jun 2003 22:48:39 +0900 (JST) Sender: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Message-ID: <20030620.224839.48823958.jet@gyve.org> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: Text/Plain; charset=us-ascii Content-Transfer-Encoding: 7bit X-Trace: main.gmane.org 1056117189 4338 80.91.224.249 (20 Jun 2003 13:53:09 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Fri, 20 Jun 2003 13:53:09 +0000 (UTC) Original-X-From: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Fri Jun 20 15:53:02 2003 Return-path: Original-Received: from quimby.gnus.org ([80.91.224.244]) by main.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 19TMK5-00016s-00 for ; Fri, 20 Jun 2003 15:53:01 +0200 Original-Received: from monty-python.gnu.org ([199.232.76.173]) by quimby.gnus.org with esmtp (Exim 3.12 #1 (Debian)) id 19TMLi-0002UZ-00 for ; Fri, 20 Jun 2003 15:54:42 +0200 Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.20) id 19TMJ9-00089E-8i for emacs-devel@quimby.gnus.org; Fri, 20 Jun 2003 09:52:03 -0400 Original-Received: from list by monty-python.gnu.org with tmda-scanned (Exim 4.20) id 19TMII-00081r-H5 for emacs-devel@gnu.org; Fri, 20 Jun 2003 09:51:10 -0400 Original-Received: from mail by monty-python.gnu.org with spam-scanned (Exim 4.20) id 19TMI4-0007ep-M9 for emacs-devel@gnu.org; Fri, 20 Jun 2003 09:50:57 -0400 Original-Received: from r-maa.spacetown.ne.jp ([210.130.136.40]) by monty-python.gnu.org with esmtp (Exim 4.20) id 19TMFx-00059w-Ol for emacs-devel@gnu.org; Fri, 20 Jun 2003 09:48:45 -0400 Original-Received: from localhost (p4108-ipad13sapodori.hokkaido.ocn.ne.jp [219.162.65.108]) by r-maa.spacetown.ne.jp (8.11.6) with ESMTP id h5KDmeV03096 for ; Fri, 20 Jun 2003 22:48:40 +0900 (JST) Original-To: emacs-devel@gnu.org X-Mailer: Mew version 3.1.52 on Emacs 21.3 / Mule 5.0 (SAKAKI) X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1b5 Precedence: list List-Id: Emacs development discussions. List-Help: List-Post: List-Subscribe: , List-Archive: List-Unsubscribe: , Errors-To: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Xref: main.gmane.org gmane.emacs.devel:15169 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:15169 I've added code to support a label starting with "." in asm-mode.el. Here is the example of assembly language code from sodipodi: .o_clip: addl $3, %edi addl $4, %esi decl %ebx jnz .o_forx movl 20(%ebp), %eax addl %eax, 8(%ebp) movl 28(%ebp), %eax addl %eax, 24(%ebp) decl %ecx jnz .o_fory jmp .exit Without my patch .o_clip is not colored in font-lock-mode. Could I install? 2003-06-20 Masatake YAMATO * progmodes/asm-mode.el (asm-font-lock-keywords): Support a label starting with ".". Index: lisp/progmodes/asm-mode.el =================================================================== RCS file: /cvsroot/emacs/emacs/lisp/progmodes/asm-mode.el,v retrieving revision 1.26 diff -u -r1.26 asm-mode.el --- lisp/progmodes/asm-mode.el 2 Apr 2003 16:44:32 -0000 1.26 +++ lisp/progmodes/asm-mode.el 20 Jun 2003 09:42:30 -0000 @@ -83,6 +83,8 @@ (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_\\)+\\)\\>:" + (1 font-lock-function-name-face)) ("^\\((\\sw+)\\)?\\s +\\(\\(\\sw\\|\\s_\\)+\\(\\.\\sw+\\)*\\)" 2 font-lock-keyword-face)) "Additional expressions to highlight in Assembler mode.")