commit - 5881861eb13d3710f190e056a46bba5bca731984
commit + 92d1f34ce412ff453b3533f9d12786d24e16a9c5
blob - 85f259d5964de33907b0faedd12cf6d682dcf064
blob + 4bb45f624228ab0200aab45ca8574e1d46c9c2ed
--- a68-mode.el
+++ a68-mode.el
(group bow "CO" eow))
(1 "<")
(3 ">"))
- ;; ((rx (group "#\\[^!\\]")
- ;; (group (*? anychar))
- ;; (group "#"))
- ;; (1 "<")
- ;; (3 ">"))
- )))
+ ;; a comment is # ... #, but I don't want the
+ ;; (eventual) shebang #! to be considered the start of
+ ;; the comment.
+ ((rx (group "#" (not "!"))
+ (group (*? anychar))
+ (group "#"))
+ (1 "<")
+ (3 ">")))))
;;;###autoload
(add-to-list 'auto-mode-alist '("\\.a68\\'" . a68-mode))