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

    Remove support for FINISH
---
 a68-mode.el | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/a68-mode.el b/a68-mode.el
index a62f6eb197..beed91bf5b 100644
--- a/a68-mode.el
+++ b/a68-mode.el
@@ -77,7 +77,7 @@
   "List of Algol 68 standard modes and shortety.")
 
 (defconst a68-keywords
-  '("DECS" "PROGRAM" "CONTEXT" "USE" "FINISH" "KEEP"
+  '("DECS" "PROGRAM" "CONTEXT" "USE" "KEEP"
     "ALIEN" "UNTIL" "RE" "IM"
     "MODE" "OP" "PRIO" "PROC"
     "OF" "AT" "IS" "ISNT" "EMPTY" "SKIP"
@@ -153,8 +153,7 @@
                       (proc-decl (proc-decl "," proc-decl)
                                  ("OP" ids "=" args ids ":" exp)
                                  ("PROC" ids "=" ids ":" exp))
-                      (exports ("KEEP" fields "FINISH"))
-                      (program ("PROGRAM" exp "FINISH"))
+                      (program ("PROGRAM" exp))
                       ;; TODO: this don't cover all the loop
                       ;; possibilities.
                       (loop ("-do-" "DO" exp "OD")

Reply via email to