branch: externals/a68-mode
commit 98828e5f09b628e026736018d1613ffc0d341c9d
Author: Jose E. Marchesi <jose.march...@oracle.com>
Commit: Jose E. Marchesi <jose.march...@oracle.com>

    Remove support for UNTIL
---
 a68-mode.el | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/a68-mode.el b/a68-mode.el
index 8b239ff48e..9f12e95545 100644
--- a/a68-mode.el
+++ b/a68-mode.el
@@ -77,7 +77,7 @@
 
   (defconst a68-keywords
     '("DECS" "PROGRAM" "CONTEXT" "USE" "KEEP"
-      "ALIEN" "UNTIL" "RE" "IM"
+      "ALIEN" "RE" "IM"
       "MODE" "OP" "PRIO" "PROC"
       "OF" "AT" "IS" "ISNT" "EMPTY" "SKIP"
       "PR" "PRAGMAT" "STRUCT" "UNION"
@@ -167,9 +167,7 @@
                             ("FOR" exp "BY" exp "TO" exp
                              "DO" exp "OD")
                             ("-to-" "TO" exp "DO" exp "OD")
-                            ("WHILE" exp "DO" exp "OD")
-                            ("WHILE" exp "UNTIL" exp "DO" exp "OD")
-                            ("-until-" "UNTIL" exp "DO" exp "OD"))
+                            ("WHILE" exp "DO" exp "OD"))
                       (insts (insts ";" insts)
                              (id ":=" exp)
                              ("IF" exp "THEN" insts "FI")

Reply via email to