summaryrefslogtreecommitdiff
path: root/lisp/progmodes/asm-mode.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/progmodes/asm-mode.el')
-rw-r--r--lisp/progmodes/asm-mode.el10
1 files changed, 7 insertions, 3 deletions
diff --git a/lisp/progmodes/asm-mode.el b/lisp/progmodes/asm-mode.el
index 5b8a0567066..d47c525c5f9 100644
--- a/lisp/progmodes/asm-mode.el
+++ b/lisp/progmodes/asm-mode.el
@@ -2,7 +2,7 @@
;; Copyright (C) 1991, 2001-2024 Free Software Foundation, Inc.
-;; Author: Eric S. Raymond <esr@snark.thyrsus.com>
+;; Author: Eric S. Raymond <esr@thyrsus.com>
;; Maintainer: emacs-devel@gnu.org
;; Keywords: languages
@@ -23,7 +23,7 @@
;;; Commentary:
-;; This mode was written by Eric S. Raymond <esr@snark.thyrsus.com>,
+;; This mode was written by Eric S. Raymond <esr@thyrsus.com>,
;; inspired by an earlier `asm-mode' by Martin Neitzel.
;; This major mode is based on `prog-mode'. It defines a private
@@ -52,9 +52,13 @@
:link '(custom-group-link :tag "Font Lock Faces group" font-lock-faces)
:group 'languages)
+(defun asm--safe-comment-char-p (char)
+ (memq char '(?\; ?# ?@)))
+
(defcustom asm-comment-char ?\;
"The `comment-start' character assumed by Asm mode."
- :type 'character)
+ :type 'character
+ :safe #'asm--safe-comment-char-p)
(defvar asm-mode-syntax-table
(let ((st (make-syntax-table)))