branch: externals/a68-mode
commit 6a96bb8b3e6ccccb839676617396d254c82c8a1e
Author: Jose E. Marchesi <jose.march...@oracle.com>
Commit: Jose E. Marchesi <jose.march...@oracle.com>
a68--oper-regexp regires posix semantics
---
a68-mode.el | 7 +------
1 file changed, 1 insertion(+), 6 deletions(-)
diff --git a/a68-mode.el b/a68-mode.el
index 353603f2eb..3607479552 100644
--- a/a68-mode.el
+++ b/a68-mode.el
@@ -373,11 +373,6 @@ with the equivalent upcased form."
("module" exp "def" exp "fed")
("module" exp "def" exp "postlude" exp "fed"))
;; Declarations:
- (declaration (type-decl)
- (proc-decl))
- (type-decl ("mode" type-decl*))
- (type-decl* (type-decl* "," type-decl*)
- (id "=" type-decl**))
(type-decl** ("struct" args)
("union" args)
("proc" args))
@@ -834,7 +829,7 @@ with the equivalent upcased form."
(let ((case-fold-search nil))
(cond
;; operator.
- ((looking-at a68--oper-regexp)
+ ((posix-looking-at a68--oper-regexp)
(goto-char (match-end 0))
"-oper-")
;; A bold-word may be a ssecca insert if it is preceded by a
