[A68-MODE][COMMITTED] a68--oper-regexp: add standard operator **

[Jose E. Marchesi]

---
 a68-mode.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/a68-mode.el b/a68-mode.el
index ff5d5c3..6384286 100644
--- a/a68-mode.el
+++ b/a68-mode.el
@@ -839,7 +839,7 @@ with the equivalent upcased form."
 
 ;; An operator indication is:
 ;; - A bold tag, or.
-;; - Any of the standard operators: *, /, =, /=, >, <, <=, >=, >
+;; - Any of the standard operators: *, **, /, =, /=, >, <, <=, >=, >
 ;; - Any monad, or
 ;; - A monad followed by a nomad, or
 ;; - A monad optionally followed by a nomad followd by either
@@ -847,7 +847,7 @@ with the equivalent upcased form."
 
 (defvar a68--oper-regexp
   (concat "\\("
-          "=\\|/=\\|>\\|<\\|<=\\|>=\\|>\\|*\\|/"
+          "=\\|/=\\|>\\|<\\|<=\\|>=\\|>\\|*\\|**\\|/"
           "\\|"
           (concat "\\(?:"
                   (regexp-opt a68--monads)
-- 
2.39.5