;; GNU General Public License for more details.
;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs; see the file COPYING. If not, write to
-;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
+;; along with GNU Emacs; see the file COPYING. If not, write to the
+;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+;; Boston, MA 02111-1307, USA.
;;; Commentary:
;;; Code:
-(defvar asm-comment-char ?;
- "*The comment-start character assumed by Asm mode.")
+(defgroup asm nil
+ "Mode for editing assembler code."
+ :group 'languages)
+
+(defcustom asm-comment-char ?;
+ "*The comment-start character assumed by Asm mode."
+ :type 'character
+ :group 'asm)
(defvar asm-mode-syntax-table nil
"Syntax table used while in Asm mode.")
(setq asm-mode-map (make-sparse-keymap))
;; Note that the comment character isn't set up until asm-mode is called.
(define-key asm-mode-map ":" 'asm-colon)
+ (define-key asm-mode-map "\C-c;" 'comment-region)
(define-key asm-mode-map "\C-i" 'tab-to-tab-stop)
(define-key asm-mode-map "\C-j" 'asm-newline)
(define-key asm-mode-map "\C-m" 'asm-newline)
)
(end-of-line))
+(provide 'asm-mode)
+
;;; asm-mode.el ends here