changeset 70227:3f695578124f

(asm-mode, asm-mode-syntax-table): Add support for "//" style comments. Remove `b' flag from ?* in `asm-mode-syntax-table'.
author Masatake YAMATO <jet@gyve.org>
date Wed, 26 Apr 2006 07:03:20 +0000
parents 6bc1222277e1
children e73582101f20
files lisp/ChangeLog lisp/progmodes/asm-mode.el
diffstat 2 files changed, 11 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Wed Apr 26 05:50:51 2006 +0000
+++ b/lisp/ChangeLog	Wed Apr 26 07:03:20 2006 +0000
@@ -1,3 +1,9 @@
+2006-04-26  Masatake YAMATO  <jet@gyve.org>
+
+	* progmodes/asm-mode.el (asm-mode, asm-mode-syntax-table): 
+	Add support for "//" style comments. Remove `b' flag
+	from ?* in `asm-mode-syntax-table'.
+
 2006-04-26  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* follow.el: Use (featurep 'xemacs) everywhere.
--- a/lisp/progmodes/asm-mode.el	Wed Apr 26 05:50:51 2006 +0000
+++ b/lisp/progmodes/asm-mode.el	Wed Apr 26 07:03:20 2006 +0000
@@ -62,9 +62,9 @@
 
 (defvar asm-mode-syntax-table
   (let ((st (make-syntax-table)))
-    (modify-syntax-entry ?\n ">" st)
-    (modify-syntax-entry ?/  ". 14b" st)
-    (modify-syntax-entry ?*  ". 23b" st)
+    (modify-syntax-entry ?\n "> b" st)
+    (modify-syntax-entry ?/  ". 124b" st)
+    (modify-syntax-entry ?*  ". 23" st)
     st)
   "Syntax table used while in Asm mode.")
 
@@ -136,14 +136,14 @@
   (use-local-map (nconc (make-sparse-keymap) asm-mode-map))
   (local-set-key (vector asm-comment-char) 'asm-comment)
   (set-syntax-table (make-syntax-table asm-mode-syntax-table))
-  (modify-syntax-entry	asm-comment-char "<")
+  (modify-syntax-entry	asm-comment-char "< b")
 
   (make-local-variable 'comment-start)
   (setq comment-start (string asm-comment-char))
   (make-local-variable 'comment-add)
   (setq comment-add 1)
   (make-local-variable 'comment-start-skip)
-  (setq comment-start-skip "\\(?:\\s<+\\|/\\*+\\)[ \t]*")
+  (setq comment-start-skip "\\(?:\\s<+\\|/[/*]+\\)[ \t]*")
   (make-local-variable 'comment-end-skip)
   (setq comment-end-skip "[ \t]*\\(\\s>\\|\\*+/\\)")
   (make-local-variable 'comment-end)