Mercurial > emacs

changeset 49402:99a31f21f1c9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(asm-mode): Added syntax table entries for /* */ comments.
author Juanma Barranquero <lekktu@gmail.com>
date Thu, 23 Jan 2003 09:11:46 +0000
parents a57a71b7eaae
children 7d900f9e80ee
files lisp/progmodes/asm-mode.el
diffstat 1 files changed, 8 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/asm-mode.el	Thu Jan 23 05:59:47 2003 +0000
+++ b/lisp/progmodes/asm-mode.el	Thu Jan 23 09:11:46 2003 +0000
@@ -128,9 +128,13 @@
   (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 @@
     (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)