(asm-mode): Added syntax table entries for /* */ comments.

lisp/ChangeLog

+2003-01-23  Masatake YAMATO  <jet@gyve.org>
+
+	* progmodes/asm-mode.el (asm-mode): Added syntax table entries for
+	/* */ comments.
+
 2003-01-23  Kenichi Handa  <handa@m17n.org>
 	* files.el (insert-directory): Read the output of "ls" by
@@ -82,7 +87,7 @@
 	* progmodes/octave-mod.el (octave-mode-map): Change C-c i bindings
 	to C-c C-i.  Duplicate its bindings with last char a ctl char.
 	Also change C-c f to C-c C-f.
-	
+
 2003-01-20  Markus Rost  <rost@math.ohio-state.edu>
 	* ls-lisp.el (ls-lisp-use-insert-directory-program): Make default
@@ -206,7 +211,7 @@
 	* loadup.el: Include lisp/textmodes in load-path for bootstrap
 	emacs, to resolve ispell menu reference.
-2003-01-15  YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>  (tiny change)
+2003-01-15  YAMAMOTO Mitsuharu  <mituharu@math.s.chiba-u.ac.jp>  (tiny change)
 	* international/mule.el (optimize-char-coding-system-table):
 	Optimize it.
@@ -906,7 +911,7 @@
 	(tooltip-gud-process-output): Undo previous change.
 	(tooltip-strip-annotations): Remove.
-2002-12-22  Zoltan Kemenczy <zoltan@ieee.org>
+2002-12-22  Zoltan Kemenczy  <zoltan@ieee.org>
 	* gud.el (gud-menu-map): Add jdb support for "run".
 	(gud-jdb-find-source-using-classpath): Use 'identity.
@@ -1276,7 +1281,7 @@
 	* files.el (find-file-read-args): Reenable wildcard processing
 	unconditionally.
-2002-12-06  Robert J. Chassell <bob@rattlesnake.com>
+2002-12-06  Robert J. Chassell  <bob@rattlesnake.com>
 	* textmodes/texinfmt.el (texinfo-format-scan): Handle new
 	functions for copyright notice and copying permissions.

lisp/progmodes/asm-mode.el

@@ -128,9 +128,13 @@ Special commands:
   (local-set-key (vector asm-comment-char) 'asm-comment)
 
   (modify-syntax-entry	asm-comment-char
-			"<" asm-mode-syntax-table)
+			"< b" asm-mode-syntax-table)
   (modify-syntax-entry	?\n
-			 ">" asm-mode-syntax-table)
+			 "> b" asm-mode-syntax-table)
+
+  (modify-syntax-entry ?/  ". 14" asm-mode-syntax-table)
+  (modify-syntax-entry ?*  ". 23" asm-mode-syntax-table)
+
   (let ((cs (regexp-quote (char-to-string asm-comment-char))))
     (make-local-variable 'comment-start)
     (setq comment-start (concat (char-to-string asm-comment-char) " "))
@@ -213,13 +217,13 @@ repeatedly until you are satisfied with the kind of comment."
     (insert asm-comment-char))
 
    ;; Empty code-level comment already present?
-   ;; Then start flush-left comment, on line above if this one is nonempty. 
+   ;; Then start flush-left comment, on line above if this one is nonempty.
    ((asm-line-matches asm-code-level-empty-comment-pattern)
     (asm-pop-comment-level)
     (insert asm-comment-char asm-comment-char comment-start))
 
    ;; Empty comment ends line?
-   ;; Then make code-level comment, on line above if this one is nonempty. 
+   ;; Then make code-level comment, on line above if this one is nonempty.
    ((asm-line-matches asm-inline-empty-comment-pattern)
     (asm-pop-comment-level)
     (tab-to-tab-stop)