branch: externals/a68-mode
commit 0f88edfd2a9b5eff31b51fa94f6a9798fcc52d4e
Author: Jose E. Marchesi <[email protected]>
Commit: Jose E. Marchesi <[email protected]>

    Highlight "proc" as a keyword unless in a declarer
---
 a68-mode.el | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/a68-mode.el b/a68-mode.el
index 604081e1d8..c8dd3db1ab 100644
--- a/a68-mode.el
+++ b/a68-mode.el
@@ -285,6 +285,10 @@
                    (eval `(or ,@a68-keywords-upper))
                    word-end)
                ''a68-keyword-face)
+         ;; A proc followed by a tag and then = should be highlighted as a
+         ;; keyword, not as a mode declarer constituent.
+         '("\\(\\<PROC\\>\\)[ \t]*\\<\\([a-z][a-z]+_?\\)+\\>[ \t]*="
+           1 ''a68-keyword-face)
          (cons (rx word-start
                    (eval `(or ,@a68-std-modes-upper))
                    word-end)
@@ -313,6 +317,10 @@
               (eval `(or ,@a68-keywords-supper))
               word-end)
           ''a68-keyword-face)
+    ;; A proc followed by a tag and then = should be highlighted as a
+    ;; keyword, not as a mode declarer constituent.
+    '("\\(\\<proc\\>\\)[ \t]*\\<\\([a-z][a-z]+_?\\)+\\>[ \t]*="
+      1 ''a68-keyword-face)
     (cons (rx word-start
               (eval `(or ,@a68-std-modes-supper))
               word-end)

Reply via email to