emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/ada-mode 64afd45 08/48: release ada-mode 5.1.4


From: Stefan Monnier
Subject: [elpa] externals/ada-mode 64afd45 08/48: release ada-mode 5.1.4
Date: Mon, 30 Nov 2020 17:20:36 -0500 (EST)

branch: externals/ada-mode
commit 64afd456797370e36490f51b8d5e668333e4ecb2
Author: Stephen Leake <stephen_leake@stephe-leake.org>
Commit: Stephen Leake <stephen_leake@stephe-leake.org>

    release ada-mode 5.1.4
---
 NEWS              |   19 +
 README            |    4 +-
 ada-gnat-xref.el  |    4 +-
 ada-grammar-wy.el | 2671 +++++++++++++++++++++++++++--------------------------
 ada-mode.el       |   89 +-
 ada-mode.info     |   81 +-
 ada-wisi.el       |    9 +-
 gnat-core.el      |   12 +-
 gnat-inspect.el   |   12 +-
 gpr-mode.el       |   11 -
 gpr-query.el      |   25 +-
 11 files changed, 1544 insertions(+), 1393 deletions(-)

diff --git a/NEWS b/NEWS
index 8f6f7b0..f81556b 100755
--- a/NEWS
+++ b/NEWS
@@ -7,6 +7,25 @@ Please send Emacs Ada mode bug reports to 
bug-gnu-emacs@gnu.org, with
 'ada-mode' in the subject. If possible, use M-x report-emacs-bug.
 
 
+* Ada mode 5.1.4
+26 May 2014
+
+** support expression functions
+
+** beginning-of-defun-function, end-of-defun-function are now set. A
+   "defun" is a generic, package, protected, subprogram, or task spec
+   or body.
+
+** C-c C-s is now bound to ada-goto-previous-pos, which goes to the
+   first position in ada-goto-pos-ring. Most navigation functions set
+   ada-goto-pos-ring. This allows easy navigation back to the start of
+   a cross-reference chain.
+
+** xref tool error handlers no longer show the xref tool buffer; the
+   new Ada menu item 'show xref tool buffer' can be used instead.
+
+** The parser supports more deeply nested case statements.
+
 * Ada mode 5.1.3
 19 Apr 2014
 
diff --git a/README b/README
index 1212821..60a83c2 100755
--- a/README
+++ b/README
@@ -1,4 +1,4 @@
-Emacs Ada mode version 5.1.3
+Emacs Ada mode version 5.1.4
 
 Ada mode requires Emacs 24.2 or greater
 
@@ -13,6 +13,8 @@ add to ~./emacs:
 
 then invoke M-x list-packages, install Ada mode.
 
+Note that you must have the Emacs lisp sources installed; that's a
+separate package in some distributions.
 
 To install Ada mode, gpr mode, and associated utilities from this distribution:
 
diff --git a/ada-gnat-xref.el b/ada-gnat-xref.el
index a1f5684..df2d2d6 100755
--- a/ada-gnat-xref.el
+++ b/ada-gnat-xref.el
@@ -90,7 +90,6 @@
            ))
 
        (when (eobp)
-         (pop-to-buffer (current-buffer))
          (error "gnat find did not return other item"))
        ))
     result))
@@ -136,7 +135,6 @@
              (forward-line 1)))
          )
        (when (eobp)
-         (pop-to-buffer (current-buffer))
          (error "gnat find did not return parent types"))
        ))
 
@@ -186,6 +184,7 @@
   (setq ada-xref-other-function  'ada-gnat-xref-other)
   (setq ada-xref-parent-function 'ada-gnat-xref-parents)
   (setq ada-xref-all-function    'ada-gnat-xref-all)
+  (setq ada-show-xref-tool-buffer 'ada-gnat-show-run-buffer)
 
   ;; gnatmake -gnatD generates files with .dg extensions. But we don't
   ;; need to navigate between them.
@@ -207,6 +206,7 @@
   (setq ada-xref-other-function  nil)
   (setq ada-xref-parent-function nil)
   (setq ada-xref-all-function    nil)
+  (setq ada-show-xref-tool-buffer nil)
 
   (setq completion-ignored-extensions (delete ".ali" 
completion-ignored-extensions))
   (setq compilation-error-regexp-alist (delete 'gnat 
compilation-error-regexp-alist))
diff --git a/ada-grammar-wy.el b/ada-grammar-wy.el
index 9268625..8a60f11 100755
--- a/ada-grammar-wy.el
+++ b/ada-grammar-wy.el
@@ -335,7 +335,7 @@
         (wisi-statement-action 2 'list-break)
         (wisi-containing-action 2 3))))
       (case_statement
-       ((CASE expression IS case_statement_alternative_list END CASE SEMICOLON 
)
+       ((CASE expression_opt IS case_statement_alternative_list END CASE 
SEMICOLON )
         (progn
         (wisi-statement-action 1 'block-start 3 'block-middle 5 'block-end 7 
'statement-end)
         (wisi-containing-action 1 2)
@@ -348,7 +348,6 @@
         (wisi-containing-action 1 2)
         (wisi-containing-action 3 4))))
       (case_statement_alternative_list
-       (())
        ((case_statement_alternative ))
        ((case_statement_alternative_list case_statement_alternative )))
       (choice_expression
@@ -456,6 +455,7 @@
        ((body ))
        ((entry_declaration ))
        ((exception_declaration ))
+       ((expression_function_declaration ))
        ((generic_declaration ))
        ((generic_instantiation ))
        ((null_procedure_declaration ))
@@ -644,6 +644,12 @@
       (expression_opt
        (())
        ((expression )))
+      (expression_function_declaration
+       ((overriding_indicator_opt function_specification IS paren_expression 
aspect_specification_opt SEMICOLON )
+        (progn
+        (wisi-statement-action 1 'statement-start 2 'statement-other 6 
'statement-end)
+        (wisi-containing-action 2 4)
+        (wisi-containing-action 2 5))))
       (extended_return_object_declaration
        ((IDENTIFIER COLON aliased_opt constant_opt return_subtype_indication 
COLON_EQUAL expression ))
        ((IDENTIFIER COLON aliased_opt constant_opt return_subtype_indication 
)))
@@ -744,7 +750,7 @@
       (formal_package_declaration
        ((WITH PACKAGE name IS NEW name formal_package_actual_part 
aspect_specification_opt SEMICOLON )
         (progn
-        (wisi-statement-action 1 'statement-start 5 'statement-other 9 
'statement-end)
+        (wisi-statement-action 1 'statement-start 5 'statement-other 6 'name 7 
'statement-other 8 'statement-other 9 'statement-end)
         (wisi-containing-action 1 3)
         (wisi-containing-action 5 6)
         (wisi-containing-action 6 7)
@@ -761,6 +767,13 @@
         (wisi-containing-action 4 6)))
        ((task_type_declaration ))
        ((protected_type_declaration )))
+      (function_specification
+       ((FUNCTION name parameter_and_result_profile )
+        (progn
+        (wisi-statement-action 1 'statement-other 2 'name)
+        (wisi-containing-action 1 2)
+        (wisi-containing-action 1 3)
+        (wisi-motion-action 1 '(3 RETURN)))))
       (general_access_modifier_opt
        (())
        ((ALL ))
@@ -1174,6 +1187,19 @@
         (progn
         (wisi-statement-action 2 'list-break)
         (wisi-containing-action 2 3))))
+      (paren_expression
+       ((LEFT_PAREN expression RIGHT_PAREN )
+        (progn
+        (wisi-statement-action 1 'open-paren 3 'close-paren)
+        (wisi-containing-action 1 2)))
+       ((LEFT_PAREN case_expression RIGHT_PAREN )
+        (progn
+        (wisi-statement-action 1 'open-paren 3 'close-paren)
+        (wisi-containing-action 1 2)))
+       ((LEFT_PAREN if_expression RIGHT_PAREN )
+        (progn
+        (wisi-statement-action 1 'open-paren 3 'close-paren)
+        (wisi-containing-action 1 2))))
       (pragma
        ((PRAGMA IDENTIFIER LEFT_PAREN pragma_argument_association_list 
RIGHT_PAREN SEMICOLON )
         (progn
@@ -1224,7 +1250,8 @@
       (procedure_specification
        ((PROCEDURE name parameter_profile_opt )
         (progn
-        (wisi-statement-action 1 'statement-start 2 'name)
+        (wisi-statement-action 1 'statement-other 2 'name)
+        (wisi-containing-action 1 2)
         (wisi-containing-action 1 3))))
       (proper_body
        ((subprogram_body ))
@@ -1518,11 +1545,7 @@
         (wisi-containing-action 2 5))))
       (subprogram_specification
        ((procedure_specification ))
-       ((FUNCTION name parameter_and_result_profile )
-        (progn
-        (wisi-statement-action 1 'statement-start 2 'name)
-        (wisi-containing-action 1 3)
-        (wisi-motion-action 1 '(3 RETURN)))))
+       ((function_specification )))
       (subtype_declaration
        ((SUBTYPE IDENTIFIER IS subtype_indication aspect_specification_opt 
SEMICOLON )
         (progn
@@ -1662,23 +1685,24 @@
         (wisi-statement-action 1 'statement-start 3 'statement-end)
         (wisi-containing-action 1 2)))))
      [((default . error) (SEPARATE .  10) (USE .  11) (LIMITED .  3) (PRIVATE 
.  8) (WITH .  12) (PRAGMA .  7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(PACKAGE .  6) (GENERIC .  2))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (FUNCTION . ( 72 (generic_formal_part . 1))) 
(PROCEDURE . ( 74 (generic_formal_part . 1))) (PACKAGE . ( 73 
(generic_formal_part . 1))) (PRAGMA .  7) (WITH .  76) (TYPE .  75) (IDENTIFIER 
.  71))
-      ((default . error) (WITH .  70) (PRIVATE .  69))
-      ((default . error) (OVERRIDING .  68))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (FUNCTION . ( 73 (generic_formal_part . 1))) 
(PROCEDURE . ( 75 (generic_formal_part . 1))) (PACKAGE . ( 74 
(generic_formal_part . 1))) (PRAGMA .  7) (WITH .  77) (TYPE .  76) (IDENTIFIER 
.  72))
+      ((default . error) (WITH .  71) (PRIVATE .  70))
+      ((default . error) (OVERRIDING .  69))
       ((default . error) (FUNCTION . (overriding_indicator_opt . 1)) 
(PROCEDURE . (overriding_indicator_opt . 1)) (ENTRY . (overriding_indicator_opt 
. 1)))
-      ((default . error) (BODY .  66) (IDENTIFIER .  47) (CHARACTER_LITERAL .  
49) (STRING_LITERAL .  48))
-      ((default . error) (IDENTIFIER .  65))
-      ((default . error) (WITH .  62) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(PACKAGE .  61) (GENERIC .  60))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (LEFT_PAREN .  58))
-      ((default . error) (TYPE .  56) (ALL .  55) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
+      ((default . error) (BODY .  67) (IDENTIFIER .  48) (CHARACTER_LITERAL .  
50) (STRING_LITERAL .  49))
+      ((default . error) (IDENTIFIER .  66))
+      ((default . error) (WITH .  63) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(PACKAGE .  62) (GENERIC .  61))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (LEFT_PAREN .  59))
+      ((default . error) (TYPE .  57) (ALL .  56) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
       ((default . error) ($EOI . (compilation_unit_list . 0)) (FUNCTION . 
(compilation_unit_list . 0)) (GENERIC . (compilation_unit_list . 0)) (LIMITED . 
(compilation_unit_list . 0)) (NOT . (compilation_unit_list . 0)) (OVERRIDING . 
(compilation_unit_list . 0)) (PACKAGE . (compilation_unit_list . 0)) (PRAGMA . 
(compilation_unit_list . 0)) (PRIVATE . (compilation_unit_list . 0)) (PROCEDURE 
. (compilation_unit_list . 0)) (SEPARATE . (compilation_unit_list . 0)) (USE . 
(compilation_unit_lis [...]
-      ((default . error) ($EOI .  45) (SEPARATE .  10) (USE .  11) (LIMITED .  
3) (PRIVATE .  8) (WITH .  12) (PRAGMA .  7) (NOT .  4) (OVERRIDING .  5) 
(FUNCTION . (overriding_indicator_opt . 2)) (PROCEDURE . 
(overriding_indicator_opt . 2)) (PACKAGE .  6) (GENERIC .  2))
+      ((default . error) ($EOI .  46) (SEPARATE .  10) (USE .  11) (LIMITED .  
3) (PRIVATE .  8) (WITH .  12) (PRAGMA .  7) (NOT .  4) (OVERRIDING .  5) 
(FUNCTION . (overriding_indicator_opt . 2)) (PROCEDURE . 
(overriding_indicator_opt . 2)) (PACKAGE .  6) (GENERIC .  2))
       ((default . error) (WITH . (compilation_unit . 0)) (USE . 
(compilation_unit . 0)) (SEPARATE . (compilation_unit . 0)) (PROCEDURE . 
(compilation_unit . 0)) (PRIVATE . (compilation_unit . 0)) (PRAGMA . 
(compilation_unit . 0)) (PACKAGE . (compilation_unit . 0)) (OVERRIDING . 
(compilation_unit . 0)) (NOT . (compilation_unit . 0)) (LIMITED . 
(compilation_unit . 0)) (GENERIC . (compilation_unit . 0)) (FUNCTION . 
(compilation_unit . 0)) ($EOI . (compilation_unit . 0)))
+      ((default . error) (RENAMES . (subprogram_specification . 1)) (IS . 
(subprogram_specification . 1)) (WITH . (subprogram_specification . 1)) 
(SEMICOLON . (subprogram_specification . 1)))
       ((default . error) (WITH . (library_unit_declaration . 2)) (USE . 
(library_unit_declaration . 2)) (SEPARATE . (library_unit_declaration . 2)) 
(PROCEDURE . (library_unit_declaration . 2)) (PRIVATE . 
(library_unit_declaration . 2)) (PRAGMA . (library_unit_declaration . 2)) 
(PACKAGE . (library_unit_declaration . 2)) (OVERRIDING . 
(library_unit_declaration . 2)) (NOT . (library_unit_declaration . 2)) (LIMITED 
. (library_unit_declaration . 2)) (GENERIC . (library_unit_declaration . 2))  
[...]
-      ((default . error) (PACKAGE .  42) (FUNCTION .  1) (PROCEDURE .  9))
+      ((default . error) (PACKAGE .  43) (FUNCTION .  1) (PROCEDURE .  9))
       ((default . error) (WITH . (library_unit_declaration . 3)) (USE . 
(library_unit_declaration . 3)) (SEPARATE . (library_unit_declaration . 3)) 
(PROCEDURE . (library_unit_declaration . 3)) (PRIVATE . 
(library_unit_declaration . 3)) (PRAGMA . (library_unit_declaration . 3)) 
(PACKAGE . (library_unit_declaration . 3)) (OVERRIDING . 
(library_unit_declaration . 3)) (NOT . (library_unit_declaration . 3)) (LIMITED 
. (library_unit_declaration . 3)) (GENERIC . (library_unit_declaration . 3))  
[...]
       ((default . error) ($EOI . (generic_declaration . 1)) (LIMITED . 
(generic_declaration . 1)) (SEPARATE . (generic_declaration . 1)) (WITH . 
(generic_declaration . 1)) (PRIVATE . (generic_declaration . 1)) (END . 
(generic_declaration . 1)) (BEGIN . (generic_declaration . 1)) (IDENTIFIER . 
(generic_declaration . 1)) (ENTRY . (generic_declaration . 1)) (FOR . 
(generic_declaration . 1)) (FUNCTION . (generic_declaration . 1)) (GENERIC . 
(generic_declaration . 1)) (NOT . (generic_declarat [...]
       ((default . error) (WITH . (library_unit_renaming_declaration . 1)) (USE 
. (library_unit_renaming_declaration . 1)) (SEPARATE . 
(library_unit_renaming_declaration . 1)) (PROCEDURE . 
(library_unit_renaming_declaration . 1)) (PRIVATE . 
(library_unit_renaming_declaration . 1)) (PRAGMA . 
(library_unit_renaming_declaration . 1)) (PACKAGE . 
(library_unit_renaming_declaration . 1)) (OVERRIDING . 
(library_unit_renaming_declaration . 1)) (NOT . 
(library_unit_renaming_declaration . 1)) (LIMI [...]
@@ -1686,11 +1710,11 @@
       ((default . error) (WITH . (compilation_unit . 1)) (USE . 
(compilation_unit . 1)) (SEPARATE . (compilation_unit . 1)) (PROCEDURE . 
(compilation_unit . 1)) (PRIVATE . (compilation_unit . 1)) (PRAGMA . 
(compilation_unit . 1)) (PACKAGE . (compilation_unit . 1)) (OVERRIDING . 
(compilation_unit . 1)) (NOT . (compilation_unit . 1)) (LIMITED . 
(compilation_unit . 1)) (GENERIC . (compilation_unit . 1)) (FUNCTION . 
(compilation_unit . 1)) ($EOI . (compilation_unit . 1)))
       ((default . error) ($EOI . (library_item . 1)) (FUNCTION . (library_item 
. 1)) (GENERIC . (library_item . 1)) (LIMITED . (library_item . 1)) (NOT . 
(library_item . 1)) (OVERRIDING . (library_item . 1)) (PACKAGE . (library_item 
. 1)) (PRAGMA . (library_item . 1)) (PRIVATE . (library_item . 1)) (PROCEDURE . 
(library_item . 1)) (SEPARATE . (library_item . 1)) (USE . (library_item . 1)) 
(WITH . (library_item . 1)))
       ((default . error) ($EOI . (library_item . 4)) (FUNCTION . (library_item 
. 4)) (GENERIC . (library_item . 4)) (LIMITED . (library_item . 4)) (NOT . 
(library_item . 4)) (OVERRIDING . (library_item . 4)) (PACKAGE . (library_item 
. 4)) (PRAGMA . (library_item . 4)) (PRIVATE . (library_item . 4)) (PROCEDURE . 
(library_item . 4)) (SEPARATE . (library_item . 4)) (USE . (library_item . 4)) 
(WITH . (library_item . 4)))
-      ((default . error) (FUNCTION .  39) (PROCEDURE .  40))
+      ((default . error) (FUNCTION .  40) (PROCEDURE .  41))
       ((default . error) ($EOI . (library_item . 3)) (FUNCTION . (library_item 
. 3)) (GENERIC . (library_item . 3)) (LIMITED . (library_item . 3)) (NOT . 
(library_item . 3)) (OVERRIDING . (library_item . 3)) (PACKAGE . (library_item 
. 3)) (PRAGMA . (library_item . 3)) (PRIVATE . (library_item . 3)) (PROCEDURE . 
(library_item . 3)) (SEPARATE . (library_item . 3)) (USE . (library_item . 3)) 
(WITH . (library_item . 3)))
       ((default . error) (WITH . (library_unit_declaration . 1)) (USE . 
(library_unit_declaration . 1)) (SEPARATE . (library_unit_declaration . 1)) 
(PROCEDURE . (library_unit_declaration . 1)) (PRIVATE . 
(library_unit_declaration . 1)) (PRAGMA . (library_unit_declaration . 1)) 
(PACKAGE . (library_unit_declaration . 1)) (OVERRIDING . 
(library_unit_declaration . 1)) (NOT . (library_unit_declaration . 1)) (LIMITED 
. (library_unit_declaration . 1)) (GENERIC . (library_unit_declaration . 1))  
[...]
       ((default . error) (WITH . (library_unit_renaming_declaration . 0)) (USE 
. (library_unit_renaming_declaration . 0)) (SEPARATE . 
(library_unit_renaming_declaration . 0)) (PROCEDURE . 
(library_unit_renaming_declaration . 0)) (PRIVATE . 
(library_unit_renaming_declaration . 0)) (PRAGMA . 
(library_unit_renaming_declaration . 0)) (PACKAGE . 
(library_unit_renaming_declaration . 0)) (OVERRIDING . 
(library_unit_renaming_declaration . 0)) (NOT . 
(library_unit_renaming_declaration . 0)) (LIMI [...]
-      ((default . error) (SEMICOLON .  38))
+      ((default . error) (SEMICOLON .  39))
       ((default . error) ($EOI . (context_item . 0)) (FUNCTION . (context_item 
. 0)) (GENERIC . (context_item . 0)) (LIMITED . (context_item . 0)) (NOT . 
(context_item . 0)) (OVERRIDING . (context_item . 0)) (PACKAGE . (context_item 
. 0)) (PRAGMA . (context_item . 0)) (PRIVATE . (context_item . 0)) (PROCEDURE . 
(context_item . 0)) (SEPARATE . (context_item . 0)) (USE . (context_item . 0)) 
(WITH . (context_item . 0)))
       ((default . error) (RENAMES . (subprogram_specification . 0)) (IS . 
(subprogram_specification . 0)) (WITH . (subprogram_specification . 0)) 
(SEMICOLON . (subprogram_specification . 0)))
       ((default . error) ($EOI . (library_item . 2)) (FUNCTION . (library_item 
. 2)) (GENERIC . (library_item . 2)) (LIMITED . (library_item . 2)) (NOT . 
(library_item . 2)) (OVERRIDING . (library_item . 2)) (PACKAGE . (library_item 
. 2)) (PRAGMA . (library_item . 2)) (PRIVATE . (library_item . 2)) (PROCEDURE . 
(library_item . 2)) (SEPARATE . (library_item . 2)) (USE . (library_item . 2)) 
(WITH . (library_item . 2)))
@@ -1700,287 +1724,288 @@
       ((default . error) ($EOI . (context_item . 2)) (FUNCTION . (context_item 
. 2)) (GENERIC . (context_item . 2)) (LIMITED . (context_item . 2)) (NOT . 
(context_item . 2)) (OVERRIDING . (context_item . 2)) (PACKAGE . (context_item 
. 2)) (PRAGMA . (context_item . 2)) (PRIVATE . (context_item . 2)) (PROCEDURE . 
(context_item . 2)) (SEPARATE . (context_item . 2)) (USE . (context_item . 2)) 
(WITH . (context_item . 2)))
       ((default . error) ($EOI . (context_item . 1)) (FUNCTION . (context_item 
. 1)) (GENERIC . (context_item . 1)) (LIMITED . (context_item . 1)) (NOT . 
(context_item . 1)) (OVERRIDING . (context_item . 1)) (PACKAGE . (context_item 
. 1)) (PRAGMA . (context_item . 1)) (PRIVATE . (context_item . 1)) (PROCEDURE . 
(context_item . 1)) (SEPARATE . (context_item . 1)) (USE . (context_item . 1)) 
(WITH . (context_item . 1)))
       ((default . error) (USE . (package_declaration . 0)) (TYPE . 
(package_declaration . 0)) (TASK . (package_declaration . 0)) (SUBTYPE . 
(package_declaration . 0)) (PROTECTED . (package_declaration . 0)) (PROCEDURE . 
(package_declaration . 0)) (PRAGMA . (package_declaration . 0)) (PACKAGE . 
(package_declaration . 0)) (OVERRIDING . (package_declaration . 0)) (NOT . 
(package_declaration . 0)) (GENERIC . (package_declaration . 0)) (FUNCTION . 
(package_declaration . 0)) (FOR . (package_de [...]
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (RENAMES .  126) (SEMICOLON . 
(aspect_specification_opt . 0)) (IS . (aspect_specification_opt . 0)) (WITH .  
107))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (SEMICOLON .  124))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (RENAMES .  127) (SEMICOLON . 
(aspect_specification_opt . 0)) (IS . (aspect_specification_opt . 0)) (WITH .  
108))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (SEMICOLON .  125))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
       ((default . error) ($EOI . accept) (XOR . accept) (WITH . accept) (WHILE 
. accept) (WHEN . accept) (USE . accept) (UNTIL . accept) (TYPE . accept) (THEN 
. accept) (TERMINATE . accept) (TASK . accept) (TAGGED . accept) (SYNCHRONIZED 
. accept) (SUBTYPE . accept) (SOME . accept) (SELECT . accept) (SEPARATE . 
accept) (RIGHT_PAREN . accept) (REVERSE . accept) (RETURN . accept) (REQUEUE . 
accept) (RENAMES . accept) (REM . accept) (RECORD . accept) (RANGE . accept) 
(RAISE . accept) (PROTE [...]
       ((default . error) (WITH . (compilation_unit_list . 1)) (USE . 
(compilation_unit_list . 1)) (SEPARATE . (compilation_unit_list . 1)) 
(PROCEDURE . (compilation_unit_list . 1)) (PRIVATE . (compilation_unit_list . 
1)) (PRAGMA . (compilation_unit_list . 1)) (PACKAGE . (compilation_unit_list . 
1)) (OVERRIDING . (compilation_unit_list . 1)) (NOT . (compilation_unit_list . 
1)) (LIMITED . (compilation_unit_list . 1)) (GENERIC . (compilation_unit_list . 
1)) (FUNCTION . (compilation_unit_lis [...]
       ((default . error) (USE . (name . 0)) (DO . (name . 0)) (RENAMES . (name 
. 0)) (ELSIF . (name . 0)) (ELSE . (name . 0)) (LESS_LESS . (name . 0)) 
(IDENTIFIER . (name . 0)) (STRING_LITERAL . (name . 0)) (CHARACTER_LITERAL . 
(name . 0)) (ACCEPT . (name . 0)) (ABORT . (name . 0)) (BEGIN . (name . 0)) 
(CASE . (name . 0)) (DECLARE . (name . 0)) (DELAY . (name . 0)) (EXIT . (name . 
0)) (FOR . (name . 0)) (GOTO . (name . 0)) (IF . (name . 0)) (LOOP . (name . 
0)) (NULL . (name . 0)) (PRAGMA [...]
       ((default . error) (USE . (name . 7)) (DO . (name . 7)) (RENAMES . (name 
. 7)) (ELSIF . (name . 7)) (ELSE . (name . 7)) (LESS_LESS . (name . 7)) 
(IDENTIFIER . (name . 7)) (STRING_LITERAL . (name . 7)) (CHARACTER_LITERAL . 
(name . 7)) (ACCEPT . (name . 7)) (ABORT . (name . 7)) (BEGIN . (name . 7)) 
(CASE . (name . 7)) (DECLARE . (name . 7)) (DELAY . (name . 7)) (EXIT . (name . 
7)) (FOR . (name . 7)) (GOTO . (name . 7)) (IF . (name . 7)) (LOOP . (name . 
7)) (NULL . (name . 7)) (PRAGMA [...]
       ((default . error) (DO . (name . 1)) (USE . (name . 1)) (COMMA . (name . 
1)) (RENAMES . (name . 1)) (ELSIF . (name . 1)) (ELSE . (name . 1)) (LESS_LESS 
. (name . 1)) (IDENTIFIER . (name . 1)) (STRING_LITERAL . (name . 1)) 
(CHARACTER_LITERAL . (name . 1)) (ACCEPT . (name . 1)) (ABORT . (name . 1)) 
(BEGIN . (name . 1)) (CASE . (name . 1)) (DECLARE . (name . 1)) (DELAY . (name 
. 1)) (EXIT . (name . 1)) (FOR . (name . 1)) (GOTO . (name . 1)) (IF . (name . 
1)) (LOOP . (name . 1)) (NULL  [...]
       ((default . error) (USE . (name . 4)) (DO . (name . 4)) (RENAMES . (name 
. 4)) (ELSIF . (name . 4)) (ELSE . (name . 4)) (LESS_LESS . (name . 4)) 
(IDENTIFIER . (name . 4)) (STRING_LITERAL . (name . 4)) (CHARACTER_LITERAL . 
(name . 4)) (ACCEPT . (name . 4)) (ABORT . (name . 4)) (BEGIN . (name . 4)) 
(CASE . (name . 4)) (DECLARE . (name . 4)) (DELAY . (name . 4)) (EXIT . (name . 
4)) (FOR . (name . 4)) (GOTO . (name . 4)) (IF . (name . 4)) (LOOP . (name . 
4)) (NULL . (name . 4)) (PRAGMA [...]
-      ((default . error) (COMMA .  118) (SEMICOLON .  122))
-      ((default . error) (DOT .  86) (SEMICOLON . (name_list . 0)) (COMMA . 
(name_list . 0)) (TICK .  87) (LEFT_PAREN .  105))
+      ((default . error) (COMMA .  119) (SEMICOLON .  123))
+      ((default . error) (DOT .  87) (SEMICOLON . (name_list . 0)) (COMMA . 
(name_list . 0)) (TICK .  88) (LEFT_PAREN .  106))
       ((default . error) (DO . (name . 6)) (USE . (name . 6)) (RENAMES . (name 
. 6)) (ELSIF . (name . 6)) (ELSE . (name . 6)) (LESS_LESS . (name . 6)) 
(IDENTIFIER . (name . 6)) (STRING_LITERAL . (name . 6)) (CHARACTER_LITERAL . 
(name . 6)) (ACCEPT . (name . 6)) (ABORT . (name . 6)) (BEGIN . (name . 6)) 
(CASE . (name . 6)) (DECLARE . (name . 6)) (DELAY . (name . 6)) (EXIT . (name . 
6)) (FOR . (name . 6)) (GOTO . (name . 6)) (IF . (name . 6)) (LOOP . (name . 
6)) (NULL . (name . 6)) (PRAGMA [...]
       ((default . error) (DO . (name . 3)) (USE . (name . 3)) (RENAMES . (name 
. 3)) (ELSIF . (name . 3)) (ELSE . (name . 3)) (LESS_LESS . (name . 3)) 
(IDENTIFIER . (name . 3)) (STRING_LITERAL . (name . 3)) (CHARACTER_LITERAL . 
(name . 3)) (ACCEPT . (name . 3)) (ABORT . (name . 3)) (BEGIN . (name . 3)) 
(CASE . (name . 3)) (DECLARE . (name . 3)) (DELAY . (name . 3)) (EXIT . (name . 
3)) (FOR . (name . 3)) (GOTO . (name . 3)) (IF . (name . 3)) (LOOP . (name . 
3)) (NULL . (name . 3)) (PRAGMA [...]
-      ((default . error) (TYPE .  121))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (COMMA .  118) (SEMICOLON .  119))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (DOT .  86) (TICK .  87) (IS . (parameter_profile_opt 
. 0)) (SEMICOLON . (parameter_profile_opt . 0)) (WITH . (parameter_profile_opt 
. 0)) (LEFT_PAREN .  88))
-      ((default . error) (FUNCTION . (generic_formal_part . 1)) (PROCEDURE . 
(generic_formal_part . 1)) (PACKAGE . (generic_formal_part . 1)) (PRAGMA .  7) 
(WITH .  76) (TYPE .  75) (IDENTIFIER .  71))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
+      ((default . error) (TYPE .  122))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (COMMA .  119) (SEMICOLON .  120))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (DOT .  87) (TICK .  88) (IS . (parameter_profile_opt 
. 0)) (SEMICOLON . (parameter_profile_opt . 0)) (WITH . (parameter_profile_opt 
. 0)) (LEFT_PAREN .  89))
+      ((default . error) (FUNCTION . (generic_formal_part . 1)) (PROCEDURE . 
(generic_formal_part . 1)) (PACKAGE . (generic_formal_part . 1)) (PRAGMA .  7) 
(WITH .  77) (TYPE .  76) (IDENTIFIER .  72))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
       ((default . error) (WITH . (library_item . 0)) (USE . (library_item . 
0)) (SEPARATE . (library_item . 0)) (PROCEDURE . (library_item . 0)) (PRIVATE . 
(library_item . 0)) (PRAGMA . (library_item . 0)) (PACKAGE . (library_item . 
0)) (OVERRIDING . (library_item . 0)) (NOT . (library_item . 0)) (LIMITED . 
(library_item . 0)) (GENERIC . (library_item . 0)) (FUNCTION . (library_item . 
0)) ($EOI . (library_item . 0)))
-      ((default . error) (FUNCTION .  39) (PROCEDURE .  40))
-      ((default . error) (LEFT_PAREN .  111) (SEMICOLON .  110))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (RENAMES .  106) (DOT .  86) (TICK .  87) (IS . ( 104 
(aspect_specification_opt . 0))) (WITH .  107) (LEFT_PAREN .  105))
+      ((default . error) (FUNCTION .  40) (PROCEDURE .  41))
+      ((default . error) (LEFT_PAREN .  112) (SEMICOLON .  111))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (RENAMES .  107) (DOT .  87) (TICK .  88) (IS . ( 105 
(aspect_specification_opt . 0))) (WITH .  108) (LEFT_PAREN .  106))
       ((default . error) (ENTRY . (overriding_indicator_opt . 0)) (PROCEDURE . 
(overriding_indicator_opt . 0)) (FUNCTION . (overriding_indicator_opt . 0)))
-      ((default . error) (WITH .  103))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
+      ((default . error) (WITH .  104))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
       ((default . error) (COLON . (identifier_list . 0)) (COMMA . 
(identifier_list . 0)))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (IDENTIFIER .  98))
-      ((default . error) (PACKAGE .  96) (FUNCTION .  1) (PROCEDURE .  9))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (IDENTIFIER .  99))
+      ((default . error) (PACKAGE .  97) (FUNCTION .  1) (PROCEDURE .  9))
       ((default . error) (PACKAGE . (generic_formal_parameter_declaration . 
0)) (PROCEDURE . (generic_formal_parameter_declaration . 0)) (FUNCTION . 
(generic_formal_parameter_declaration . 0)) (WITH . 
(generic_formal_parameter_declaration . 0)) (TYPE . 
(generic_formal_parameter_declaration . 0)) (PRAGMA . 
(generic_formal_parameter_declaration . 0)) (IDENTIFIER . 
(generic_formal_parameter_declaration . 0)))
       ((default . error) (PACKAGE . (generic_formal_parameter_declaration . 
2)) (PROCEDURE . (generic_formal_parameter_declaration . 2)) (FUNCTION . 
(generic_formal_parameter_declaration . 2)) (WITH . 
(generic_formal_parameter_declaration . 2)) (TYPE . 
(generic_formal_parameter_declaration . 2)) (PRAGMA . 
(generic_formal_parameter_declaration . 2)) (IDENTIFIER . 
(generic_formal_parameter_declaration . 2)))
       ((default . error) (PACKAGE . (generic_formal_parameter_declaration . 
1)) (PROCEDURE . (generic_formal_parameter_declaration . 1)) (FUNCTION . 
(generic_formal_parameter_declaration . 1)) (WITH . 
(generic_formal_parameter_declaration . 1)) (TYPE . 
(generic_formal_parameter_declaration . 1)) (PRAGMA . 
(generic_formal_parameter_declaration . 1)) (IDENTIFIER . 
(generic_formal_parameter_declaration . 1)))
       ((default . error) (PACKAGE . (generic_formal_parameter_declaration . 
3)) (PROCEDURE . (generic_formal_parameter_declaration . 3)) (FUNCTION . 
(generic_formal_parameter_declaration . 3)) (WITH . 
(generic_formal_parameter_declaration . 3)) (TYPE . 
(generic_formal_parameter_declaration . 3)) (PRAGMA . 
(generic_formal_parameter_declaration . 3)) (IDENTIFIER . 
(generic_formal_parameter_declaration . 3)))
-      ((default . error) (PACKAGE . (generic_formal_part . 0)) (PROCEDURE . 
(generic_formal_part . 0)) (FUNCTION . (generic_formal_part . 0)) (PRAGMA .  7) 
(WITH .  76) (TYPE .  75) (IDENTIFIER .  71))
+      ((default . error) (PACKAGE . (generic_formal_part . 0)) (PROCEDURE . 
(generic_formal_part . 0)) (FUNCTION . (generic_formal_part . 0)) (PRAGMA .  7) 
(WITH .  77) (TYPE .  76) (IDENTIFIER .  72))
       ((default . error) (PACKAGE . (generic_formal_parameter_declarations . 
0)) (PROCEDURE . (generic_formal_parameter_declarations . 0)) (FUNCTION . 
(generic_formal_parameter_declarations . 0)) (IDENTIFIER . 
(generic_formal_parameter_declarations . 0)) (PRAGMA . 
(generic_formal_parameter_declarations . 0)) (TYPE . 
(generic_formal_parameter_declarations . 0)) (WITH . 
(generic_formal_parameter_declarations . 0)))
-      ((default . error) (COMMA .  94) (COLON .  93))
+      ((default . error) (COMMA .  95) (COLON .  94))
       ((default . error) (PACKAGE . (generic_formal_parameter_declaration . 
4)) (PROCEDURE . (generic_formal_parameter_declaration . 4)) (FUNCTION . 
(generic_formal_parameter_declaration . 4)) (WITH . 
(generic_formal_parameter_declaration . 4)) (TYPE . 
(generic_formal_parameter_declaration . 4)) (PRAGMA . 
(generic_formal_parameter_declaration . 4)) (IDENTIFIER . 
(generic_formal_parameter_declaration . 4)))
-      ((default . error) (DOT .  86) (TICK .  87) (RETURN .  89) (LEFT_PAREN . 
 88))
-      ((default . error) (IDENTIFIER .  224) (CHARACTER_LITERAL .  226) 
(STRING_LITERAL .  225) (ALL .  227))
-      ((default . error) (LEFT_PAREN .  219) (ACCESS .  216) (DELTA .  217) 
(DIGITS .  218) (MOD .  220) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (STRING_LITERAL .  48) (CHARACTER_LITERAL .  169) 
(RIGHT_PAREN . ((association_opt . 0) (expression_opt . 0))) (COMMA . 
((association_opt . 0) (expression_opt . 0))) (EQUAL_GREATER . 
(discrete_choice_list . 0)) (BAR . (discrete_choice_list . 0)) (PLUS .  143) 
(MINUS .  142) (IDENTIFIER .  212) (OTHERS .  171) (ABS .  145) (NOT .  170) 
(NULL .  149) (NEW .  147) (LEFT_PAREN .  146))
-      ((default . error) (SEMICOLON . (name_opt . 0)) (WITH . (name_opt . 0)) 
(IS . (name_opt . 0)) (RENAMES . (name_opt . 0)) (COLON_EQUAL . (name_opt . 0)) 
(RIGHT_PAREN . (name_opt . 0)) (DO . (name_opt . 0)) (ACCESS . 
(null_exclusion_opt . 0)) (NOT .  207) (IDENTIFIER .  47) (CHARACTER_LITERAL .  
49) (STRING_LITERAL .  48))
+      ((default . error) (DOT .  87) (TICK .  88) (RETURN .  90) (LEFT_PAREN . 
 89))
+      ((default . error) (IDENTIFIER .  225) (CHARACTER_LITERAL .  227) 
(STRING_LITERAL .  226) (ALL .  228))
+      ((default . error) (LEFT_PAREN .  220) (ACCESS .  217) (DELTA .  218) 
(DIGITS .  219) (MOD .  221) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (STRING_LITERAL .  49) (CHARACTER_LITERAL .  170) 
(RIGHT_PAREN . ((association_opt . 0) (expression_opt . 0))) (COMMA . 
((association_opt . 0) (expression_opt . 0))) (EQUAL_GREATER . 
(discrete_choice_list . 0)) (BAR . (discrete_choice_list . 0)) (PLUS .  144) 
(MINUS .  143) (IDENTIFIER .  213) (OTHERS .  172) (ABS .  146) (NOT .  171) 
(NULL .  150) (NEW .  148) (LEFT_PAREN .  147))
+      ((default . error) (WITH . (name_opt . 0)) (SEMICOLON . (name_opt . 0)) 
(IS . (name_opt . 0)) (RENAMES . (name_opt . 0)) (COLON_EQUAL . (name_opt . 0)) 
(RIGHT_PAREN . (name_opt . 0)) (DO . (name_opt . 0)) (ACCESS . 
(null_exclusion_opt . 0)) (NOT .  208) (IDENTIFIER .  48) (CHARACTER_LITERAL .  
50) (STRING_LITERAL .  49))
       ((default . error) (DO . (name . 5)) (OF . (name . 5)) (WHILE . (name . 
5)) (SELECT . (name . 5)) (REQUEUE . (name . 5)) (RAISE . (name . 5)) (PRAGMA . 
(name . 5)) (NULL . (name . 5)) (LOOP . (name . 5)) (IF . (name . 5)) (GOTO . 
(name . 5)) (FOR . (name . 5)) (EXIT . (name . 5)) (DELAY . (name . 5)) 
(DECLARE . (name . 5)) (CASE . (name . 5)) (BEGIN . (name . 5)) (ABORT . (name 
. 5)) (ACCEPT . (name . 5)) (CHARACTER_LITERAL . (name . 5)) (STRING_LITERAL . 
(name . 5)) (IDENTIFIER .  [...]
-      ((default . error) (RETURN .  206))
-      ((default . error) (RENAMES . (subprogram_specification . 1)) (IS . 
(subprogram_specification . 1)) (WITH . (subprogram_specification . 1)) 
(SEMICOLON . (subprogram_specification . 1)))
-      ((default . error) (ACCESS . (mode_opt . 0)) (NOT . (mode_opt . 0)) 
(IDENTIFIER . (mode_opt . 0)) (STRING_LITERAL . (mode_opt . 0)) 
(CHARACTER_LITERAL . (mode_opt . 0)) (IN .  203) (OUT .  204))
-      ((default . error) (IDENTIFIER .  202))
+      ((default . error) (RETURN .  207))
+      ((default . error) (RENAMES . (function_specification . 0)) (IS . 
(function_specification . 0)) (SEMICOLON . (function_specification . 0)) (WITH 
. (function_specification . 0)))
+      ((default . error) (ACCESS . (mode_opt . 0)) (NOT . (mode_opt . 0)) 
(IDENTIFIER . (mode_opt . 0)) (STRING_LITERAL . (mode_opt . 0)) 
(CHARACTER_LITERAL . (mode_opt . 0)) (IN .  204) (OUT .  205))
+      ((default . error) (IDENTIFIER .  203))
       ((default . error) (WITH . (generic_formal_parameter_declarations . 1)) 
(TYPE . (generic_formal_parameter_declarations . 1)) (PRAGMA . 
(generic_formal_parameter_declarations . 1)) (IDENTIFIER . 
(generic_formal_parameter_declarations . 1)) (FUNCTION . 
(generic_formal_parameter_declarations . 1)) (PROCEDURE . 
(generic_formal_parameter_declarations . 1)) (PACKAGE . 
(generic_formal_parameter_declarations . 1)))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (IS .  199) (SEMICOLON . (aspect_specification_opt . 
0)) (WITH .  107))
-      ((default . error) (WITH . (discriminant_part_opt . 0)) (SEMICOLON . 
(discriminant_part_opt . 0)) (IS . (discriminant_part_opt . 0)) (LEFT_PAREN .  
197))
-      ((default . error) (DOT .  86) (TICK .  87) (RENAMES .  196) (LEFT_PAREN 
.  105))
-      ((default . error) (DOT .  86) (TICK .  87) (RENAMES .  195) (LEFT_PAREN 
.  105))
-      ((default . error) (DOT .  86) (TICK .  87) (RENAMES .  194) (LEFT_PAREN 
.  105))
-      ((default . error) (COMMA .  118) (SEMICOLON .  193))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (NEW .  191))
-      ((default . error) (IDENTIFIER .  47) (STRING_LITERAL .  48) 
(CHARACTER_LITERAL .  169) (RIGHT_PAREN . ((association_opt . 0) 
(expression_opt . 0))) (COMMA . ((association_opt . 0) (expression_opt . 0))) 
(EQUAL_GREATER . (discrete_choice_list . 0)) (BAR . (discrete_choice_list . 0)) 
(PLUS .  143) (MINUS .  142) (OTHERS .  171) (ABS .  145) (NOT .  170) (NULL .  
149) (NEW .  147) (LEFT_PAREN .  146))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (SEMICOLON . ((association_opt . 0) (expression_opt . 
0))) (IS . ((association_opt . 0) (expression_opt . 0))) (COMMA . 
((association_opt . 0) (expression_opt . 0))) (EQUAL_GREATER . 
(discrete_choice_list . 0)) (BAR . (discrete_choice_list . 0)) (OTHERS .  171) 
(IDENTIFIER .  47) (CHARACTER_LITERAL .  169) (STRING_LITERAL .  48) (PLUS .  
143) (MINUS .  142) (ABS .  145) (NOT .  170) (NULL .  149) (NEW .  147) 
(LEFT_PAREN .  146))
-      ((default . error) (IS .  168))
-      ((default . error) (DOT .  86) (TICK .  87) (IS . 
(aspect_specification_opt . 0)) (WITH .  107) (LEFT_PAREN .  105))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (IS .  200) (SEMICOLON . (aspect_specification_opt . 
0)) (WITH .  108))
+      ((default . error) (WITH . (discriminant_part_opt . 0)) (SEMICOLON . 
(discriminant_part_opt . 0)) (IS . (discriminant_part_opt . 0)) (LEFT_PAREN .  
198))
+      ((default . error) (DOT .  87) (TICK .  88) (RENAMES .  197) (LEFT_PAREN 
.  106))
+      ((default . error) (DOT .  87) (TICK .  88) (RENAMES .  196) (LEFT_PAREN 
.  106))
+      ((default . error) (DOT .  87) (TICK .  88) (RENAMES .  195) (LEFT_PAREN 
.  106))
+      ((default . error) (COMMA .  119) (SEMICOLON .  194))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (NEW .  192))
+      ((default . error) (IDENTIFIER .  48) (STRING_LITERAL .  49) 
(CHARACTER_LITERAL .  170) (RIGHT_PAREN . ((association_opt . 0) 
(expression_opt . 0))) (COMMA . ((association_opt . 0) (expression_opt . 0))) 
(EQUAL_GREATER . (discrete_choice_list . 0)) (BAR . (discrete_choice_list . 0)) 
(PLUS .  144) (MINUS .  143) (OTHERS .  172) (ABS .  146) (NOT .  171) (NULL .  
150) (NEW .  148) (LEFT_PAREN .  147))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (SEMICOLON . ((association_opt . 0) (expression_opt . 
0))) (IS . ((association_opt . 0) (expression_opt . 0))) (COMMA . 
((association_opt . 0) (expression_opt . 0))) (EQUAL_GREATER . 
(discrete_choice_list . 0)) (BAR . (discrete_choice_list . 0)) (OTHERS .  172) 
(IDENTIFIER .  48) (CHARACTER_LITERAL .  170) (STRING_LITERAL .  49) (PLUS .  
144) (MINUS .  143) (ABS .  146) (NOT .  171) (NULL .  150) (NEW .  148) 
(LEFT_PAREN .  147))
+      ((default . error) (IS .  169))
+      ((default . error) (DOT .  87) (TICK .  88) (IS . 
(aspect_specification_opt . 0)) (WITH .  108) (LEFT_PAREN .  106))
       ((default . error) (OR . (pragma . 1)) (THEN . (pragma . 1)) (WHEN . 
(pragma . 1)) (EXCEPTION . (pragma . 1)) (LESS_LESS . (pragma . 1)) 
(STRING_LITERAL . (pragma . 1)) (CHARACTER_LITERAL . (pragma . 1)) (ACCEPT . 
(pragma . 1)) (ABORT . (pragma . 1)) (CASE . (pragma . 1)) (DECLARE . (pragma . 
1)) (DELAY . (pragma . 1)) (EXIT . (pragma . 1)) (GOTO . (pragma . 1)) (IF . 
(pragma . 1)) (LOOP . (pragma . 1)) (NULL . (pragma . 1)) (RAISE . (pragma . 
1)) (REQUEUE . (pragma . 1)) (RETURN . [...]
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  144) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
-      ((default . error) (COMMA .  118) (SEMICOLON .  140))
-      ((default . error) (DOT .  86) (TICK .  87) (IS . ( 104 
(aspect_specification_opt . 0))) (WITH .  107) (LEFT_PAREN .  105))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  145) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
+      ((default . error) (COMMA .  119) (SEMICOLON .  141))
+      ((default . error) (DOT .  87) (TICK .  88) (IS . ( 105 
(aspect_specification_opt . 0))) (WITH .  108) (LEFT_PAREN .  106))
       ((default . error) (RIGHT_PAREN . (parameter_profile_opt . 1)) 
(COLON_EQUAL . (parameter_profile_opt . 1)) (RENAMES . (parameter_profile_opt . 
1)) (IS . (parameter_profile_opt . 1)) (DO . (parameter_profile_opt . 1)) (WITH 
. (parameter_profile_opt . 1)) (SEMICOLON . (parameter_profile_opt . 1)) (WHEN 
. (parameter_profile_opt . 1)))
       ((default . error) (RENAMES . (procedure_specification . 0)) (IS . 
(procedure_specification . 0)) (SEMICOLON . (procedure_specification . 0)) 
(WITH . (procedure_specification . 0)))
-      ((default . error) (DOT .  86) (TICK .  87) (RIGHT_PAREN .  139) 
(LEFT_PAREN .  105))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
+      ((default . error) (DOT .  87) (TICK .  88) (RIGHT_PAREN .  140) 
(LEFT_PAREN .  106))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
       ((default . error) (WITH . (use_clause . 0)) (SEPARATE . (use_clause . 
0)) (LIMITED . (use_clause . 0)) ($EOI . (use_clause . 0)) (PRIVATE . 
(use_clause . 0)) (END . (use_clause . 0)) (BEGIN . (use_clause . 0)) 
(IDENTIFIER . (use_clause . 0)) (ENTRY . (use_clause . 0)) (FOR . (use_clause . 
0)) (FUNCTION . (use_clause . 0)) (GENERIC . (use_clause . 0)) (NOT . 
(use_clause . 0)) (OVERRIDING . (use_clause . 0)) (PACKAGE . (use_clause . 0)) 
(PRAGMA . (use_clause . 0)) (PROCEDURE . (use_ [...]
-      ((default . error) (COMMA .  118) (SEMICOLON .  137))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
+      ((default . error) (COMMA .  119) (SEMICOLON .  138))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
       ((default . error) (WITH . (with_clause . 3)) (USE . (with_clause . 3)) 
(SEPARATE . (with_clause . 3)) (PROCEDURE . (with_clause . 3)) (PRIVATE . 
(with_clause . 3)) (PRAGMA . (with_clause . 3)) (PACKAGE . (with_clause . 3)) 
(OVERRIDING . (with_clause . 3)) (NOT . (with_clause . 3)) (LIMITED . 
(with_clause . 3)) (GENERIC . (with_clause . 3)) (FUNCTION . (with_clause . 3)) 
($EOI . (with_clause . 3)))
-      ((default . error) (SEMICOLON .  135))
+      ((default . error) (SEMICOLON .  136))
       ((default . error) (WITH . (generic_package_declaration . 0)) (SEPARATE 
. (generic_package_declaration . 0)) (LIMITED . (generic_package_declaration . 
0)) ($EOI . (generic_package_declaration . 0)) (END . 
(generic_package_declaration . 0)) (PRIVATE . (generic_package_declaration . 
0)) (USE . (generic_package_declaration . 0)) (TYPE . 
(generic_package_declaration . 0)) (TASK . (generic_package_declaration . 0)) 
(SUBTYPE . (generic_package_declaration . 0)) (PROTECTED . (generic_pack [...]
-      ((default . error) (DOT .  86) (TICK .  87) (IS . 
(aspect_specification_opt . 0)) (WITH .  107) (LEFT_PAREN .  105))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (SEMICOLON .  132) (IS .  133))
-      ((default . error) (DOT .  86) (TICK .  87) (IS . ( 131 
(parameter_profile_opt . 0))) (SEMICOLON . (parameter_profile_opt . 0)) (WITH . 
(parameter_profile_opt . 0)) (RENAMES . (parameter_profile_opt . 0)) 
(LEFT_PAREN .  88))
-      ((default . error) (DOT .  86) (TICK .  87) (IS .  130) (RETURN .  89) 
(LEFT_PAREN .  88))
-      ((default . error) (NEW .  382))
-      ((default . error) (NEW .  381))
+      ((default . error) (DOT .  87) (TICK .  88) (IS . 
(aspect_specification_opt . 0)) (WITH .  108) (LEFT_PAREN .  106))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (SEMICOLON .  133) (IS .  134))
+      ((default . error) (DOT .  87) (TICK .  88) (IS . ( 132 
(parameter_profile_opt . 0))) (SEMICOLON . (parameter_profile_opt . 0)) (WITH . 
(parameter_profile_opt . 0)) (RENAMES . (parameter_profile_opt . 0)) 
(LEFT_PAREN .  89))
+      ((default . error) (DOT .  87) (TICK .  88) (IS .  131) (RETURN .  90) 
(LEFT_PAREN .  89))
+      ((default . error) (NEW .  384))
+      ((default . error) (NEW .  383))
       ((default . error) (TYPE . (subprogram_declaration . 0)) (TASK . 
(subprogram_declaration . 0)) (SUBTYPE . (subprogram_declaration . 0)) 
(PROTECTED . (subprogram_declaration . 0)) (FOR . (subprogram_declaration . 0)) 
(ENTRY . (subprogram_declaration . 0)) (IDENTIFIER . (subprogram_declaration . 
0)) (BEGIN . (subprogram_declaration . 0)) (END . (subprogram_declaration . 0)) 
(WITH . (subprogram_declaration . 0)) (USE . (subprogram_declaration . 0)) 
(SEPARATE . (subprogram_declaration  [...]
-      ((default . error) (BEGIN . (declarative_part_opt . 0)) (USE .  11) 
(SUBTYPE .  291) (PRAGMA .  7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(ENTRY . (overriding_indicator_opt . 2)) (FOR .  288) (IDENTIFIER .  287) (TYPE 
.  293) (GENERIC .  2) (PROTECTED .  290) (TASK .  292) (PACKAGE .  289))
-      ((default . error) (DOT .  86) (TICK .  87) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  107) (LEFT_PAREN .  105))
+      ((default . error) (BEGIN . (declarative_part_opt . 0)) (USE .  11) 
(SUBTYPE .  292) (PRAGMA .  7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(ENTRY . (overriding_indicator_opt . 2)) (FOR .  289) (IDENTIFIER .  288) (TYPE 
.  294) (GENERIC .  2) (PROTECTED .  291) (TASK .  293) (PACKAGE .  290))
+      ((default . error) (DOT .  87) (TICK .  88) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  108) (LEFT_PAREN .  106))
       ((default . error) (BEGIN . (generic_subprogram_declaration . 0)) 
(IDENTIFIER . (generic_subprogram_declaration . 0)) (ENTRY . 
(generic_subprogram_declaration . 0)) (FOR . (generic_subprogram_declaration . 
0)) (FUNCTION . (generic_subprogram_declaration . 0)) (GENERIC . 
(generic_subprogram_declaration . 0)) (NOT . (generic_subprogram_declaration . 
0)) (OVERRIDING . (generic_subprogram_declaration . 0)) (PACKAGE . 
(generic_subprogram_declaration . 0)) (PRAGMA . (generic_subprogram_d [...]
-      ((default . error) (COMMA .  118) (SEMICOLON .  378))
+      ((default . error) (COMMA .  119) (SEMICOLON .  380))
       ((default . error) (USE . (use_clause . 2)) (TYPE . (use_clause . 2)) 
(TASK . (use_clause . 2)) (SUBTYPE . (use_clause . 2)) (PROTECTED . (use_clause 
. 2)) (PROCEDURE . (use_clause . 2)) (PRAGMA . (use_clause . 2)) (PACKAGE . 
(use_clause . 2)) (OVERRIDING . (use_clause . 2)) (NOT . (use_clause . 2)) 
(GENERIC . (use_clause . 2)) (FUNCTION . (use_clause . 2)) (FOR . (use_clause . 
2)) (ENTRY . (use_clause . 2)) (IDENTIFIER . (use_clause . 2)) (BEGIN . 
(use_clause . 2)) (END . (use_cla [...]
-      ((default . error) (DOT .  86) (TICK .  87) (SEMICOLON . (name_list . 
1)) (COMMA . (name_list . 1)) (LEFT_PAREN .  105))
-      ((default . error) (PROTECTED .  374) (TASK .  375) (PACKAGE .  373) 
(NOT .  4) (OVERRIDING .  5) (FUNCTION . (overriding_indicator_opt . 2)) 
(PROCEDURE . (overriding_indicator_opt . 2)))
+      ((default . error) (DOT .  87) (TICK .  88) (SEMICOLON . (name_list . 
1)) (COMMA . (name_list . 1)) (LEFT_PAREN .  106))
+      ((default . error) (PROTECTED .  376) (TASK .  377) (PACKAGE .  375) 
(NOT .  4) (OVERRIDING .  5) (FUNCTION . (overriding_indicator_opt . 2)) 
(PROCEDURE . (overriding_indicator_opt . 2)))
       ((default . error) ($EOI . (with_clause . 2)) (FUNCTION . (with_clause . 
2)) (GENERIC . (with_clause . 2)) (LIMITED . (with_clause . 2)) (NOT . 
(with_clause . 2)) (OVERRIDING . (with_clause . 2)) (PACKAGE . (with_clause . 
2)) (PRAGMA . (with_clause . 2)) (PRIVATE . (with_clause . 2)) (PROCEDURE . 
(with_clause . 2)) (SEPARATE . (with_clause . 2)) (USE . (with_clause . 2)) 
(WITH . (with_clause . 2)))
-      ((default . error) (SEMICOLON .  132))
+      ((default . error) (SEMICOLON .  133))
       ((default . error) (IDENTIFIER . (unary_adding_operator . 1)) 
(STRING_LITERAL . (unary_adding_operator . 1)) (CHARACTER_LITERAL . 
(unary_adding_operator . 1)) (ABS . (unary_adding_operator . 1)) (LEFT_PAREN . 
(unary_adding_operator . 1)) (NEW . (unary_adding_operator . 1)) (NOT . 
(unary_adding_operator . 1)) (NULL . (unary_adding_operator . 1)))
       ((default . error) (IDENTIFIER . (unary_adding_operator . 0)) 
(STRING_LITERAL . (unary_adding_operator . 0)) (CHARACTER_LITERAL . 
(unary_adding_operator . 0)) (ABS . (unary_adding_operator . 0)) (LEFT_PAREN . 
(unary_adding_operator . 0)) (NEW . (unary_adding_operator . 0)) (NOT . 
(unary_adding_operator . 0)) (NULL . (unary_adding_operator . 0)))
-      ((default . error) (EQUAL_GREATER .  371) (RIGHT_PAREN . (name . 0)) 
(COMMA . (name . 0)) (STAR_STAR . (name . 0)) (REM . (name . 0)) (MOD . (name . 
0)) (STAR . (name . 0)) (SLASH . (name . 0)) (SLASH_EQUAL . (name . 0)) 
(LESS_EQUAL . (name . 0)) (LESS . (name . 0)) (GREATER_EQUAL . (name . 0)) 
(GREATER . (name . 0)) (EQUAL . (name . 0)) (NOT . (name . 0)) (IN . (name . 
0)) (AMPERSAND . (name . 0)) (MINUS . (name . 0)) (PLUS . (name . 0)) 
(LEFT_PAREN . (name . 0)) (AND . (name . 0) [...]
-      ((default . error) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (IF .  366) (CASE .  364) (FOR .  365) (RIGHT_PAREN . 
((association_opt . 0) (expression_opt . 0))) (COMMA . ((association_opt . 0) 
(expression_opt . 0))) (EQUAL_GREATER . (discrete_choice_list . 0)) (BAR . 
(discrete_choice_list . 0)) (PLUS .  143) (MINUS .  142) (OTHERS .  171) (ABS . 
 145) (NOT .  170) (IDENTIFIER .  47) (CHARACTER_LITERAL .  169) 
(STRING_LITERAL .  48) (NULL .  228) (NEW .  147) (LEFT_PAREN .  146))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (EQUAL_GREATER .  373) (RIGHT_PAREN . (name . 0)) 
(COMMA . (name . 0)) (STAR_STAR . (name . 0)) (REM . (name . 0)) (MOD . (name . 
0)) (STAR . (name . 0)) (SLASH . (name . 0)) (SLASH_EQUAL . (name . 0)) 
(LESS_EQUAL . (name . 0)) (LESS . (name . 0)) (GREATER_EQUAL . (name . 0)) 
(GREATER . (name . 0)) (EQUAL . (name . 0)) (NOT . (name . 0)) (IN . (name . 
0)) (AMPERSAND . (name . 0)) (MINUS . (name . 0)) (PLUS . (name . 0)) 
(LEFT_PAREN . (name . 0)) (AND . (name . 0) [...]
+      ((default . error) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (IF .  368) (CASE .  366) (FOR .  367) (RIGHT_PAREN . 
((association_opt . 0) (expression_opt . 0))) (COMMA . ((association_opt . 0) 
(expression_opt . 0))) (EQUAL_GREATER . (discrete_choice_list . 0)) (BAR . 
(discrete_choice_list . 0)) (PLUS .  144) (MINUS .  143) (OTHERS .  172) (ABS . 
 146) (NOT .  171) (IDENTIFIER .  48) (CHARACTER_LITERAL .  170) 
(STRING_LITERAL .  49) (NULL .  229) (NEW .  148) (LEFT_PAREN .  147))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (OF . (primary . 0)) (COLON_EQUAL . (primary . 0)) 
(DO . (primary . 0)) (LOOP . (primary . 0)) (ELSIF . (primary . 0)) (ELSE . 
(primary . 0)) (DIGITS . (primary . 0)) (RIGHT_PAREN . (primary . 0)) (COMMA . 
(primary . 0)) (RANGE . (primary . 0)) (THEN . (primary . 0)) (WITH . (primary 
. 0)) (BAR . (primary . 0)) (EQUAL_GREATER . (primary . 0)) (IS . (primary . 
0)) (IN . (primary . 0)) (NOT . (primary . 0)) (EQUAL . (primary . 0)) (GREATER 
. (primary . 0)) (GREATER [...]
       ((default . error) (OF . (primary . 1)) (COLON_EQUAL . (primary . 1)) 
(DO . (primary . 1)) (LOOP . (primary . 1)) (ELSIF . (primary . 1)) (ELSE . 
(primary . 1)) (DIGITS . (primary . 1)) (RIGHT_PAREN . (primary . 1)) (COMMA . 
(primary . 1)) (RANGE . (primary . 1)) (THEN . (primary . 1)) (WITH . (primary 
. 1)) (BAR . (primary . 1)) (EQUAL_GREATER . (primary . 1)) (IS . (primary . 
1)) (IN . (primary . 1)) (NOT . (primary . 1)) (EQUAL . (primary . 1)) (GREATER 
. (primary . 1)) (GREATER [...]
       ((default . error) (COMMA . (pragma_argument_association . 1)) 
(RIGHT_PAREN . (pragma_argument_association . 1)))
       ((default . error) (OF . (term . 0)) (COLON_EQUAL . (term . 0)) (DO . 
(term . 0)) (LOOP . (term . 0)) (ELSIF . (term . 0)) (ELSE . (term . 0)) 
(DIGITS . (term . 0)) (RIGHT_PAREN . (term . 0)) (COMMA . (term . 0)) (RANGE . 
(term . 0)) (THEN . (term . 0)) (WITH . (term . 0)) (BAR . (term . 0)) 
(EQUAL_GREATER . (term . 0)) (IS . (term . 0)) (IN . (term . 0)) (NOT . (term . 
0)) (EQUAL . (term . 0)) (GREATER . (term . 0)) (GREATER_EQUAL . (term . 0)) 
(LESS . (term . 0)) (LESS_EQUAL . (t [...]
-      ((default . error) (DOT .  86) (OF . (primary . 2)) (COLON_EQUAL . 
(primary . 2)) (DO . (primary . 2)) (LOOP . (primary . 2)) (BAR . (primary . 
2)) (COMMA . (primary . 2)) (RIGHT_PAREN . (primary . 2)) (ELSIF . (primary . 
2)) (ELSE . (primary . 2)) (EQUAL_GREATER . (primary . 2)) (DIGITS . (primary . 
2)) (RANGE . (primary . 2)) (THEN . (primary . 2)) (DOT_DOT . (primary . 2)) 
(WITH . (primary . 2)) (IS . (primary . 2)) (IN . (primary . 2)) (NOT . 
(primary . 2)) (EQUAL . (primary .  [...]
+      ((default . error) (DOT .  87) (OF . (primary . 2)) (COLON_EQUAL . 
(primary . 2)) (DO . (primary . 2)) (LOOP . (primary . 2)) (BAR . (primary . 
2)) (COMMA . (primary . 2)) (ELSIF . (primary . 2)) (ELSE . (primary . 2)) 
(EQUAL_GREATER . (primary . 2)) (RIGHT_PAREN . (primary . 2)) (DIGITS . 
(primary . 2)) (RANGE . (primary . 2)) (THEN . (primary . 2)) (DOT_DOT . 
(primary . 2)) (WITH . (primary . 2)) (IS . (primary . 2)) (IN . (primary . 2)) 
(NOT . (primary . 2)) (EQUAL . (primary .  [...]
       ((default . error) (RIGHT_PAREN . (pragma_argument_association_list . 
0)) (COMMA . (pragma_argument_association_list . 0)))
-      ((default . error) (COMMA .  361) (RIGHT_PAREN .  362))
-      ((default . error) (OF . (factor . 1)) (COLON_EQUAL . (factor . 1)) (DO 
. (factor . 1)) (LOOP . (factor . 1)) (ELSIF . (factor . 1)) (ELSE . (factor . 
1)) (DIGITS . (factor . 1)) (COMMA . (factor . 1)) (RIGHT_PAREN . (factor . 1)) 
(RANGE . (factor . 1)) (THEN . (factor . 1)) (WITH . (factor . 1)) (BAR . 
(factor . 1)) (EQUAL_GREATER . (factor . 1)) (IS . (factor . 1)) (SLASH_EQUAL . 
(factor . 1)) (LESS_EQUAL . (factor . 1)) (LESS . (factor . 1)) (GREATER_EQUAL 
. (factor . 1)) (GREAT [...]
-      ((default . error) (AND .  359) (DO . (expression . 1)) (LOOP . 
(expression . 1)) (ELSIF . (expression . 1)) (ELSE . (expression . 1)) 
(EQUAL_GREATER . (expression . 1)) (DIGITS . (expression . 1)) (COMMA . 
(expression . 1)) (RIGHT_PAREN . (expression . 1)) (RANGE . (expression . 1)) 
(THEN . (expression . 1)) (WITH . (expression . 1)) (SEMICOLON . (expression . 
1)) (IS . (expression . 1)))
-      ((default . error) (AND .  358) (DO . (expression . 2)) (LOOP . 
(expression . 2)) (ELSIF . (expression . 2)) (ELSE . (expression . 2)) 
(EQUAL_GREATER . (expression . 2)) (DIGITS . (expression . 2)) (COMMA . 
(expression . 2)) (RIGHT_PAREN . (expression . 2)) (RANGE . (expression . 2)) 
(THEN . (expression . 2)) (WITH . (expression . 2)) (SEMICOLON . (expression . 
2)) (IS . (expression . 2)))
-      ((default . error) (OR .  357) (DO . (expression . 3)) (LOOP . 
(expression . 3)) (ELSIF . (expression . 3)) (ELSE . (expression . 3)) 
(EQUAL_GREATER . (expression . 3)) (DIGITS . (expression . 3)) (COMMA . 
(expression . 3)) (RIGHT_PAREN . (expression . 3)) (RANGE . (expression . 3)) 
(THEN . (expression . 3)) (WITH . (expression . 3)) (SEMICOLON . (expression . 
3)) (IS . (expression . 3)))
-      ((default . error) (OR .  356) (DO . (expression . 4)) (LOOP . 
(expression . 4)) (ELSIF . (expression . 4)) (ELSE . (expression . 4)) 
(EQUAL_GREATER . (expression . 4)) (DIGITS . (expression . 4)) (COMMA . 
(expression . 4)) (RIGHT_PAREN . (expression . 4)) (RANGE . (expression . 4)) 
(THEN . (expression . 4)) (WITH . (expression . 4)) (SEMICOLON . (expression . 
4)) (IS . (expression . 4)))
-      ((default . error) (XOR .  355) (DO . (expression . 5)) (LOOP . 
(expression . 5)) (ELSIF . (expression . 5)) (ELSE . (expression . 5)) 
(EQUAL_GREATER . (expression . 5)) (DIGITS . (expression . 5)) (COMMA . 
(expression . 5)) (RIGHT_PAREN . (expression . 5)) (RANGE . (expression . 5)) 
(THEN . (expression . 5)) (WITH . (expression . 5)) (SEMICOLON . (expression . 
5)) (IS . (expression . 5)))
-      ((default . error) (XOR .  354) (OR .  353) (AND .  352) (DO . 
(expression . 0)) (LOOP . (expression . 0)) (ELSIF . (expression . 0)) (ELSE . 
(expression . 0)) (EQUAL_GREATER . (expression . 0)) (DIGITS . (expression . 
0)) (COMMA . (expression . 0)) (RIGHT_PAREN . (expression . 0)) (RANGE . 
(expression . 0)) (THEN . (expression . 0)) (WITH . (expression . 0)) 
(SEMICOLON . (expression . 0)) (IS . (expression . 0)))
-      ((default . error) (IN .  270) (NOT .  271) (DO . (relation . 0)) (LOOP 
. (relation . 0)) (COMMA . (relation . 0)) (RIGHT_PAREN . (relation . 0)) 
(ELSIF . (relation . 0)) (ELSE . (relation . 0)) (EQUAL_GREATER . (relation . 
0)) (DIGITS . (relation . 0)) (RANGE . (relation . 0)) (THEN . (relation . 0)) 
(SEMICOLON . (relation . 0)) (WITH . (relation . 0)) (IS . (relation . 0)) (AND 
. (relation . 0)) (OR . (relation . 0)) (XOR . (relation . 0)) (EQUAL .  264) 
(SLASH_EQUAL .  269) (LES [...]
-      ((default . error) (OF . (term_list . 0)) (COLON_EQUAL . (term_list . 
0)) (DO . (term_list . 0)) (LOOP . (term_list . 0)) (ELSIF . (term_list . 0)) 
(ELSE . (term_list . 0)) (DIGITS . (term_list . 0)) (COMMA . (term_list . 0)) 
(RIGHT_PAREN . (term_list . 0)) (RANGE . (term_list . 0)) (THEN . (term_list . 
0)) (WITH . (term_list . 0)) (BAR . (term_list . 0)) (EQUAL_GREATER . 
(term_list . 0)) (IS . (term_list . 0)) (SLASH_EQUAL . (term_list . 0)) 
(LESS_EQUAL . (term_list . 0)) (LESS .  [...]
-      ((default . error) (OF . (simple_expression . 1)) (COLON_EQUAL . 
(simple_expression . 1)) (DO . (simple_expression . 1)) (LOOP . 
(simple_expression . 1)) (ELSIF . (simple_expression . 1)) (ELSE . 
(simple_expression . 1)) (DIGITS . (simple_expression . 1)) (RIGHT_PAREN . 
(simple_expression . 1)) (COMMA . (simple_expression . 1)) (RANGE . 
(simple_expression . 1)) (THEN . (simple_expression . 1)) (WITH . 
(simple_expression . 1)) (BAR . (simple_expression . 1)) (EQUAL_GREATER . 
(simple [...]
-      ((default . error) (ABS .  145) (NOT .  148) (NULL .  149) (NEW .  147) 
(IDENTIFIER .  47) (CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (LEFT_PAREN 
.  146))
-      ((default . error) (IS .  340))
-      ((default . error) (END . (declarative_part_opt . 0)) (PRIVATE . 
(declarative_part_opt . 0)) (USE .  11) (SUBTYPE .  291) (PRAGMA .  7) (NOT .  
4) (OVERRIDING .  5) (FUNCTION . (overriding_indicator_opt . 2)) (PROCEDURE . 
(overriding_indicator_opt . 2)) (ENTRY . (overriding_indicator_opt . 2)) (FOR . 
 288) (IDENTIFIER .  287) (TYPE .  293) (GENERIC .  2) (PROTECTED .  290) (TASK 
.  292) (PACKAGE .  289))
-      ((default . error) (SEMICOLON . (name . 1)) (IS . (name . 1)) (WITH . 
(name . 1)) (RANGE . (name . 1)) (TICK . (name . 1)) (LEFT_PAREN . (name . 1)) 
(DOT . (name . 1)) (PLUS . (name . 1)) (MINUS . (name . 1)) (AMPERSAND . (name 
. 1)) (DOT_DOT . (name . 1)) (IN . (name . 1)) (NOT . (name . 1)) (EQUAL . 
(name . 1)) (GREATER . (name . 1)) (GREATER_EQUAL . (name . 1)) (LESS . (name . 
1)) (LESS_EQUAL . (name . 1)) (SLASH_EQUAL . (name . 1)) (RIGHT_PAREN . (name . 
1)) (COMMA . (name . 1) [...]
-      ((default . error) (NULL .  284) (NEW .  147) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (COMMA .  363) (RIGHT_PAREN .  364))
+      ((default . error) (OF . (factor . 1)) (COLON_EQUAL . (factor . 1)) (DO 
. (factor . 1)) (LOOP . (factor . 1)) (ELSIF . (factor . 1)) (ELSE . (factor . 
1)) (DIGITS . (factor . 1)) (COMMA . (factor . 1)) (RIGHT_PAREN . (factor . 1)) 
(RANGE . (factor . 1)) (THEN . (factor . 1)) (WITH . (factor . 1)) (BAR . 
(factor . 1)) (EQUAL_GREATER . (factor . 1)) (IS . (factor . 1)) (SLASH_EQUAL . 
(factor . 1)) (LESS_EQUAL . (factor . 1)) (LESS . (factor . 1)) (GREATER_EQUAL 
. (factor . 1)) (GREAT [...]
+      ((default . error) (AND .  361) (DO . (expression . 1)) (LOOP . 
(expression . 1)) (ELSIF . (expression . 1)) (ELSE . (expression . 1)) 
(EQUAL_GREATER . (expression . 1)) (DIGITS . (expression . 1)) (COMMA . 
(expression . 1)) (RIGHT_PAREN . (expression . 1)) (RANGE . (expression . 1)) 
(THEN . (expression . 1)) (WITH . (expression . 1)) (SEMICOLON . (expression . 
1)) (IS . (expression . 1)))
+      ((default . error) (AND .  360) (DO . (expression . 2)) (LOOP . 
(expression . 2)) (ELSIF . (expression . 2)) (ELSE . (expression . 2)) 
(EQUAL_GREATER . (expression . 2)) (DIGITS . (expression . 2)) (COMMA . 
(expression . 2)) (RIGHT_PAREN . (expression . 2)) (RANGE . (expression . 2)) 
(THEN . (expression . 2)) (WITH . (expression . 2)) (SEMICOLON . (expression . 
2)) (IS . (expression . 2)))
+      ((default . error) (OR .  359) (DO . (expression . 3)) (LOOP . 
(expression . 3)) (ELSIF . (expression . 3)) (ELSE . (expression . 3)) 
(EQUAL_GREATER . (expression . 3)) (DIGITS . (expression . 3)) (COMMA . 
(expression . 3)) (RIGHT_PAREN . (expression . 3)) (RANGE . (expression . 3)) 
(THEN . (expression . 3)) (WITH . (expression . 3)) (SEMICOLON . (expression . 
3)) (IS . (expression . 3)))
+      ((default . error) (OR .  358) (DO . (expression . 4)) (LOOP . 
(expression . 4)) (ELSIF . (expression . 4)) (ELSE . (expression . 4)) 
(EQUAL_GREATER . (expression . 4)) (DIGITS . (expression . 4)) (COMMA . 
(expression . 4)) (RIGHT_PAREN . (expression . 4)) (RANGE . (expression . 4)) 
(THEN . (expression . 4)) (WITH . (expression . 4)) (SEMICOLON . (expression . 
4)) (IS . (expression . 4)))
+      ((default . error) (XOR .  357) (DO . (expression . 5)) (LOOP . 
(expression . 5)) (ELSIF . (expression . 5)) (ELSE . (expression . 5)) 
(EQUAL_GREATER . (expression . 5)) (DIGITS . (expression . 5)) (COMMA . 
(expression . 5)) (RIGHT_PAREN . (expression . 5)) (RANGE . (expression . 5)) 
(THEN . (expression . 5)) (WITH . (expression . 5)) (SEMICOLON . (expression . 
5)) (IS . (expression . 5)))
+      ((default . error) (XOR .  356) (OR .  355) (AND .  354) (DO . 
(expression . 0)) (LOOP . (expression . 0)) (ELSIF . (expression . 0)) (ELSE . 
(expression . 0)) (EQUAL_GREATER . (expression . 0)) (DIGITS . (expression . 
0)) (COMMA . (expression . 0)) (RIGHT_PAREN . (expression . 0)) (RANGE . 
(expression . 0)) (THEN . (expression . 0)) (WITH . (expression . 0)) 
(SEMICOLON . (expression . 0)) (IS . (expression . 0)))
+      ((default . error) (IN .  271) (NOT .  272) (DO . (relation . 0)) (LOOP 
. (relation . 0)) (COMMA . (relation . 0)) (ELSIF . (relation . 0)) (ELSE . 
(relation . 0)) (EQUAL_GREATER . (relation . 0)) (RIGHT_PAREN . (relation . 0)) 
(DIGITS . (relation . 0)) (RANGE . (relation . 0)) (THEN . (relation . 0)) 
(SEMICOLON . (relation . 0)) (WITH . (relation . 0)) (IS . (relation . 0)) (AND 
. (relation . 0)) (OR . (relation . 0)) (XOR . (relation . 0)) (EQUAL .  265) 
(SLASH_EQUAL .  270) (LES [...]
+      ((default . error) (OF . (term_list . 0)) (COLON_EQUAL . (term_list . 
0)) (DO . (term_list . 0)) (LOOP . (term_list . 0)) (ELSIF . (term_list . 0)) 
(ELSE . (term_list . 0)) (DIGITS . (term_list . 0)) (COMMA . (term_list . 0)) 
(RIGHT_PAREN . (term_list . 0)) (RANGE . (term_list . 0)) (THEN . (term_list . 
0)) (WITH . (term_list . 0)) (BAR . (term_list . 0)) (EQUAL_GREATER . 
(term_list . 0)) (IS . (term_list . 0)) (SLASH_EQUAL . (term_list . 0)) 
(LESS_EQUAL . (term_list . 0)) (LESS .  [...]
+      ((default . error) (OF . (simple_expression . 1)) (COLON_EQUAL . 
(simple_expression . 1)) (DO . (simple_expression . 1)) (LOOP . 
(simple_expression . 1)) (ELSIF . (simple_expression . 1)) (ELSE . 
(simple_expression . 1)) (DIGITS . (simple_expression . 1)) (RIGHT_PAREN . 
(simple_expression . 1)) (COMMA . (simple_expression . 1)) (RANGE . 
(simple_expression . 1)) (THEN . (simple_expression . 1)) (WITH . 
(simple_expression . 1)) (BAR . (simple_expression . 1)) (EQUAL_GREATER . 
(simple [...]
+      ((default . error) (ABS .  146) (NOT .  149) (NULL .  150) (NEW .  148) 
(IDENTIFIER .  48) (CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN 
.  147))
+      ((default . error) (IS .  342))
+      ((default . error) (END . (declarative_part_opt . 0)) (PRIVATE . 
(declarative_part_opt . 0)) (USE .  11) (SUBTYPE .  292) (PRAGMA .  7) (NOT .  
4) (OVERRIDING .  5) (FUNCTION . (overriding_indicator_opt . 2)) (PROCEDURE . 
(overriding_indicator_opt . 2)) (ENTRY . (overriding_indicator_opt . 2)) (FOR . 
 289) (IDENTIFIER .  288) (TYPE .  294) (GENERIC .  2) (PROTECTED .  291) (TASK 
.  293) (PACKAGE .  290))
+      ((default . error) (SEMICOLON . (name . 1)) (IS . (name . 1)) (WITH . 
(name . 1)) (RANGE . (name . 1)) (TICK . (name . 1)) (LEFT_PAREN . (name . 1)) 
(DOT . (name . 1)) (PLUS . (name . 1)) (MINUS . (name . 1)) (AMPERSAND . (name 
. 1)) (DOT_DOT . (name . 1)) (IN . (name . 1)) (NOT . (name . 1)) (EQUAL . 
(name . 1)) (GREATER . (name . 1)) (GREATER_EQUAL . (name . 1)) (LESS . (name . 
1)) (LESS_EQUAL . (name . 1)) (SLASH_EQUAL . (name . 1)) (RIGHT_PAREN . (name . 
1)) (COMMA . (name . 1) [...]
+      ((default . error) (NULL .  285) (NEW .  148) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (BAR . (discrete_choice . 3)) (EQUAL_GREATER . 
(discrete_choice . 3)))
       ((default . error) (SEMICOLON . (association_list . 0)) (IS . 
(association_list . 0)) (RIGHT_PAREN . (association_list . 0)) (COMMA . 
(association_list . 0)))
-      ((default . error) (COMMA .  260) (SEMICOLON . (aspect_specification_opt 
. 1)) (IS . (aspect_specification_opt . 1)))
+      ((default . error) (COMMA .  261) (SEMICOLON . (aspect_specification_opt 
. 1)) (IS . (aspect_specification_opt . 1)))
       ((default . error) (BAR . (discrete_choice . 0)) (EQUAL_GREATER . 
(discrete_choice . 0)))
-      ((default . error) (AND .  283) (EQUAL_GREATER . (choice_expression . 
1)) (BAR . (choice_expression . 1)))
-      ((default . error) (OR .  282) (EQUAL_GREATER . (choice_expression . 2)) 
(BAR . (choice_expression . 2)))
-      ((default . error) (XOR .  281) (EQUAL_GREATER . (choice_expression . 
3)) (BAR . (choice_expression . 3)))
-      ((default . error) (AND .  280) (EQUAL_GREATER . (choice_expression . 
4)) (BAR . (choice_expression . 4)))
-      ((default . error) (OR .  279) (EQUAL_GREATER . (choice_expression . 5)) 
(BAR . (choice_expression . 5)))
-      ((default . error) (XOR .  278) (OR .  277) (AND .  276) (EQUAL_GREATER 
. (choice_expression . 0)) (BAR . (choice_expression . 0)))
+      ((default . error) (AND .  284) (EQUAL_GREATER . (choice_expression . 
1)) (BAR . (choice_expression . 1)))
+      ((default . error) (OR .  283) (EQUAL_GREATER . (choice_expression . 2)) 
(BAR . (choice_expression . 2)))
+      ((default . error) (XOR .  282) (EQUAL_GREATER . (choice_expression . 
3)) (BAR . (choice_expression . 3)))
+      ((default . error) (AND .  281) (EQUAL_GREATER . (choice_expression . 
4)) (BAR . (choice_expression . 4)))
+      ((default . error) (OR .  280) (EQUAL_GREATER . (choice_expression . 5)) 
(BAR . (choice_expression . 5)))
+      ((default . error) (XOR .  279) (OR .  278) (AND .  277) (EQUAL_GREATER 
. (choice_expression . 0)) (BAR . (choice_expression . 0)))
       ((default . error) (EQUAL_GREATER . (discrete_choice_list . 1)) (BAR . 
(discrete_choice_list . 1)))
-      ((default . error) (BAR .  274) (EQUAL_GREATER .  275))
+      ((default . error) (BAR .  275) (EQUAL_GREATER .  276))
       ((default . error) (LOOP . (expression_opt . 1)) (RIGHT_PAREN . 
(expression_opt . 1)) (COMMA . (expression_opt . 1)) (SEMICOLON . 
(expression_opt . 1)) (THEN . (expression_opt . 1)) (IS . (expression_opt . 1)))
       ((default . error) (SEMICOLON . (association_opt . 5)) (IS . 
(association_opt . 5)) (COMMA . (association_opt . 5)) (RIGHT_PAREN . 
(association_opt . 5)))
-      ((default . error) (DOT .  86) (DO . (primary . 2)) (LOOP . (primary . 
2)) (ELSIF . (primary . 2)) (ELSE . (primary . 2)) (DIGITS . (primary . 2)) 
(RANGE . (primary . 2)) (THEN . (primary . 2)) (SEMICOLON . (primary . 2)) (IS 
. (primary . 2)) (WITH . (primary . 2)) (IN . (primary . 2)) (NOT . (primary . 
2)) (RIGHT_PAREN . (primary . 2)) (COMMA . (primary . 2)) (PLUS . (primary . 
2)) (MINUS . (primary . 2)) (AMPERSAND . (primary . 2)) (DOT_DOT . (primary . 
2)) (SLASH . (primary . 2) [...]
+      ((default . error) (DOT .  87) (DO . (primary . 2)) (LOOP . (primary . 
2)) (ELSIF . (primary . 2)) (ELSE . (primary . 2)) (DIGITS . (primary . 2)) 
(RANGE . (primary . 2)) (THEN . (primary . 2)) (SEMICOLON . (primary . 2)) (IS 
. (primary . 2)) (WITH . (primary . 2)) (IN . (primary . 2)) (NOT . (primary . 
2)) (RIGHT_PAREN . (primary . 2)) (COMMA . (primary . 2)) (PLUS . (primary . 
2)) (MINUS . (primary . 2)) (AMPERSAND . (primary . 2)) (DOT_DOT . (primary . 
2)) (SLASH . (primary . 2) [...]
       ((default . error) (BAR . (discrete_choice . 2)) (EQUAL_GREATER . 
(discrete_choice . 2)))
-      ((default . error) (IN .  270) (NOT .  271) (SEMICOLON . (relation . 0)) 
(IS . (relation . 0)) (WITH . (relation . 0)) (RIGHT_PAREN . (relation . 0)) 
(COMMA . (relation . 0)) (DOT_DOT .  263) (BAR . (choice_relation . 1)) 
(EQUAL_GREATER . (choice_relation . 1)) (AND . ((relation . 0) (choice_relation 
. 1))) (OR . ((relation . 0) (choice_relation . 1))) (XOR . ((relation . 0) 
(choice_relation . 1))) (EQUAL .  264) (SLASH_EQUAL .  269) (LESS .  267) 
(LESS_EQUAL .  268) (GREATER .  26 [...]
-      ((default . error) (DOT .  86) (TICK .  87) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  107) (LEFT_PAREN .  105))
-      ((default . error) (COMMA .  260) (RIGHT_PAREN .  261))
-      ((default . error) (BAR . (discrete_choice . 2)) (EQUAL_GREATER . 
(discrete_choice . 2)) (RIGHT_PAREN .  259))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (COMMA .  118) (SEMICOLON .  257))
+      ((default . error) (IN .  271) (NOT .  272) (SEMICOLON . (relation . 0)) 
(IS . (relation . 0)) (WITH . (relation . 0)) (RIGHT_PAREN . (relation . 0)) 
(COMMA . (relation . 0)) (DOT_DOT .  264) (BAR . (choice_relation . 1)) 
(EQUAL_GREATER . (choice_relation . 1)) (AND . ((relation . 0) (choice_relation 
. 1))) (OR . ((relation . 0) (choice_relation . 1))) (XOR . ((relation . 0) 
(choice_relation . 1))) (EQUAL .  265) (SLASH_EQUAL .  270) (LESS .  268) 
(LESS_EQUAL .  269) (GREATER .  26 [...]
+      ((default . error) (DOT .  87) (TICK .  88) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  108) (LEFT_PAREN .  106))
+      ((default . error) (COMMA .  261) (RIGHT_PAREN .  262))
+      ((default . error) (BAR . (discrete_choice . 2)) (EQUAL_GREATER . 
(discrete_choice . 2)) (RIGHT_PAREN .  260))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (COMMA .  119) (SEMICOLON .  258))
       ((default . error) ($EOI . (with_clause . 1)) (FUNCTION . (with_clause . 
1)) (GENERIC . (with_clause . 1)) (LIMITED . (with_clause . 1)) (NOT . 
(with_clause . 1)) (OVERRIDING . (with_clause . 1)) (PACKAGE . (with_clause . 
1)) (PRAGMA . (with_clause . 1)) (PRIVATE . (with_clause . 1)) (PROCEDURE . 
(with_clause . 1)) (SEPARATE . (with_clause . 1)) (USE . (with_clause . 1)) 
(WITH . (with_clause . 1)))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (BOX .  250) (SEMICOLON . 
(discriminant_specification_opt . 0)) (RIGHT_PAREN . 
(discriminant_specification_opt . 0)) (IDENTIFIER .  71))
-      ((default . error) (IS .  248) (SEMICOLON . (aspect_specification_opt . 
0)) (WITH .  107))
-      ((default . error) (ABSTRACT .  244) (BOX .  243) (NULL .  245) 
(IDENTIFIER .  47) (CHARACTER_LITERAL .  49) (STRING_LITERAL .  48))
-      ((default . error) (SEMICOLON .  242))
-      ((default . error) (DOT .  86) (TICK .  87) (IS .  241) (LEFT_PAREN .  
105))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (BOX .  251) (SEMICOLON . 
(discriminant_specification_opt . 0)) (RIGHT_PAREN . 
(discriminant_specification_opt . 0)) (IDENTIFIER .  72))
+      ((default . error) (IS .  249) (SEMICOLON . (aspect_specification_opt . 
0)) (WITH .  108))
+      ((default . error) (ABSTRACT .  245) (BOX .  244) (NULL .  246) 
(IDENTIFIER .  48) (CHARACTER_LITERAL .  50) (STRING_LITERAL .  49))
+      ((default . error) (SEMICOLON .  243))
+      ((default . error) (DOT .  87) (TICK .  88) (IS .  242) (LEFT_PAREN .  
106))
       ((default . error) (COLON . (identifier_list . 1)) (COMMA . 
(identifier_list . 1)))
-      ((default . error) (OUT .  240) (ACCESS . (mode_opt . 1)) (NOT . 
(mode_opt . 1)) (IDENTIFIER . (mode_opt . 1)) (STRING_LITERAL . (mode_opt . 1)) 
(CHARACTER_LITERAL . (mode_opt . 1)))
+      ((default . error) (OUT .  241) (ACCESS . (mode_opt . 1)) (NOT . 
(mode_opt . 1)) (IDENTIFIER . (mode_opt . 1)) (STRING_LITERAL . (mode_opt . 1)) 
(CHARACTER_LITERAL . (mode_opt . 1)))
       ((default . error) (ACCESS . (mode_opt . 3)) (NOT . (mode_opt . 3)) 
(IDENTIFIER . (mode_opt . 3)) (STRING_LITERAL . (mode_opt . 3)) 
(CHARACTER_LITERAL . (mode_opt . 3)))
-      ((default . error) (IDENTIFIER . (null_exclusion_opt . 0)) 
(STRING_LITERAL . (null_exclusion_opt . 0)) (CHARACTER_LITERAL . 
(null_exclusion_opt . 0)) (ACCESS . (null_exclusion_opt . 0)) (NOT .  207))
-      ((default . error) (IDENTIFIER . (null_exclusion_opt . 0)) 
(STRING_LITERAL . (null_exclusion_opt . 0)) (CHARACTER_LITERAL . 
(null_exclusion_opt . 0)) (RIGHT_PAREN . (null_exclusion_opt . 0)) (DO . 
(null_exclusion_opt . 0)) (RENAMES . (null_exclusion_opt . 0)) (COLON_EQUAL . 
(null_exclusion_opt . 0)) (SEMICOLON . (null_exclusion_opt . 0)) (WITH . 
(null_exclusion_opt . 0)) (IS . (null_exclusion_opt . 0)) (ACCESS . 
(null_exclusion_opt . 0)) (NOT .  207))
-      ((default . error) (NULL .  235))
-      ((default . error) (RIGHT_PAREN . (parameter_and_result_profile . 3)) 
(DO . (parameter_and_result_profile . 3)) (RENAMES . 
(parameter_and_result_profile . 3)) (COLON_EQUAL . 
(parameter_and_result_profile . 3)) (SEMICOLON . (parameter_and_result_profile 
. 3)) (WITH . (parameter_and_result_profile . 3)) (IS . 
(parameter_and_result_profile . 3)))
-      ((default . error) (DOT .  86) (RIGHT_PAREN . (name_opt . 1)) (DO . 
(name_opt . 1)) (RENAMES . (name_opt . 1)) (COLON_EQUAL . (name_opt . 1)) (WITH 
. (name_opt . 1)) (IS . (name_opt . 1)) (SEMICOLON . (name_opt . 1)) (TICK .  
87) (LEFT_PAREN .  105))
-      ((default . error) (RIGHT_PAREN . (parameter_and_result_profile . 1)) 
(DO . (parameter_and_result_profile . 1)) (RENAMES . 
(parameter_and_result_profile . 1)) (COLON_EQUAL . 
(parameter_and_result_profile . 1)) (SEMICOLON . (parameter_and_result_profile 
. 1)) (WITH . (parameter_and_result_profile . 1)) (IS . 
(parameter_and_result_profile . 1)))
-      ((default . error) (ACCESS .  234))
+      ((default . error) (IDENTIFIER . (null_exclusion_opt . 0)) 
(STRING_LITERAL . (null_exclusion_opt . 0)) (CHARACTER_LITERAL . 
(null_exclusion_opt . 0)) (ACCESS . (null_exclusion_opt . 0)) (NOT .  208))
+      ((default . error) (IDENTIFIER . (null_exclusion_opt . 0)) 
(STRING_LITERAL . (null_exclusion_opt . 0)) (CHARACTER_LITERAL . 
(null_exclusion_opt . 0)) (RIGHT_PAREN . (null_exclusion_opt . 0)) (DO . 
(null_exclusion_opt . 0)) (RENAMES . (null_exclusion_opt . 0)) (COLON_EQUAL . 
(null_exclusion_opt . 0)) (WITH . (null_exclusion_opt . 0)) (SEMICOLON . 
(null_exclusion_opt . 0)) (IS . (null_exclusion_opt . 0)) (ACCESS . 
(null_exclusion_opt . 0)) (NOT .  208))
+      ((default . error) (NULL .  236))
+      ((default . error) (RIGHT_PAREN . (parameter_and_result_profile . 3)) 
(DO . (parameter_and_result_profile . 3)) (RENAMES . 
(parameter_and_result_profile . 3)) (COLON_EQUAL . 
(parameter_and_result_profile . 3)) (WITH . (parameter_and_result_profile . 3)) 
(SEMICOLON . (parameter_and_result_profile . 3)) (IS . 
(parameter_and_result_profile . 3)))
+      ((default . error) (DOT .  87) (RIGHT_PAREN . (name_opt . 1)) (DO . 
(name_opt . 1)) (RENAMES . (name_opt . 1)) (COLON_EQUAL . (name_opt . 1)) (WITH 
. (name_opt . 1)) (IS . (name_opt . 1)) (SEMICOLON . (name_opt . 1)) (TICK .  
88) (LEFT_PAREN .  106))
+      ((default . error) (RIGHT_PAREN . (parameter_and_result_profile . 1)) 
(DO . (parameter_and_result_profile . 1)) (RENAMES . 
(parameter_and_result_profile . 1)) (COLON_EQUAL . 
(parameter_and_result_profile . 1)) (WITH . (parameter_and_result_profile . 1)) 
(SEMICOLON . (parameter_and_result_profile . 1)) (IS . 
(parameter_and_result_profile . 1)))
+      ((default . error) (ACCESS .  235))
       ((default . error) (IN . (name . 0)) (NOT . (name . 0)) (EQUAL . (name . 
0)) (GREATER . (name . 0)) (GREATER_EQUAL . (name . 0)) (LESS . (name . 0)) 
(LESS_EQUAL . (name . 0)) (SLASH_EQUAL . (name . 0)) (BAR . (name . 0)) 
(EQUAL_GREATER . (name . 0)) (AND . (name . 0)) (OR . (name . 0)) (XOR . (name 
. 0)) (RIGHT_PAREN . (name . 0)) (LEFT_PAREN . (name . 0)) (RANGE . (name . 0)) 
(TICK . (name . 0)) (DOT . (name . 0)) (PLUS . (name . 0)) (MINUS . (name . 0)) 
(AMPERSAND . (name . 0)) ( [...]
-      ((default . error) (COLON .  233) (COMMA .  94))
+      ((default . error) (COLON .  234) (COMMA .  95))
       ((default . error) (RIGHT_PAREN . (parameter_specification_list . 0)) 
(SEMICOLON . (parameter_specification_list . 0)))
-      ((default . error) (SEMICOLON .  231) (RIGHT_PAREN .  232))
+      ((default . error) (SEMICOLON .  232) (RIGHT_PAREN .  233))
       ((default . error) (DO . (attribute_designator . 1)) (ELSIF . 
(attribute_designator . 1)) (ELSE . (attribute_designator . 1)) (DIGITS . 
(attribute_designator . 1)) (RANGE . (attribute_designator . 1)) (THEN . 
(attribute_designator . 1)) (USE . (attribute_designator . 1)) (COLON_EQUAL . 
(attribute_designator . 1)) (WHILE . (attribute_designator . 1)) (SELECT . 
(attribute_designator . 1)) (REQUEUE . (attribute_designator . 1)) (RAISE . 
(attribute_designator . 1)) (PRAGMA . (attribute [...]
       ((default . error) (DO . (attribute_designator . 2)) (ELSIF . 
(attribute_designator . 2)) (ELSE . (attribute_designator . 2)) (DIGITS . 
(attribute_designator . 2)) (RANGE . (attribute_designator . 2)) (THEN . 
(attribute_designator . 2)) (USE . (attribute_designator . 2)) (COLON_EQUAL . 
(attribute_designator . 2)) (WHILE . (attribute_designator . 2)) (SELECT . 
(attribute_designator . 2)) (REQUEUE . (attribute_designator . 2)) (RAISE . 
(attribute_designator . 2)) (PRAGMA . (attribute [...]
       ((default . error) (DO . (attribute_designator . 3)) (ELSIF . 
(attribute_designator . 3)) (ELSE . (attribute_designator . 3)) (DIGITS . 
(attribute_designator . 3)) (RANGE . (attribute_designator . 3)) (THEN . 
(attribute_designator . 3)) (USE . (attribute_designator . 3)) (COLON_EQUAL . 
(attribute_designator . 3)) (WHILE . (attribute_designator . 3)) (SELECT . 
(attribute_designator . 3)) (REQUEUE . (attribute_designator . 3)) (RAISE . 
(attribute_designator . 3)) (PRAGMA . (attribute [...]
-      ((default . error) (RIGHT_PAREN . ((association_opt . 0) (expression_opt 
. 0))) (COMMA . ((association_opt . 0) (expression_opt . 0))) (EQUAL_GREATER . 
(discrete_choice_list . 0)) (BAR . (discrete_choice_list . 0)) (PLUS .  143) 
(MINUS .  142) (OTHERS .  171) (ABS .  145) (NOT .  170) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  169) (STRING_LITERAL .  48) (NULL .  228) (NEW .  147) 
(LEFT_PAREN .  146))
+      ((default . error) (RIGHT_PAREN . ((association_opt . 0) (expression_opt 
. 0))) (COMMA . ((association_opt . 0) (expression_opt . 0))) (EQUAL_GREATER . 
(discrete_choice_list . 0)) (BAR . (discrete_choice_list . 0)) (PLUS .  144) 
(MINUS .  143) (OTHERS .  172) (ABS .  146) (NOT .  171) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  170) (STRING_LITERAL .  49) (NULL .  229) (NEW .  148) 
(LEFT_PAREN .  147))
       ((default . error) (DO . (attribute_designator . 4)) (ELSIF . 
(attribute_designator . 4)) (ELSE . (attribute_designator . 4)) (DIGITS . 
(attribute_designator . 4)) (RANGE . (attribute_designator . 4)) (THEN . 
(attribute_designator . 4)) (USE . (attribute_designator . 4)) (COLON_EQUAL . 
(attribute_designator . 4)) (WHILE . (attribute_designator . 4)) (SELECT . 
(attribute_designator . 4)) (REQUEUE . (attribute_designator . 4)) (RAISE . 
(attribute_designator . 4)) (PRAGMA . (attribute [...]
       ((default . error) (DO . (qualified_expression . 0)) (ELSIF . 
(qualified_expression . 0)) (ELSE . (qualified_expression . 0)) (DIGITS . 
(qualified_expression . 0)) (RANGE . (qualified_expression . 0)) (THEN . 
(qualified_expression . 0)) (USE . (qualified_expression . 0)) (COLON_EQUAL . 
(qualified_expression . 0)) (WHILE . (qualified_expression . 0)) (SELECT . 
(qualified_expression . 0)) (REQUEUE . (qualified_expression . 0)) (RAISE . 
(qualified_expression . 0)) (PRAGMA . (qualified [...]
       ((default . error) (DO . (attribute_reference . 0)) (ELSIF . 
(attribute_reference . 0)) (ELSE . (attribute_reference . 0)) (DIGITS . 
(attribute_reference . 0)) (RANGE . (attribute_reference . 0)) (THEN . 
(attribute_reference . 0)) (USE . (attribute_reference . 0)) (COLON_EQUAL . 
(attribute_reference . 0)) (WHILE . (attribute_reference . 0)) (SELECT . 
(attribute_reference . 0)) (REQUEUE . (attribute_reference . 0)) (RAISE . 
(attribute_reference . 0)) (PRAGMA . (attribute_reference . [...]
-      ((default . error) (DO . (attribute_designator . 0)) (ELSIF . 
(attribute_designator . 0)) (ELSE . (attribute_designator . 0)) (DIGITS . 
(attribute_designator . 0)) (RANGE . (attribute_designator . 0)) (THEN . 
(attribute_designator . 0)) (USE . (attribute_designator . 0)) (COLON_EQUAL . 
(attribute_designator . 0)) (WHILE . (attribute_designator . 0)) (SELECT . 
(attribute_designator . 0)) (REQUEUE . (attribute_designator . 0)) (RAISE . 
(attribute_designator . 0)) (PRAGMA . (attribute [...]
+      ((default . error) (DO . (attribute_designator . 0)) (ELSIF . 
(attribute_designator . 0)) (ELSE . (attribute_designator . 0)) (DIGITS . 
(attribute_designator . 0)) (RANGE . (attribute_designator . 0)) (THEN . 
(attribute_designator . 0)) (USE . (attribute_designator . 0)) (COLON_EQUAL . 
(attribute_designator . 0)) (WHILE . (attribute_designator . 0)) (SELECT . 
(attribute_designator . 0)) (REQUEUE . (attribute_designator . 0)) (RAISE . 
(attribute_designator . 0)) (PRAGMA . (attribute [...]
       ((default . error) (DO . (selected_component . 0)) (RIGHT_PAREN . 
(selected_component . 0)) (BAR . (selected_component . 0)) (ELSIF . 
(selected_component . 0)) (ELSE . (selected_component . 0)) (EQUAL_GREATER . 
(selected_component . 0)) (DIGITS . (selected_component . 0)) (RANGE . 
(selected_component . 0)) (THEN . (selected_component . 0)) (DOT_DOT . 
(selected_component . 0)) (IN . (selected_component . 0)) (NOT . 
(selected_component . 0)) (EQUAL . (selected_component . 0)) (GREATE [...]
       ((default . error) (DO . (selected_component . 2)) (RIGHT_PAREN . 
(selected_component . 2)) (BAR . (selected_component . 2)) (ELSIF . 
(selected_component . 2)) (ELSE . (selected_component . 2)) (EQUAL_GREATER . 
(selected_component . 2)) (DIGITS . (selected_component . 2)) (RANGE . 
(selected_component . 2)) (THEN . (selected_component . 2)) (DOT_DOT . 
(selected_component . 2)) (IN . (selected_component . 2)) (NOT . 
(selected_component . 2)) (EQUAL . (selected_component . 2)) (GREATE [...]
       ((default . error) (DO . (selected_component . 1)) (RIGHT_PAREN . 
(selected_component . 1)) (BAR . (selected_component . 1)) (ELSIF . 
(selected_component . 1)) (ELSE . (selected_component . 1)) (EQUAL_GREATER . 
(selected_component . 1)) (DIGITS . (selected_component . 1)) (RANGE . 
(selected_component . 1)) (THEN . (selected_component . 1)) (DOT_DOT . 
(selected_component . 1)) (IN . (selected_component . 1)) (NOT . 
(selected_component . 1)) (EQUAL . (selected_component . 1)) (GREATE [...]
       ((default . error) (DO . (selected_component . 3)) (RIGHT_PAREN . 
(selected_component . 3)) (BAR . (selected_component . 3)) (ELSIF . 
(selected_component . 3)) (ELSE . (selected_component . 3)) (EQUAL_GREATER . 
(selected_component . 3)) (DIGITS . (selected_component . 3)) (RANGE . 
(selected_component . 3)) (THEN . (selected_component . 3)) (DOT_DOT . 
(selected_component . 3)) (IN . (selected_component . 3)) (NOT . 
(selected_component . 3)) (EQUAL . (selected_component . 3)) (GREATE [...]
-      ((default . error) (DOT_DOT . (primary . 0)) (RIGHT_PAREN . (primary . 
0)) (COMMA . (primary . 0)) (BAR . (primary . 0)) (EQUAL_GREATER . (primary . 
0)) (PLUS . (primary . 0)) (MINUS . (primary . 0)) (AMPERSAND . (primary . 0)) 
(IN . (primary . 0)) (NOT . (primary . 0)) (EQUAL . (primary . 0)) (GREATER . 
(primary . 0)) (GREATER_EQUAL . (primary . 0)) (LESS . (primary . 0)) 
(LESS_EQUAL . (primary . 0)) (SLASH_EQUAL . (primary . 0)) (WITH . (primary . 
0)) (SLASH . (primary . 0)) (STA [...]
-      ((default . error) (COMMA .  260) (RIGHT_PAREN .  514))
-      ((default . error) (RIGHT_PAREN . (expression_opt . 1)) (COMMA . 
(expression_opt . 1)) (WITH .  513))
-      ((default . error) (IDENTIFIER .  71))
+      ((default . error) (DOT_DOT . (primary . 0)) (RIGHT_PAREN . (primary . 
0)) (COMMA . (primary . 0)) (BAR . (primary . 0)) (EQUAL_GREATER . (primary . 
0)) (PLUS . (primary . 0)) (MINUS . (primary . 0)) (AMPERSAND . (primary . 0)) 
(IN . (primary . 0)) (NOT . (primary . 0)) (EQUAL . (primary . 0)) (GREATER . 
(primary . 0)) (GREATER_EQUAL . (primary . 0)) (LESS . (primary . 0)) 
(LESS_EQUAL . (primary . 0)) (SLASH_EQUAL . (primary . 0)) (WITH . (primary . 
0)) (SLASH . (primary . 0)) (STA [...]
+      ((default . error) (COMMA .  261) (RIGHT_PAREN .  517))
+      ((default . error) (RIGHT_PAREN . (expression_opt . 1)) (COMMA . 
(expression_opt . 1)) (WITH .  516))
+      ((default . error) (IDENTIFIER .  72))
       ((default . error) (RIGHT_PAREN . (formal_part . 0)) (COLON_EQUAL . 
(formal_part . 0)) (DO . (formal_part . 0)) (WHEN . (formal_part . 0)) (RENAMES 
. (formal_part . 0)) (IS . (formal_part . 0)) (SEMICOLON . (formal_part . 0)) 
(WITH . (formal_part . 0)) (RETURN . (formal_part . 0)))
-      ((default . error) (IN . (aliased_opt . 0)) (OUT . (aliased_opt . 0)) 
(IDENTIFIER . (aliased_opt . 0)) (STRING_LITERAL . (aliased_opt . 0)) 
(CHARACTER_LITERAL . (aliased_opt . 0)) (ALIASED .  509) (ACCESS . 
(null_exclusion_opt . 0)) (NOT . ((aliased_opt . 0)  207)))
-      ((default . error) (FUNCTION . (protected_opt . 0)) (PROCEDURE . 
(protected_opt . 0)) (PROTECTED .  506) (IDENTIFIER . 
(general_access_modifier_opt . 0)) (STRING_LITERAL . 
(general_access_modifier_opt . 0)) (CHARACTER_LITERAL . 
(general_access_modifier_opt . 0)) (ALL .  504) (CONSTANT .  505))
-      ((default . error) (RIGHT_PAREN . (null_exclusion_opt . 1)) (DO . 
(null_exclusion_opt . 1)) (RENAMES . (null_exclusion_opt . 1)) (COLON_EQUAL . 
(null_exclusion_opt . 1)) (ACCESS . (null_exclusion_opt . 1)) 
(CHARACTER_LITERAL . (null_exclusion_opt . 1)) (STRING_LITERAL . 
(null_exclusion_opt . 1)) (IDENTIFIER . (null_exclusion_opt . 1)) (SEMICOLON . 
(null_exclusion_opt . 1)) (WITH . (null_exclusion_opt . 1)) (IS . 
(null_exclusion_opt . 1)))
-      ((default . error) (DO . (parameter_and_result_profile . 2)) 
(RIGHT_PAREN . (parameter_and_result_profile . 2)) (COLON_EQUAL . 
(parameter_and_result_profile . 2)) (RENAMES . (parameter_and_result_profile . 
2)) (IS . (parameter_and_result_profile . 2)) (WITH . 
(parameter_and_result_profile . 2)) (SEMICOLON . (parameter_and_result_profile 
. 2)))
-      ((default . error) (ACCESS .  234) (SEMICOLON . (name_opt . 0)) (WITH . 
(name_opt . 0)) (IS . (name_opt . 0)) (RENAMES . (name_opt . 0)) (COLON_EQUAL . 
(name_opt . 0)) (RIGHT_PAREN . (name_opt . 0)) (DO . (name_opt . 0)) 
(IDENTIFIER .  47) (CHARACTER_LITERAL .  49) (STRING_LITERAL .  48))
-      ((default . error) (COLON_EQUAL .  501) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  107))
-      ((default . error) (ACCESS .  234) (IDENTIFIER .  47) (CHARACTER_LITERAL 
.  49) (STRING_LITERAL .  48))
+      ((default . error) (IN . (aliased_opt . 0)) (OUT . (aliased_opt . 0)) 
(IDENTIFIER . (aliased_opt . 0)) (STRING_LITERAL . (aliased_opt . 0)) 
(CHARACTER_LITERAL . (aliased_opt . 0)) (ALIASED .  512) (ACCESS . 
(null_exclusion_opt . 0)) (NOT . ((aliased_opt . 0)  208)))
+      ((default . error) (FUNCTION . (protected_opt . 0)) (PROCEDURE . 
(protected_opt . 0)) (PROTECTED .  509) (IDENTIFIER . 
(general_access_modifier_opt . 0)) (STRING_LITERAL . 
(general_access_modifier_opt . 0)) (CHARACTER_LITERAL . 
(general_access_modifier_opt . 0)) (ALL .  507) (CONSTANT .  508))
+      ((default . error) (RIGHT_PAREN . (null_exclusion_opt . 1)) (DO . 
(null_exclusion_opt . 1)) (RENAMES . (null_exclusion_opt . 1)) (COLON_EQUAL . 
(null_exclusion_opt . 1)) (ACCESS . (null_exclusion_opt . 1)) 
(CHARACTER_LITERAL . (null_exclusion_opt . 1)) (STRING_LITERAL . 
(null_exclusion_opt . 1)) (IDENTIFIER . (null_exclusion_opt . 1)) (WITH . 
(null_exclusion_opt . 1)) (SEMICOLON . (null_exclusion_opt . 1)) (IS . 
(null_exclusion_opt . 1)))
+      ((default . error) (DO . (parameter_and_result_profile . 2)) 
(RIGHT_PAREN . (parameter_and_result_profile . 2)) (COLON_EQUAL . 
(parameter_and_result_profile . 2)) (RENAMES . (parameter_and_result_profile . 
2)) (IS . (parameter_and_result_profile . 2)) (SEMICOLON . 
(parameter_and_result_profile . 2)) (WITH . (parameter_and_result_profile . 2)))
+      ((default . error) (ACCESS .  235) (WITH . (name_opt . 0)) (SEMICOLON . 
(name_opt . 0)) (IS . (name_opt . 0)) (RENAMES . (name_opt . 0)) (COLON_EQUAL . 
(name_opt . 0)) (RIGHT_PAREN . (name_opt . 0)) (DO . (name_opt . 0)) 
(IDENTIFIER .  48) (CHARACTER_LITERAL .  50) (STRING_LITERAL .  49))
+      ((default . error) (COLON_EQUAL .  504) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  108))
+      ((default . error) (ACCESS .  235) (IDENTIFIER .  48) (CHARACTER_LITERAL 
.  50) (STRING_LITERAL .  49))
       ((default . error) (CHARACTER_LITERAL . (mode_opt . 2)) (STRING_LITERAL 
. (mode_opt . 2)) (IDENTIFIER . (mode_opt . 2)) (NOT . (mode_opt . 2)) (ACCESS 
. (mode_opt . 2)))
-      ((default . error) (NEW .  499))
+      ((default . error) (NEW .  502))
       ((default . error) (WITH . (formal_subprogram_declaration . 1)) (TYPE . 
(formal_subprogram_declaration . 1)) (PRAGMA . (formal_subprogram_declaration . 
1)) (IDENTIFIER . (formal_subprogram_declaration . 1)) (FUNCTION . 
(formal_subprogram_declaration . 1)) (PROCEDURE . 
(formal_subprogram_declaration . 1)) (PACKAGE . (formal_subprogram_declaration 
. 1)))
       ((default . error) (WITH . (subprogram_default . 1)) (SEMICOLON . 
(subprogram_default . 1)))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107) (BOX .  243) (NULL .  245) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108) (BOX .  244) (NULL .  246) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
       ((default . error) (WITH . (subprogram_default . 2)) (SEMICOLON . 
(subprogram_default . 2)))
-      ((default . error) (WITH . (subprogram_default . 0)) (SEMICOLON . 
(subprogram_default . 0)) (DOT .  86) (TICK .  87) (LEFT_PAREN .  105))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
-      ((default . error) (LEFT_PAREN .  481) (RANGE .  485) (MOD .  483) 
(DIGITS .  479) (DELTA .  478) (TASK .  488) (PROTECTED .  484) (INTERFACE .  
480) (ARRAY .  477) (PRIVATE . (abstract_tagged_limited_opt . 0)) (TAGGED .  
487) (NEW . (abstract_limited_synchronized_opt . 0)) (ABSTRACT .  476) (LIMITED 
.  482) (SYNCHRONIZED .  486) (ACCESS . (null_exclusion_opt . 0)) (NOT .  207))
-      ((default . error) (SEMICOLON .  475))
-      ((default . error) (RIGHT_PAREN .  474))
+      ((default . error) (WITH . (subprogram_default . 0)) (SEMICOLON . 
(subprogram_default . 0)) (DOT .  87) (TICK .  88) (LEFT_PAREN .  106))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
+      ((default . error) (LEFT_PAREN .  484) (RANGE .  488) (MOD .  486) 
(DIGITS .  482) (DELTA .  481) (TASK .  491) (PROTECTED .  487) (INTERFACE .  
483) (ARRAY .  480) (PRIVATE . (abstract_tagged_limited_opt . 0)) (TAGGED .  
490) (NEW . (abstract_limited_synchronized_opt . 0)) (ABSTRACT .  479) (LIMITED 
.  485) (SYNCHRONIZED .  489) (ACCESS . (null_exclusion_opt . 0)) (NOT .  208))
+      ((default . error) (SEMICOLON .  478))
+      ((default . error) (RIGHT_PAREN .  477))
       ((default . error) (RIGHT_PAREN . (discriminant_specification_list . 0)) 
(SEMICOLON . (discriminant_specification_list . 0)))
-      ((default . error) (SEMICOLON .  472) (RIGHT_PAREN .  473))
-      ((default . error) (COMMA .  94) (COLON .  471))
-      ((default . error) (DOT .  86) (TICK .  87) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  107) (LEFT_PAREN .  105))
-      ((default . error) (DOT .  86) (TICK .  87) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  107) (LEFT_PAREN .  105))
-      ((default . error) (DOT .  86) (TICK .  87) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  107) (LEFT_PAREN .  105))
+      ((default . error) (SEMICOLON .  475) (RIGHT_PAREN .  476))
+      ((default . error) (COMMA .  95) (COLON .  474))
+      ((default . error) (DOT .  87) (TICK .  88) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  108) (LEFT_PAREN .  106))
+      ((default . error) (DOT .  87) (TICK .  88) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  108) (LEFT_PAREN .  106))
+      ((default . error) (DOT .  87) (TICK .  88) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  108) (LEFT_PAREN .  106))
       ((default . error) (WITH . (with_clause . 0)) (USE . (with_clause . 0)) 
(SEPARATE . (with_clause . 0)) (PROCEDURE . (with_clause . 0)) (PRIVATE . 
(with_clause . 0)) (PRAGMA . (with_clause . 0)) (PACKAGE . (with_clause . 0)) 
(OVERRIDING . (with_clause . 0)) (NOT . (with_clause . 0)) (LIMITED . 
(with_clause . 0)) (GENERIC . (with_clause . 0)) (FUNCTION . (with_clause . 0)) 
($EOI . (with_clause . 0)))
-      ((default . error) (DOT .  86) (TICK .  87) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  107) (LEFT_PAREN .  105))
+      ((default . error) (DOT .  87) (TICK .  88) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  108) (LEFT_PAREN .  106))
       ((default . error) (DO . (name . 2)) (WHILE . (name . 2)) (SELECT . 
(name . 2)) (REQUEUE . (name . 2)) (RAISE . (name . 2)) (PRAGMA . (name . 2)) 
(NULL . (name . 2)) (LOOP . (name . 2)) (IF . (name . 2)) (GOTO . (name . 2)) 
(FOR . (name . 2)) (EXIT . (name . 2)) (DELAY . (name . 2)) (DECLARE . (name . 
2)) (CASE . (name . 2)) (BEGIN . (name . 2)) (ABORT . (name . 2)) (ACCEPT . 
(name . 2)) (CHARACTER_LITERAL . (name . 2)) (STRING_LITERAL . (name . 2)) 
(IDENTIFIER . (name . 2)) (LESS_ [...]
-      ((default . error) (RIGHT_PAREN . ((association_opt . 0) (expression_opt 
. 0))) (COMMA . ((association_opt . 0) (expression_opt . 0))) (IS . 
((association_opt . 0) (expression_opt . 0))) (SEMICOLON . ((association_opt . 
0) (expression_opt . 0))) (EQUAL_GREATER . (discrete_choice_list . 0)) (BAR . 
(discrete_choice_list . 0)) (OTHERS .  171) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  169) (STRING_LITERAL .  48) (PLUS .  143) (MINUS .  142) 
(ABS .  145) (NOT .  170) (NULL .  149) (NEW . [...]
+      ((default . error) (RIGHT_PAREN . ((association_opt . 0) (expression_opt 
. 0))) (COMMA . ((association_opt . 0) (expression_opt . 0))) (IS . 
((association_opt . 0) (expression_opt . 0))) (SEMICOLON . ((association_opt . 
0) (expression_opt . 0))) (EQUAL_GREATER . (discrete_choice_list . 0)) (BAR . 
(discrete_choice_list . 0)) (OTHERS .  172) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  170) (STRING_LITERAL .  49) (PLUS .  144) (MINUS .  143) 
(ABS .  146) (NOT .  171) (NULL .  150) (NEW . [...]
       ((default . error) (STAR_STAR . (actual_parameter_part . 0)) (REM . 
(actual_parameter_part . 0)) (MOD . (actual_parameter_part . 0)) (STAR . 
(actual_parameter_part . 0)) (SLASH . (actual_parameter_part . 0)) (DOT_DOT . 
(actual_parameter_part . 0)) (AMPERSAND . (actual_parameter_part . 0)) (MINUS . 
(actual_parameter_part . 0)) (PLUS . (actual_parameter_part . 0)) (RIGHT_PAREN 
. (actual_parameter_part . 0)) (RANGE . (actual_parameter_part . 0)) 
(COLON_EQUAL . (actual_parameter_part . [...]
-      ((default . error) (SEMICOLON .  465))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (SEMICOLON .  468))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (MINUS . (relational_operator . 0)) (PLUS . 
(relational_operator . 0)) (IDENTIFIER . (relational_operator . 0)) 
(STRING_LITERAL . (relational_operator . 0)) (CHARACTER_LITERAL . 
(relational_operator . 0)) (ABS . (relational_operator . 0)) (LEFT_PAREN . 
(relational_operator . 0)) (NEW . (relational_operator . 0)) (NOT . 
(relational_operator . 0)) (NULL . (relational_operator . 0)))
       ((default . error) (MINUS . (relational_operator . 4)) (PLUS . 
(relational_operator . 4)) (IDENTIFIER . (relational_operator . 4)) 
(STRING_LITERAL . (relational_operator . 4)) (CHARACTER_LITERAL . 
(relational_operator . 4)) (ABS . (relational_operator . 4)) (LEFT_PAREN . 
(relational_operator . 4)) (NEW . (relational_operator . 4)) (NOT . 
(relational_operator . 4)) (NULL . (relational_operator . 4)))
       ((default . error) (MINUS . (relational_operator . 5)) (PLUS . 
(relational_operator . 5)) (IDENTIFIER . (relational_operator . 5)) 
(STRING_LITERAL . (relational_operator . 5)) (CHARACTER_LITERAL . 
(relational_operator . 5)) (ABS . (relational_operator . 5)) (LEFT_PAREN . 
(relational_operator . 5)) (NEW . (relational_operator . 5)) (NOT . 
(relational_operator . 5)) (NULL . (relational_operator . 5)))
       ((default . error) (MINUS . (relational_operator . 2)) (PLUS . 
(relational_operator . 2)) (IDENTIFIER . (relational_operator . 2)) 
(STRING_LITERAL . (relational_operator . 2)) (CHARACTER_LITERAL . 
(relational_operator . 2)) (ABS . (relational_operator . 2)) (LEFT_PAREN . 
(relational_operator . 2)) (NEW . (relational_operator . 2)) (NOT . 
(relational_operator . 2)) (NULL . (relational_operator . 2)))
       ((default . error) (MINUS . (relational_operator . 3)) (PLUS . 
(relational_operator . 3)) (IDENTIFIER . (relational_operator . 3)) 
(STRING_LITERAL . (relational_operator . 3)) (CHARACTER_LITERAL . 
(relational_operator . 3)) (ABS . (relational_operator . 3)) (LEFT_PAREN . 
(relational_operator . 3)) (NEW . (relational_operator . 3)) (NOT . 
(relational_operator . 3)) (NULL . (relational_operator . 3)))
       ((default . error) (MINUS . (relational_operator . 1)) (PLUS . 
(relational_operator . 1)) (IDENTIFIER . (relational_operator . 1)) 
(STRING_LITERAL . (relational_operator . 1)) (CHARACTER_LITERAL . 
(relational_operator . 1)) (ABS . (relational_operator . 1)) (LEFT_PAREN . 
(relational_operator . 1)) (NEW . (relational_operator . 1)) (NOT . 
(relational_operator . 1)) (NULL . (relational_operator . 1)))
-      ((default . error) (PLUS .  143) (MINUS .  142) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (ABS .  145) (NOT .  148) 
(NULL .  149) (NEW .  147) (LEFT_PAREN .  146))
-      ((default . error) (IN .  459))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (RANGE .  457) (LEFT_PAREN .  219) (ACCESS .  216) 
(DELTA .  217) (DIGITS .  218) (MOD .  220) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48))
-      ((default . error) (OTHERS .  171) (IDENTIFIER .  47) (CHARACTER_LITERAL 
.  49) (STRING_LITERAL .  48) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
170) (NULL .  149) (NEW .  147) (LEFT_PAREN .  146))
-      ((default . error) (BOX .  453) (PLUS .  143) (MINUS .  142) (ABS .  
145) (NOT .  148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (THEN .  451) (PLUS .  143) (MINUS .  142) (ABS .  
145) (NOT .  148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (ELSE .  449) (PLUS .  143) (MINUS .  142) (ABS .  
145) (NOT .  148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (ELSE .  447))
-      ((default . error) (THEN .  446))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (XOR . (primary . 0)) (OR . (primary . 0)) (AND . 
(primary . 0)) (SLASH_EQUAL . (primary . 0)) (LESS_EQUAL . (primary . 0)) (LESS 
. (primary . 0)) (GREATER_EQUAL . (primary . 0)) (GREATER . (primary . 0)) 
(EQUAL . (primary . 0)) (EQUAL_GREATER . (primary . 0)) (BAR . (primary . 0)) 
(PLUS . (primary . 0)) (MINUS . (primary . 0)) (AMPERSAND . (primary . 0)) 
(DOT_DOT . (primary . 0)) (SLASH . (primary . 0)) (STAR . (primary . 0)) (MOD . 
(primary . 0)) (REM . (primar [...]
-      ((default . error) (COLON_EQUAL . (factor . 3)) (OF . (factor . 3)) 
(LOOP . (factor . 3)) (DO . (factor . 3)) (PLUS . (factor . 3)) (MINUS . 
(factor . 3)) (AMPERSAND . (factor . 3)) (SEMICOLON . (factor . 3)) (SLASH . 
(factor . 3)) (STAR . (factor . 3)) (MOD . (factor . 3)) (REM . (factor . 3)) 
(XOR . (factor . 3)) (OR . (factor . 3)) (AND . (factor . 3)) (IN . (factor . 
3)) (NOT . (factor . 3)) (EQUAL . (factor . 3)) (GREATER . (factor . 3)) 
(GREATER_EQUAL . (factor . 3)) (LESS .  [...]
-      ((default . error) (BOX .  439) (PLUS .  143) (MINUS .  142) (ABS .  
145) (NOT .  148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (COLON . ( 438 (identifier_list . 0))) (COMMA . 
(identifier_list . 0)))
-      ((default . error) (IDENTIFIER .  433) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  434))
-      ((default . error) (BODY .  432) (IDENTIFIER .  47) (CHARACTER_LITERAL . 
 49) (STRING_LITERAL .  48))
-      ((default . error) (IDENTIFIER .  429) (TYPE .  431) (BODY .  430))
-      ((default . error) (IDENTIFIER .  428))
-      ((default . error) (TYPE .  427) (BODY .  426) (IDENTIFIER .  425))
-      ((default . error) (IDENTIFIER .  424))
+      ((default . error) (PLUS .  144) (MINUS .  143) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (ABS .  146) (NOT .  149) 
(NULL .  150) (NEW .  148) (LEFT_PAREN .  147))
+      ((default . error) (IN .  462))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (RANGE .  460) (LEFT_PAREN .  220) (ACCESS .  217) 
(DELTA .  218) (DIGITS .  219) (MOD .  221) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49))
+      ((default . error) (OTHERS .  172) (IDENTIFIER .  48) (CHARACTER_LITERAL 
.  50) (STRING_LITERAL .  49) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
171) (NULL .  150) (NEW .  148) (LEFT_PAREN .  147))
+      ((default . error) (BOX .  456) (PLUS .  144) (MINUS .  143) (ABS .  
146) (NOT .  149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (THEN .  454) (PLUS .  144) (MINUS .  143) (ABS .  
146) (NOT .  149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (ELSE .  452) (PLUS .  144) (MINUS .  143) (ABS .  
146) (NOT .  149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (ELSE .  450))
+      ((default . error) (THEN .  449))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (XOR . (primary . 0)) (OR . (primary . 0)) (AND . 
(primary . 0)) (SLASH_EQUAL . (primary . 0)) (LESS_EQUAL . (primary . 0)) (LESS 
. (primary . 0)) (GREATER_EQUAL . (primary . 0)) (GREATER . (primary . 0)) 
(EQUAL . (primary . 0)) (EQUAL_GREATER . (primary . 0)) (BAR . (primary . 0)) 
(PLUS . (primary . 0)) (MINUS . (primary . 0)) (AMPERSAND . (primary . 0)) 
(DOT_DOT . (primary . 0)) (SLASH . (primary . 0)) (STAR . (primary . 0)) (MOD . 
(primary . 0)) (REM . (primar [...]
+      ((default . error) (COLON_EQUAL . (factor . 3)) (OF . (factor . 3)) 
(LOOP . (factor . 3)) (DO . (factor . 3)) (PLUS . (factor . 3)) (MINUS . 
(factor . 3)) (AMPERSAND . (factor . 3)) (SEMICOLON . (factor . 3)) (SLASH . 
(factor . 3)) (STAR . (factor . 3)) (MOD . (factor . 3)) (REM . (factor . 3)) 
(XOR . (factor . 3)) (OR . (factor . 3)) (AND . (factor . 3)) (IN . (factor . 
3)) (NOT . (factor . 3)) (EQUAL . (factor . 3)) (GREATER . (factor . 3)) 
(GREATER_EQUAL . (factor . 3)) (LESS .  [...]
+      ((default . error) (BOX .  442) (PLUS .  144) (MINUS .  143) (ABS .  
146) (NOT .  149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (COLON . ( 441 (identifier_list . 0))) (COMMA . 
(identifier_list . 0)))
+      ((default . error) (IDENTIFIER .  436) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  437))
+      ((default . error) (BODY .  435) (IDENTIFIER .  48) (CHARACTER_LITERAL . 
 50) (STRING_LITERAL .  49))
+      ((default . error) (IDENTIFIER .  432) (TYPE .  434) (BODY .  433))
+      ((default . error) (IDENTIFIER .  431))
+      ((default . error) (TYPE .  430) (BODY .  429) (IDENTIFIER .  428))
+      ((default . error) (IDENTIFIER .  427))
       ((default . error) (END . (declaration . 0)) (PRIVATE . (declaration . 
0)) (USE . (declaration . 0)) (TYPE . (declaration . 0)) (TASK . (declaration . 
0)) (SUBTYPE . (declaration . 0)) (PROTECTED . (declaration . 0)) (PROCEDURE . 
(declaration . 0)) (PRAGMA . (declaration . 0)) (PACKAGE . (declaration . 0)) 
(OVERRIDING . (declaration . 0)) (NOT . (declaration . 0)) (GENERIC . 
(declaration . 0)) (FUNCTION . (declaration . 0)) (FOR . (declaration . 0)) 
(ENTRY . (declaration . 0)) (IDE [...]
       ((default . error) (END . (declaration . 1)) (PRIVATE . (declaration . 
1)) (USE . (declaration . 1)) (TYPE . (declaration . 1)) (TASK . (declaration . 
1)) (SUBTYPE . (declaration . 1)) (PROTECTED . (declaration . 1)) (PROCEDURE . 
(declaration . 1)) (PRAGMA . (declaration . 1)) (PACKAGE . (declaration . 1)) 
(OVERRIDING . (declaration . 1)) (NOT . (declaration . 1)) (GENERIC . 
(declaration . 1)) (FUNCTION . (declaration . 1)) (FOR . (declaration . 1)) 
(ENTRY . (declaration . 1)) (IDE [...]
       ((default . error) (WHEN . (aspect_clause . 3)) (PRIVATE . 
(aspect_clause . 3)) (END . (aspect_clause . 3)) (CASE . (aspect_clause . 3)) 
(BEGIN . (aspect_clause . 3)) (IDENTIFIER . (aspect_clause . 3)) (ENTRY . 
(aspect_clause . 3)) (FOR . (aspect_clause . 3)) (FUNCTION . (aspect_clause . 
3)) (GENERIC . (aspect_clause . 3)) (NOT . (aspect_clause . 3)) (OVERRIDING . 
(aspect_clause . 3)) (PACKAGE . (aspect_clause . 3)) (PRAGMA . (aspect_clause . 
3)) (PROCEDURE . (aspect_clause . 3)) ( [...]
       ((default . error) (END . (declaration . 2)) (PRIVATE . (declaration . 
2)) (USE . (declaration . 2)) (TYPE . (declaration . 2)) (TASK . (declaration . 
2)) (SUBTYPE . (declaration . 2)) (PROTECTED . (declaration . 2)) (PROCEDURE . 
(declaration . 2)) (PRAGMA . (declaration . 2)) (PACKAGE . (declaration . 2)) 
(OVERRIDING . (declaration . 2)) (NOT . (declaration . 2)) (GENERIC . 
(declaration . 2)) (FUNCTION . (declaration . 2)) (FOR . (declaration . 2)) 
(ENTRY . (declaration . 2)) (IDE [...]
       ((default . error) (PRIVATE . (body . 1)) (END . (body . 1)) (BEGIN . 
(body . 1)) (IDENTIFIER . (body . 1)) (ENTRY . (body . 1)) (FOR . (body . 1)) 
(FUNCTION . (body . 1)) (GENERIC . (body . 1)) (NOT . (body . 1)) (OVERRIDING . 
(body . 1)) (PACKAGE . (body . 1)) (PRAGMA . (body . 1)) (PROCEDURE . (body . 
1)) (PROTECTED . (body . 1)) (SUBTYPE . (body . 1)) (TASK . (body . 1)) (TYPE . 
(body . 1)) (USE . (body . 1)))
       ((default . error) (PRIVATE . (declarations . 0)) (END . (declarations . 
0)) (BEGIN . (declarations . 0)) (IDENTIFIER . (declarations . 0)) (ENTRY . 
(declarations . 0)) (FOR . (declarations . 0)) (FUNCTION . (declarations . 0)) 
(GENERIC . (declarations . 0)) (NOT . (declarations . 0)) (OVERRIDING . 
(declarations . 0)) (PACKAGE . (declarations . 0)) (PRAGMA . (declarations . 
0)) (PROCEDURE . (declarations . 0)) (PROTECTED . (declarations . 0)) (SUBTYPE 
. (declarations . 0)) (TASK .  [...]
-      ((default . error) (END . (declarative_part_opt . 1)) (PRIVATE . 
(declarative_part_opt . 1)) (BEGIN . (declarative_part_opt . 1)) (USE .  11) 
(SUBTYPE .  291) (PRAGMA .  7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(ENTRY . (overriding_indicator_opt . 2)) (FOR .  288) (IDENTIFIER .  287) (TYPE 
.  293) (GENERIC .  2) (PROTECTED .  290) (TASK .  292) (PACKAGE .  289))
-      ((default . error) (END .  421) (PRIVATE .  422))
+      ((default . error) (END . (declarative_part_opt . 1)) (PRIVATE . 
(declarative_part_opt . 1)) (BEGIN . (declarative_part_opt . 1)) (USE .  11) 
(SUBTYPE .  292) (PRAGMA .  7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(ENTRY . (overriding_indicator_opt . 2)) (FOR .  289) (IDENTIFIER .  288) (TYPE 
.  294) (GENERIC .  2) (PROTECTED .  291) (TASK .  293) (PACKAGE .  290))
+      ((default . error) (END .  424) (PRIVATE .  425))
       ((default . error) (END . (declaration . 3)) (PRIVATE . (declaration . 
3)) (USE . (declaration . 3)) (TYPE . (declaration . 3)) (TASK . (declaration . 
3)) (SUBTYPE . (declaration . 3)) (PROTECTED . (declaration . 3)) (PROCEDURE . 
(declaration . 3)) (PRAGMA . (declaration . 3)) (PACKAGE . (declaration . 3)) 
(OVERRIDING . (declaration . 3)) (NOT . (declaration . 3)) (GENERIC . 
(declaration . 3)) (FUNCTION . (declaration . 3)) (FOR . (declaration . 3)) 
(ENTRY . (declaration . 3)) (IDE [...]
       ((default . error) (WHEN . (aspect_clause . 1)) (PRIVATE . 
(aspect_clause . 1)) (END . (aspect_clause . 1)) (CASE . (aspect_clause . 1)) 
(BEGIN . (aspect_clause . 1)) (IDENTIFIER . (aspect_clause . 1)) (ENTRY . 
(aspect_clause . 1)) (FOR . (aspect_clause . 1)) (FUNCTION . (aspect_clause . 
1)) (GENERIC . (aspect_clause . 1)) (NOT . (aspect_clause . 1)) (OVERRIDING . 
(aspect_clause . 1)) (PACKAGE . (aspect_clause . 1)) (PRAGMA . (aspect_clause . 
1)) (PROCEDURE . (aspect_clause . 1)) ( [...]
       ((default . error) (END . (declaration . 4)) (PRIVATE . (declaration . 
4)) (USE . (declaration . 4)) (TYPE . (declaration . 4)) (TASK . (declaration . 
4)) (SUBTYPE . (declaration . 4)) (PROTECTED . (declaration . 4)) (PROCEDURE . 
(declaration . 4)) (PRAGMA . (declaration . 4)) (PACKAGE . (declaration . 4)) 
(OVERRIDING . (declaration . 4)) (NOT . (declaration . 4)) (GENERIC . 
(declaration . 4)) (FUNCTION . (declaration . 4)) (FOR . (declaration . 4)) 
(ENTRY . (declaration . 4)) (IDE [...]
-      ((default . error) (PRIVATE . (type_declaration . 0)) (END . 
(type_declaration . 0)) (BEGIN . (type_declaration . 0)) (IDENTIFIER . 
(type_declaration . 0)) (ENTRY . (type_declaration . 0)) (FOR . 
(type_declaration . 0)) (FUNCTION . (type_declaration . 0)) (GENERIC . 
(type_declaration . 0)) (NOT . (type_declaration . 0)) (OVERRIDING . 
(type_declaration . 0)) (PACKAGE . (type_declaration . 0)) (PRAGMA . 
(type_declaration . 0)) (PROCEDURE . (type_declaration . 0)) (PROTECTED . 
(type_d [...]
       ((default . error) (END . (declaration . 5)) (PRIVATE . (declaration . 
5)) (USE . (declaration . 5)) (TYPE . (declaration . 5)) (TASK . (declaration . 
5)) (SUBTYPE . (declaration . 5)) (PROTECTED . (declaration . 5)) (PROCEDURE . 
(declaration . 5)) (PRAGMA . (declaration . 5)) (PACKAGE . (declaration . 5)) 
(OVERRIDING . (declaration . 5)) (NOT . (declaration . 5)) (GENERIC . 
(declaration . 5)) (FUNCTION . (declaration . 5)) (FOR . (declaration . 5)) 
(ENTRY . (declaration . 5)) (IDE [...]
+      ((default . error) (PRIVATE . (type_declaration . 0)) (END . 
(type_declaration . 0)) (BEGIN . (type_declaration . 0)) (IDENTIFIER . 
(type_declaration . 0)) (ENTRY . (type_declaration . 0)) (FOR . 
(type_declaration . 0)) (FUNCTION . (type_declaration . 0)) (GENERIC . 
(type_declaration . 0)) (NOT . (type_declaration . 0)) (OVERRIDING . 
(type_declaration . 0)) (PACKAGE . (type_declaration . 0)) (PRAGMA . 
(type_declaration . 0)) (PROCEDURE . (type_declaration . 0)) (PROTECTED . 
(type_d [...]
       ((default . error) (END . (declaration . 6)) (PRIVATE . (declaration . 
6)) (USE . (declaration . 6)) (TYPE . (declaration . 6)) (TASK . (declaration . 
6)) (SUBTYPE . (declaration . 6)) (PROTECTED . (declaration . 6)) (PROCEDURE . 
(declaration . 6)) (PRAGMA . (declaration . 6)) (PACKAGE . (declaration . 6)) 
(OVERRIDING . (declaration . 6)) (NOT . (declaration . 6)) (GENERIC . 
(declaration . 6)) (FUNCTION . (declaration . 6)) (FOR . (declaration . 6)) 
(ENTRY . (declaration . 6)) (IDE [...]
+      ((default . error) (END . (declaration . 7)) (PRIVATE . (declaration . 
7)) (USE . (declaration . 7)) (TYPE . (declaration . 7)) (TASK . (declaration . 
7)) (SUBTYPE . (declaration . 7)) (PROTECTED . (declaration . 7)) (PROCEDURE . 
(declaration . 7)) (PRAGMA . (declaration . 7)) (PACKAGE . (declaration . 7)) 
(OVERRIDING . (declaration . 7)) (NOT . (declaration . 7)) (GENERIC . 
(declaration . 7)) (FUNCTION . (declaration . 7)) (FOR . (declaration . 7)) 
(ENTRY . (declaration . 7)) (IDE [...]
       ((default . error) (PRIVATE . (renaming_declaration . 3)) (END . 
(renaming_declaration . 3)) (BEGIN . (renaming_declaration . 3)) (IDENTIFIER . 
(renaming_declaration . 3)) (ENTRY . (renaming_declaration . 3)) (FOR . 
(renaming_declaration . 3)) (FUNCTION . (renaming_declaration . 3)) (GENERIC . 
(renaming_declaration . 3)) (NOT . (renaming_declaration . 3)) (OVERRIDING . 
(renaming_declaration . 3)) (PACKAGE . (renaming_declaration . 3)) (PRAGMA . 
(renaming_declaration . 3)) (PROCEDUR [...]
-      ((default . error) (COMMA .  94) (COLON .  420))
+      ((default . error) (COMMA .  95) (COLON .  423))
       ((default . error) (PRIVATE . (type_declaration . 1)) (END . 
(type_declaration . 1)) (BEGIN . (type_declaration . 1)) (IDENTIFIER . 
(type_declaration . 1)) (ENTRY . (type_declaration . 1)) (FOR . 
(type_declaration . 1)) (FUNCTION . (type_declaration . 1)) (GENERIC . 
(type_declaration . 1)) (NOT . (type_declaration . 1)) (OVERRIDING . 
(type_declaration . 1)) (PACKAGE . (type_declaration . 1)) (PRAGMA . 
(type_declaration . 1)) (PROCEDURE . (type_declaration . 1)) (PROTECTED . 
(type_d [...]
-      ((default . error) (END . (declaration . 7)) (PRIVATE . (declaration . 
7)) (USE . (declaration . 7)) (TYPE . (declaration . 7)) (TASK . (declaration . 
7)) (SUBTYPE . (declaration . 7)) (PROTECTED . (declaration . 7)) (PROCEDURE . 
(declaration . 7)) (PRAGMA . (declaration . 7)) (PACKAGE . (declaration . 7)) 
(OVERRIDING . (declaration . 7)) (NOT . (declaration . 7)) (GENERIC . 
(declaration . 7)) (FUNCTION . (declaration . 7)) (FOR . (declaration . 7)) 
(ENTRY . (declaration . 7)) (IDE [...]
-      ((default . error) (END . (declaration . 9)) (PRIVATE . (declaration . 
9)) (USE . (declaration . 9)) (TYPE . (declaration . 9)) (TASK . (declaration . 
9)) (SUBTYPE . (declaration . 9)) (PROTECTED . (declaration . 9)) (PROCEDURE . 
(declaration . 9)) (PRAGMA . (declaration . 9)) (PACKAGE . (declaration . 9)) 
(OVERRIDING . (declaration . 9)) (NOT . (declaration . 9)) (GENERIC . 
(declaration . 9)) (FUNCTION . (declaration . 9)) (FOR . (declaration . 9)) 
(ENTRY . (declaration . 9)) (IDE [...]
+      ((default . error) (END . (declaration . 8)) (PRIVATE . (declaration . 
8)) (USE . (declaration . 8)) (TYPE . (declaration . 8)) (TASK . (declaration . 
8)) (SUBTYPE . (declaration . 8)) (PROTECTED . (declaration . 8)) (PROCEDURE . 
(declaration . 8)) (PRAGMA . (declaration . 8)) (PACKAGE . (declaration . 8)) 
(OVERRIDING . (declaration . 8)) (NOT . (declaration . 8)) (GENERIC . 
(declaration . 8)) (FUNCTION . (declaration . 8)) (FOR . (declaration . 8)) 
(ENTRY . (declaration . 8)) (IDE [...]
+      ((default . error) (END . (declaration . 10)) (PRIVATE . (declaration . 
10)) (USE . (declaration . 10)) (TYPE . (declaration . 10)) (TASK . 
(declaration . 10)) (SUBTYPE . (declaration . 10)) (PROTECTED . (declaration . 
10)) (PROCEDURE . (declaration . 10)) (PRAGMA . (declaration . 10)) (PACKAGE . 
(declaration . 10)) (OVERRIDING . (declaration . 10)) (NOT . (declaration . 
10)) (GENERIC . (declaration . 10)) (FUNCTION . (declaration . 10)) (FOR . 
(declaration . 10)) (ENTRY . (declara [...]
       ((default . error) (PRIVATE . (renaming_declaration . 0)) (END . 
(renaming_declaration . 0)) (BEGIN . (renaming_declaration . 0)) (IDENTIFIER . 
(renaming_declaration . 0)) (ENTRY . (renaming_declaration . 0)) (FOR . 
(renaming_declaration . 0)) (FUNCTION . (renaming_declaration . 0)) (GENERIC . 
(renaming_declaration . 0)) (NOT . (renaming_declaration . 0)) (OVERRIDING . 
(renaming_declaration . 0)) (PACKAGE . (renaming_declaration . 0)) (PRAGMA . 
(renaming_declaration . 0)) (PROCEDUR [...]
-      ((default . error) (ENTRY .  417) (FUNCTION .  39) (PROCEDURE .  40))
+      ((default . error) (ENTRY .  419) (FUNCTION .  40) (PROCEDURE .  41))
       ((default . error) ($EOI . (proper_body . 1)) (LIMITED . (proper_body . 
1)) (SEPARATE . (proper_body . 1)) (WITH . (proper_body . 1)) (END . 
(proper_body . 1)) (PRIVATE . (proper_body . 1)) (USE . (proper_body . 1)) 
(TYPE . (proper_body . 1)) (TASK . (proper_body . 1)) (SUBTYPE . (proper_body . 
1)) (PROTECTED . (proper_body . 1)) (PROCEDURE . (proper_body . 1)) (PRAGMA . 
(proper_body . 1)) (PACKAGE . (proper_body . 1)) (OVERRIDING . (proper_body . 
1)) (NOT . (proper_body . 1)) (GEN [...]
       ((default . error) (END . (body_stub . 1)) (PRIVATE . (body_stub . 1)) 
(USE . (body_stub . 1)) (TYPE . (body_stub . 1)) (TASK . (body_stub . 1)) 
(SUBTYPE . (body_stub . 1)) (PROTECTED . (body_stub . 1)) (PROCEDURE . 
(body_stub . 1)) (PRAGMA . (body_stub . 1)) (PACKAGE . (body_stub . 1)) 
(OVERRIDING . (body_stub . 1)) (NOT . (body_stub . 1)) (GENERIC . (body_stub . 
1)) (FUNCTION . (body_stub . 1)) (FOR . (body_stub . 1)) (ENTRY . (body_stub . 
1)) (IDENTIFIER . (body_stub . 1)) (BEGI [...]
-      ((default . error) (END . (declaration . 10)) (PRIVATE . (declaration . 
10)) (USE . (declaration . 10)) (TYPE . (declaration . 10)) (TASK . 
(declaration . 10)) (SUBTYPE . (declaration . 10)) (PROTECTED . (declaration . 
10)) (PROCEDURE . (declaration . 10)) (PRAGMA . (declaration . 10)) (PACKAGE . 
(declaration . 10)) (OVERRIDING . (declaration . 10)) (NOT . (declaration . 
10)) (GENERIC . (declaration . 10)) (FUNCTION . (declaration . 10)) (FOR . 
(declaration . 10)) (ENTRY . (declara [...]
-      ((default . error) (PRIVATE . (renaming_declaration . 1)) (END . 
(renaming_declaration . 1)) (BEGIN . (renaming_declaration . 1)) (IDENTIFIER . 
(renaming_declaration . 1)) (ENTRY . (renaming_declaration . 1)) (FOR . 
(renaming_declaration . 1)) (FUNCTION . (renaming_declaration . 1)) (GENERIC . 
(renaming_declaration . 1)) (NOT . (renaming_declaration . 1)) (OVERRIDING . 
(renaming_declaration . 1)) (PACKAGE . (renaming_declaration . 1)) (PRAGMA . 
(renaming_declaration . 1)) (PROCEDUR [...]
       ((default . error) (END . (declaration . 11)) (PRIVATE . (declaration . 
11)) (USE . (declaration . 11)) (TYPE . (declaration . 11)) (TASK . 
(declaration . 11)) (SUBTYPE . (declaration . 11)) (PROTECTED . (declaration . 
11)) (PROCEDURE . (declaration . 11)) (PRAGMA . (declaration . 11)) (PACKAGE . 
(declaration . 11)) (OVERRIDING . (declaration . 11)) (NOT . (declaration . 
11)) (GENERIC . (declaration . 11)) (FUNCTION . (declaration . 11)) (FOR . 
(declaration . 11)) (ENTRY . (declara [...]
+      ((default . error) (PRIVATE . (renaming_declaration . 1)) (END . 
(renaming_declaration . 1)) (BEGIN . (renaming_declaration . 1)) (IDENTIFIER . 
(renaming_declaration . 1)) (ENTRY . (renaming_declaration . 1)) (FOR . 
(renaming_declaration . 1)) (FUNCTION . (renaming_declaration . 1)) (GENERIC . 
(renaming_declaration . 1)) (NOT . (renaming_declaration . 1)) (OVERRIDING . 
(renaming_declaration . 1)) (PACKAGE . (renaming_declaration . 1)) (PRAGMA . 
(renaming_declaration . 1)) (PROCEDUR [...]
+      ((default . error) (END . (declaration . 12)) (PRIVATE . (declaration . 
12)) (USE . (declaration . 12)) (TYPE . (declaration . 12)) (TASK . 
(declaration . 12)) (SUBTYPE . (declaration . 12)) (PROTECTED . (declaration . 
12)) (PROCEDURE . (declaration . 12)) (PRAGMA . (declaration . 12)) (PACKAGE . 
(declaration . 12)) (OVERRIDING . (declaration . 12)) (NOT . (declaration . 
12)) (GENERIC . (declaration . 12)) (FUNCTION . (declaration . 12)) (FOR . 
(declaration . 12)) (ENTRY . (declara [...]
       ((default . error) (PRIVATE . (type_declaration . 3)) (END . 
(type_declaration . 3)) (BEGIN . (type_declaration . 3)) (IDENTIFIER . 
(type_declaration . 3)) (ENTRY . (type_declaration . 3)) (FOR . 
(type_declaration . 3)) (FUNCTION . (type_declaration . 3)) (GENERIC . 
(type_declaration . 3)) (NOT . (type_declaration . 3)) (OVERRIDING . 
(type_declaration . 3)) (PACKAGE . (type_declaration . 3)) (PRAGMA . 
(type_declaration . 3)) (PROCEDURE . (type_declaration . 3)) (PROTECTED . 
(type_d [...]
       ((default . error) (PRIVATE . (type_declaration . 2)) (END . 
(type_declaration . 2)) (BEGIN . (type_declaration . 2)) (IDENTIFIER . 
(type_declaration . 2)) (ENTRY . (type_declaration . 2)) (FOR . 
(type_declaration . 2)) (FUNCTION . (type_declaration . 2)) (GENERIC . 
(type_declaration . 2)) (NOT . (type_declaration . 2)) (OVERRIDING . 
(type_declaration . 2)) (PACKAGE . (type_declaration . 2)) (PRAGMA . 
(type_declaration . 2)) (PROCEDURE . (type_declaration . 2)) (PROTECTED . 
(type_d [...]
       ((default . error) (PRIVATE . (body . 0)) (END . (body . 0)) (BEGIN . 
(body . 0)) (IDENTIFIER . (body . 0)) (ENTRY . (body . 0)) (FOR . (body . 0)) 
(FUNCTION . (body . 0)) (GENERIC . (body . 0)) (NOT . (body . 0)) (OVERRIDING . 
(body . 0)) (PACKAGE . (body . 0)) (PRAGMA . (body . 0)) (PROCEDURE . (body . 
0)) (PROTECTED . (body . 0)) (SUBTYPE . (body . 0)) (TASK . (body . 0)) (TYPE . 
(body . 0)) (USE . (body . 0)))
@@ -1988,305 +2013,307 @@
       ((default . error) (END . (body_stub . 3)) (PRIVATE . (body_stub . 3)) 
(USE . (body_stub . 3)) (TYPE . (body_stub . 3)) (TASK . (body_stub . 3)) 
(SUBTYPE . (body_stub . 3)) (PROTECTED . (body_stub . 3)) (PROCEDURE . 
(body_stub . 3)) (PRAGMA . (body_stub . 3)) (PACKAGE . (body_stub . 3)) 
(OVERRIDING . (body_stub . 3)) (NOT . (body_stub . 3)) (GENERIC . (body_stub . 
3)) (FUNCTION . (body_stub . 3)) (FOR . (body_stub . 3)) (ENTRY . (body_stub . 
3)) (IDENTIFIER . (body_stub . 3)) (BEGI [...]
       ((default . error) (END . (full_type_declaration . 2)) (PRIVATE . 
(full_type_declaration . 2)) (USE . (full_type_declaration . 2)) (TYPE . 
(full_type_declaration . 2)) (TASK . (full_type_declaration . 2)) (SUBTYPE . 
(full_type_declaration . 2)) (PROTECTED . (full_type_declaration . 2)) 
(PROCEDURE . (full_type_declaration . 2)) (PRAGMA . (full_type_declaration . 
2)) (PACKAGE . (full_type_declaration . 2)) (OVERRIDING . 
(full_type_declaration . 2)) (NOT . (full_type_declaration . 2)) [...]
       ((default . error) (WHEN . (aspect_clause . 2)) (PRIVATE . 
(aspect_clause . 2)) (END . (aspect_clause . 2)) (CASE . (aspect_clause . 2)) 
(BEGIN . (aspect_clause . 2)) (IDENTIFIER . (aspect_clause . 2)) (ENTRY . 
(aspect_clause . 2)) (FOR . (aspect_clause . 2)) (FUNCTION . (aspect_clause . 
2)) (GENERIC . (aspect_clause . 2)) (NOT . (aspect_clause . 2)) (OVERRIDING . 
(aspect_clause . 2)) (PACKAGE . (aspect_clause . 2)) (PRAGMA . (aspect_clause . 
2)) (PROCEDURE . (aspect_clause . 2)) ( [...]
-      ((default . error) (END . (declaration . 12)) (PRIVATE . (declaration . 
12)) (USE . (declaration . 12)) (TYPE . (declaration . 12)) (TASK . 
(declaration . 12)) (SUBTYPE . (declaration . 12)) (PROTECTED . (declaration . 
12)) (PROCEDURE . (declaration . 12)) (PRAGMA . (declaration . 12)) (PACKAGE . 
(declaration . 12)) (OVERRIDING . (declaration . 12)) (NOT . (declaration . 
12)) (GENERIC . (declaration . 12)) (FUNCTION . (declaration . 12)) (FOR . 
(declaration . 12)) (ENTRY . (declara [...]
+      ((default . error) (END . (declaration . 13)) (PRIVATE . (declaration . 
13)) (USE . (declaration . 13)) (TYPE . (declaration . 13)) (TASK . 
(declaration . 13)) (SUBTYPE . (declaration . 13)) (PROTECTED . (declaration . 
13)) (PROCEDURE . (declaration . 13)) (PRAGMA . (declaration . 13)) (PACKAGE . 
(declaration . 13)) (OVERRIDING . (declaration . 13)) (NOT . (declaration . 
13)) (GENERIC . (declaration . 13)) (FUNCTION . (declaration . 13)) (FOR . 
(declaration . 13)) (ENTRY . (declara [...]
       ((default . error) (PRIVATE . (object_declaration . 7)) (END . 
(object_declaration . 7)) (BEGIN . (object_declaration . 7)) (IDENTIFIER . 
(object_declaration . 7)) (ENTRY . (object_declaration . 7)) (FOR . 
(object_declaration . 7)) (FUNCTION . (object_declaration . 7)) (GENERIC . 
(object_declaration . 7)) (NOT . (object_declaration . 7)) (OVERRIDING . 
(object_declaration . 7)) (PACKAGE . (object_declaration . 7)) (PRAGMA . 
(object_declaration . 7)) (PROCEDURE . (object_declaration  [...]
       ((default . error) (PRIVATE . (object_declaration . 6)) (END . 
(object_declaration . 6)) (BEGIN . (object_declaration . 6)) (IDENTIFIER . 
(object_declaration . 6)) (ENTRY . (object_declaration . 6)) (FOR . 
(object_declaration . 6)) (FUNCTION . (object_declaration . 6)) (GENERIC . 
(object_declaration . 6)) (NOT . (object_declaration . 6)) (OVERRIDING . 
(object_declaration . 6)) (PACKAGE . (object_declaration . 6)) (PRAGMA . 
(object_declaration . 6)) (PROCEDURE . (object_declaration  [...]
       ((default . error) ($EOI . (proper_body . 0)) (LIMITED . (proper_body . 
0)) (SEPARATE . (proper_body . 0)) (WITH . (proper_body . 0)) (END . 
(proper_body . 0)) (PRIVATE . (proper_body . 0)) (USE . (proper_body . 0)) 
(TYPE . (proper_body . 0)) (TASK . (proper_body . 0)) (SUBTYPE . (proper_body . 
0)) (PROTECTED . (proper_body . 0)) (PROCEDURE . (proper_body . 0)) (PRAGMA . 
(proper_body . 0)) (PACKAGE . (proper_body . 0)) (OVERRIDING . (proper_body . 
0)) (NOT . (proper_body . 0)) (GEN [...]
       ((default . error) (END . (body_stub . 0)) (PRIVATE . (body_stub . 0)) 
(USE . (body_stub . 0)) (TYPE . (body_stub . 0)) (TASK . (body_stub . 0)) 
(SUBTYPE . (body_stub . 0)) (PROTECTED . (body_stub . 0)) (PROCEDURE . 
(body_stub . 0)) (PRAGMA . (body_stub . 0)) (PACKAGE . (body_stub . 0)) 
(OVERRIDING . (body_stub . 0)) (NOT . (body_stub . 0)) (GENERIC . (body_stub . 
0)) (FUNCTION . (body_stub . 0)) (FOR . (body_stub . 0)) (ENTRY . (body_stub . 
0)) (IDENTIFIER . (body_stub . 0)) (BEGI [...]
-      ((default . error) (END . (declaration . 13)) (PRIVATE . (declaration . 
13)) (USE . (declaration . 13)) (TYPE . (declaration . 13)) (TASK . 
(declaration . 13)) (SUBTYPE . (declaration . 13)) (PROTECTED . (declaration . 
13)) (PROCEDURE . (declaration . 13)) (PRAGMA . (declaration . 13)) (PACKAGE . 
(declaration . 13)) (OVERRIDING . (declaration . 13)) (NOT . (declaration . 
13)) (GENERIC . (declaration . 13)) (FUNCTION . (declaration . 13)) (FOR . 
(declaration . 13)) (ENTRY . (declara [...]
-      ((default . error) (PRIVATE . (renaming_declaration . 2)) (END . 
(renaming_declaration . 2)) (BEGIN . (renaming_declaration . 2)) (IDENTIFIER . 
(renaming_declaration . 2)) (ENTRY . (renaming_declaration . 2)) (FOR . 
(renaming_declaration . 2)) (FUNCTION . (renaming_declaration . 2)) (GENERIC . 
(renaming_declaration . 2)) (NOT . (renaming_declaration . 2)) (OVERRIDING . 
(renaming_declaration . 2)) (PACKAGE . (renaming_declaration . 2)) (PRAGMA . 
(renaming_declaration . 2)) (PROCEDUR [...]
       ((default . error) (END . (declaration . 14)) (PRIVATE . (declaration . 
14)) (USE . (declaration . 14)) (TYPE . (declaration . 14)) (TASK . 
(declaration . 14)) (SUBTYPE . (declaration . 14)) (PROTECTED . (declaration . 
14)) (PROCEDURE . (declaration . 14)) (PRAGMA . (declaration . 14)) (PACKAGE . 
(declaration . 14)) (OVERRIDING . (declaration . 14)) (NOT . (declaration . 
14)) (GENERIC . (declaration . 14)) (FUNCTION . (declaration . 14)) (FOR . 
(declaration . 14)) (ENTRY . (declara [...]
+      ((default . error) (PRIVATE . (renaming_declaration . 2)) (END . 
(renaming_declaration . 2)) (BEGIN . (renaming_declaration . 2)) (IDENTIFIER . 
(renaming_declaration . 2)) (ENTRY . (renaming_declaration . 2)) (FOR . 
(renaming_declaration . 2)) (FUNCTION . (renaming_declaration . 2)) (GENERIC . 
(renaming_declaration . 2)) (NOT . (renaming_declaration . 2)) (OVERRIDING . 
(renaming_declaration . 2)) (PACKAGE . (renaming_declaration . 2)) (PRAGMA . 
(renaming_declaration . 2)) (PROCEDUR [...]
+      ((default . error) (END . (declaration . 15)) (PRIVATE . (declaration . 
15)) (USE . (declaration . 15)) (TYPE . (declaration . 15)) (TASK . 
(declaration . 15)) (SUBTYPE . (declaration . 15)) (PROTECTED . (declaration . 
15)) (PROCEDURE . (declaration . 15)) (PRAGMA . (declaration . 15)) (PACKAGE . 
(declaration . 15)) (OVERRIDING . (declaration . 15)) (NOT . (declaration . 
15)) (GENERIC . (declaration . 15)) (FUNCTION . (declaration . 15)) (FOR . 
(declaration . 15)) (ENTRY . (declara [...]
       ((default . error) ($EOI . (proper_body . 2)) (LIMITED . (proper_body . 
2)) (SEPARATE . (proper_body . 2)) (WITH . (proper_body . 2)) (END . 
(proper_body . 2)) (PRIVATE . (proper_body . 2)) (USE . (proper_body . 2)) 
(TYPE . (proper_body . 2)) (TASK . (proper_body . 2)) (SUBTYPE . (proper_body . 
2)) (PROTECTED . (proper_body . 2)) (PROCEDURE . (proper_body . 2)) (PRAGMA . 
(proper_body . 2)) (PACKAGE . (proper_body . 2)) (OVERRIDING . (proper_body . 
2)) (NOT . (proper_body . 2)) (GEN [...]
       ((default . error) (END . (body_stub . 2)) (PRIVATE . (body_stub . 2)) 
(USE . (body_stub . 2)) (TYPE . (body_stub . 2)) (TASK . (body_stub . 2)) 
(SUBTYPE . (body_stub . 2)) (PROTECTED . (body_stub . 2)) (PROCEDURE . 
(body_stub . 2)) (PRAGMA . (body_stub . 2)) (PACKAGE . (body_stub . 2)) 
(OVERRIDING . (body_stub . 2)) (NOT . (body_stub . 2)) (GENERIC . (body_stub . 
2)) (FUNCTION . (body_stub . 2)) (FOR . (body_stub . 2)) (ENTRY . (body_stub . 
2)) (IDENTIFIER . (body_stub . 2)) (BEGI [...]
       ((default . error) (END . (full_type_declaration . 1)) (PRIVATE . 
(full_type_declaration . 1)) (USE . (full_type_declaration . 1)) (TYPE . 
(full_type_declaration . 1)) (TASK . (full_type_declaration . 1)) (SUBTYPE . 
(full_type_declaration . 1)) (PROTECTED . (full_type_declaration . 1)) 
(PROCEDURE . (full_type_declaration . 1)) (PRAGMA . (full_type_declaration . 
1)) (PACKAGE . (full_type_declaration . 1)) (OVERRIDING . 
(full_type_declaration . 1)) (NOT . (full_type_declaration . 1)) [...]
-      ((default . error) (END . (declaration . 15)) (PRIVATE . (declaration . 
15)) (USE . (declaration . 15)) (TYPE . (declaration . 15)) (TASK . 
(declaration . 15)) (SUBTYPE . (declaration . 15)) (PROTECTED . (declaration . 
15)) (PROCEDURE . (declaration . 15)) (PRAGMA . (declaration . 15)) (PACKAGE . 
(declaration . 15)) (OVERRIDING . (declaration . 15)) (NOT . (declaration . 
15)) (GENERIC . (declaration . 15)) (FUNCTION . (declaration . 15)) (FOR . 
(declaration . 15)) (ENTRY . (declara [...]
       ((default . error) (END . (declaration . 16)) (PRIVATE . (declaration . 
16)) (USE . (declaration . 16)) (TYPE . (declaration . 16)) (TASK . 
(declaration . 16)) (SUBTYPE . (declaration . 16)) (PROTECTED . (declaration . 
16)) (PROCEDURE . (declaration . 16)) (PRAGMA . (declaration . 16)) (PACKAGE . 
(declaration . 16)) (OVERRIDING . (declaration . 16)) (NOT . (declaration . 
16)) (GENERIC . (declaration . 16)) (FUNCTION . (declaration . 16)) (FOR . 
(declaration . 16)) (ENTRY . (declara [...]
-      ((default . error) (BEGIN . (declarative_part_opt . 0)) (END . 
(declarative_part_opt . 0)) (USE .  11) (SUBTYPE .  291) (PRAGMA .  7) (NOT .  
4) (OVERRIDING .  5) (FUNCTION . (overriding_indicator_opt . 2)) (PROCEDURE . 
(overriding_indicator_opt . 2)) (ENTRY . (overriding_indicator_opt . 2)) (FOR . 
 288) (IDENTIFIER .  287) (TYPE .  293) (GENERIC .  2) (PROTECTED .  290) (TASK 
.  292) (PACKAGE .  289))
-      ((default . error) (COLON_EQUAL . (simple_expression . 0)) (OF . 
(simple_expression . 0)) (LOOP . (simple_expression . 0)) (DO . 
(simple_expression . 0)) (DOT_DOT . (simple_expression . 0)) (SEMICOLON . 
(simple_expression . 0)) (XOR . (simple_expression . 0)) (OR . 
(simple_expression . 0)) (AND . (simple_expression . 0)) (SLASH_EQUAL . 
(simple_expression . 0)) (LESS_EQUAL . (simple_expression . 0)) (LESS . 
(simple_expression . 0)) (GREATER_EQUAL . (simple_expression . 0)) (GREATER  
[...]
+      ((default . error) (END . (declaration . 17)) (PRIVATE . (declaration . 
17)) (USE . (declaration . 17)) (TYPE . (declaration . 17)) (TASK . 
(declaration . 17)) (SUBTYPE . (declaration . 17)) (PROTECTED . (declaration . 
17)) (PROCEDURE . (declaration . 17)) (PRAGMA . (declaration . 17)) (PACKAGE . 
(declaration . 17)) (OVERRIDING . (declaration . 17)) (NOT . (declaration . 
17)) (GENERIC . (declaration . 17)) (FUNCTION . (declaration . 17)) (FOR . 
(declaration . 17)) (ENTRY . (declara [...]
+      ((default . error) (BEGIN . (declarative_part_opt . 0)) (END . 
(declarative_part_opt . 0)) (USE .  11) (SUBTYPE .  292) (PRAGMA .  7) (NOT .  
4) (OVERRIDING .  5) (FUNCTION . (overriding_indicator_opt . 2)) (PROCEDURE . 
(overriding_indicator_opt . 2)) (ENTRY . (overriding_indicator_opt . 2)) (FOR . 
 289) (IDENTIFIER .  288) (TYPE .  294) (GENERIC .  2) (PROTECTED .  291) (TASK 
.  293) (PACKAGE .  290))
+      ((default . error) (COLON_EQUAL . (simple_expression . 0)) (OF . 
(simple_expression . 0)) (LOOP . (simple_expression . 0)) (DO . 
(simple_expression . 0)) (DOT_DOT . (simple_expression . 0)) (SEMICOLON . 
(simple_expression . 0)) (XOR . (simple_expression . 0)) (OR . 
(simple_expression . 0)) (AND . (simple_expression . 0)) (SLASH_EQUAL . 
(simple_expression . 0)) (LESS_EQUAL . (simple_expression . 0)) (LESS . 
(simple_expression . 0)) (GREATER_EQUAL . (simple_expression . 0)) (GREATER  
[...]
       ((default . error) (IDENTIFIER . (binary_adding_operator . 2)) 
(STRING_LITERAL . (binary_adding_operator . 2)) (CHARACTER_LITERAL . 
(binary_adding_operator . 2)) (ABS . (binary_adding_operator . 2)) (LEFT_PAREN 
. (binary_adding_operator . 2)) (NEW . (binary_adding_operator . 2)) (NOT . 
(binary_adding_operator . 2)) (NULL . (binary_adding_operator . 2)))
       ((default . error) (IDENTIFIER . (binary_adding_operator . 1)) 
(STRING_LITERAL . (binary_adding_operator . 1)) (CHARACTER_LITERAL . 
(binary_adding_operator . 1)) (ABS . (binary_adding_operator . 1)) (LEFT_PAREN 
. (binary_adding_operator . 1)) (NEW . (binary_adding_operator . 1)) (NOT . 
(binary_adding_operator . 1)) (NULL . (binary_adding_operator . 1)))
       ((default . error) (IDENTIFIER . (binary_adding_operator . 0)) 
(STRING_LITERAL . (binary_adding_operator . 0)) (CHARACTER_LITERAL . 
(binary_adding_operator . 0)) (ABS . (binary_adding_operator . 0)) (LEFT_PAREN 
. (binary_adding_operator . 0)) (NEW . (binary_adding_operator . 0)) (NOT . 
(binary_adding_operator . 0)) (NULL . (binary_adding_operator . 0)))
-      ((default . error) (ABS .  145) (NOT .  148) (NULL .  149) (NEW .  147) 
(IDENTIFIER .  47) (CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (LEFT_PAREN 
.  146))
+      ((default . error) (ABS .  146) (NOT .  149) (NULL .  150) (NEW .  148) 
(IDENTIFIER .  48) (CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN 
.  147))
       ((default . error) (IDENTIFIER . (multiplying_operator . 1)) 
(STRING_LITERAL . (multiplying_operator . 1)) (CHARACTER_LITERAL . 
(multiplying_operator . 1)) (ABS . (multiplying_operator . 1)) (LEFT_PAREN . 
(multiplying_operator . 1)) (NEW . (multiplying_operator . 1)) (NOT . 
(multiplying_operator . 1)) (NULL . (multiplying_operator . 1)))
       ((default . error) (IDENTIFIER . (multiplying_operator . 0)) 
(STRING_LITERAL . (multiplying_operator . 0)) (CHARACTER_LITERAL . 
(multiplying_operator . 0)) (ABS . (multiplying_operator . 0)) (LEFT_PAREN . 
(multiplying_operator . 0)) (NEW . (multiplying_operator . 0)) (NOT . 
(multiplying_operator . 0)) (NULL . (multiplying_operator . 0)))
       ((default . error) (IDENTIFIER . (multiplying_operator . 2)) 
(STRING_LITERAL . (multiplying_operator . 2)) (CHARACTER_LITERAL . 
(multiplying_operator . 2)) (ABS . (multiplying_operator . 2)) (LEFT_PAREN . 
(multiplying_operator . 2)) (NEW . (multiplying_operator . 2)) (NOT . 
(multiplying_operator . 2)) (NULL . (multiplying_operator . 2)))
       ((default . error) (IDENTIFIER . (multiplying_operator . 3)) 
(STRING_LITERAL . (multiplying_operator . 3)) (CHARACTER_LITERAL . 
(multiplying_operator . 3)) (ABS . (multiplying_operator . 3)) (LEFT_PAREN . 
(multiplying_operator . 3)) (NEW . (multiplying_operator . 3)) (NOT . 
(multiplying_operator . 3)) (NULL . (multiplying_operator . 3)))
-      ((default . error) (ABS .  145) (NOT .  148) (NULL .  149) (NEW .  147) 
(IDENTIFIER .  47) (CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (LEFT_PAREN 
.  146))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (THEN .  411) (PLUS .  143) (MINUS .  142) (ABS .  
145) (NOT .  148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (ELSE .  409) (PLUS .  143) (MINUS .  142) (ABS .  
145) (NOT .  148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (ELSE .  406))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (THEN .  404))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  144) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (SEMICOLON .  400))
-      ((default . error) (DOT .  86) (TICK .  87) (COLON_EQUAL . (primary . 
3)) (OF . (primary . 3)) (LOOP . (primary . 3)) (DO . (primary . 3)) (STAR_STAR 
. (primary . 3)) (REM . (primary . 3)) (MOD . (primary . 3)) (STAR . (primary . 
3)) (SLASH . (primary . 3)) (DOT_DOT . (primary . 3)) (AMPERSAND . (primary . 
3)) (MINUS . (primary . 3)) (PLUS . (primary . 3)) (SEMICOLON . (primary . 3)) 
(XOR . (primary . 3)) (OR . (primary . 3)) (AND . (primary . 3)) (SLASH_EQUAL . 
(primary . 3)) (LES [...]
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (ALL .  396) (SOME .  397))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (ABS .  146) (NOT .  149) (NULL .  150) (NEW .  148) 
(IDENTIFIER .  48) (CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN 
.  147))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (THEN .  413) (PLUS .  144) (MINUS .  143) (ABS .  
146) (NOT .  149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (ELSE .  411) (PLUS .  144) (MINUS .  143) (ABS .  
146) (NOT .  149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (ELSE .  408))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (THEN .  406))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  145) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (SEMICOLON .  402))
+      ((default . error) (DOT .  87) (TICK .  88) (COLON_EQUAL . (primary . 
3)) (OF . (primary . 3)) (LOOP . (primary . 3)) (DO . (primary . 3)) (STAR_STAR 
. (primary . 3)) (REM . (primary . 3)) (MOD . (primary . 3)) (STAR . (primary . 
3)) (SLASH . (primary . 3)) (DOT_DOT . (primary . 3)) (AMPERSAND . (primary . 
3)) (MINUS . (primary . 3)) (PLUS . (primary . 3)) (SEMICOLON . (primary . 3)) 
(XOR . (primary . 3)) (OR . (primary . 3)) (AND . (primary . 3)) (SLASH_EQUAL . 
(primary . 3)) (LES [...]
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (ALL .  398) (SOME .  399))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (RIGHT_PAREN .  396))
+      ((default . error) (RIGHT_PAREN .  395))
       ((default . error) (RIGHT_PAREN .  394))
-      ((default . error) (RIGHT_PAREN .  393))
-      ((default . error) (RIGHT_PAREN .  392))
       ((default . error) (COLON_EQUAL . (factor . 2)) (OF . (factor . 2)) 
(LOOP . (factor . 2)) (DO . (factor . 2)) (PLUS . (factor . 2)) (MINUS . 
(factor . 2)) (AMPERSAND . (factor . 2)) (DOT_DOT . (factor . 2)) (SLASH . 
(factor . 2)) (STAR . (factor . 2)) (MOD . (factor . 2)) (REM . (factor . 2)) 
(SEMICOLON . (factor . 2)) (XOR . (factor . 2)) (OR . (factor . 2)) (AND . 
(factor . 2)) (IN . (factor . 2)) (NOT . (factor . 2)) (EQUAL . (factor . 2)) 
(GREATER . (factor . 2)) (GREATER_EQUAL [...]
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (IDENTIFIER .  390))
-      ((default . error) (BODY .  66))
-      ((default . error) (BODY .  389))
-      ((default . error) (BODY .  388))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (IDENTIFIER .  392))
+      ((default . error) (BODY .  67))
+      ((default . error) (BODY .  391))
+      ((default . error) (BODY .  390))
       ((default . error) (FUNCTION .  1) (PROCEDURE .  9))
       ((default . error) ($EOI . (subunit . 0)) (FUNCTION . (subunit . 0)) 
(GENERIC . (subunit . 0)) (LIMITED . (subunit . 0)) (NOT . (subunit . 0)) 
(OVERRIDING . (subunit . 0)) (PACKAGE . (subunit . 0)) (PRAGMA . (subunit . 0)) 
(PRIVATE . (subunit . 0)) (PROCEDURE . (subunit . 0)) (SEPARATE . (subunit . 
0)) (USE . (subunit . 0)) (WITH . (subunit . 0)))
       ((default . error) (WITH . (use_clause . 1)) (SEPARATE . (use_clause . 
1)) (LIMITED . (use_clause . 1)) ($EOI . (use_clause . 1)) (PRIVATE . 
(use_clause . 1)) (END . (use_clause . 1)) (BEGIN . (use_clause . 1)) 
(IDENTIFIER . (use_clause . 1)) (ENTRY . (use_clause . 1)) (FOR . (use_clause . 
1)) (FUNCTION . (use_clause . 1)) (GENERIC . (use_clause . 1)) (NOT . 
(use_clause . 1)) (OVERRIDING . (use_clause . 1)) (PACKAGE . (use_clause . 1)) 
(PRAGMA . (use_clause . 1)) (PROCEDURE . (use_ [...]
-      ((default . error) (SEMICOLON .  386))
-      ((default . error) (BEGIN .  385))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (DOT .  86) (TICK .  87) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  107) (LEFT_PAREN .  105))
-      ((default . error) (DOT .  86) (TICK .  87) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  107) (LEFT_PAREN .  105))
-      ((default . error) (END . (sequence_of_statements_opt . 0)) (EXCEPTION . 
(sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . (label_opt . 0)) (ABORT 
. (label_opt . 0)) (DELAY . (label_opt .  [...]
+      ((default . error) (SEMICOLON .  388))
+      ((default . error) (BEGIN .  387))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (DOT .  87) (TICK .  88) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  108) (LEFT_PAREN .  106))
+      ((default . error) (DOT .  87) (TICK .  88) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  108) (LEFT_PAREN .  106))
+      ((default . error) (END . (sequence_of_statements_opt . 0)) (EXCEPTION . 
(sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . (label_opt . 0)) (ABORT 
. (label_opt . 0)) (DELAY . (label_opt .  [...]
       ((default . error) (BEGIN . (subprogram_renaming_declaration . 0)) 
(IDENTIFIER . (subprogram_renaming_declaration . 0)) (ENTRY . 
(subprogram_renaming_declaration . 0)) (FOR . (subprogram_renaming_declaration 
. 0)) (PROTECTED . (subprogram_renaming_declaration . 0)) (SUBTYPE . 
(subprogram_renaming_declaration . 0)) (TASK . (subprogram_renaming_declaration 
. 0)) (TYPE . (subprogram_renaming_declaration . 0)) (END . 
(subprogram_renaming_declaration . 0)) (WITH . (subprogram_renaming_d [...]
-      ((default . error) (IS . (aspect_specification_opt . 0)) (WITH .  107))
-      ((default . error) (IDENTIFIER .  605))
-      ((default . error) (IDENTIFIER .  604))
-      ((default . error) (EQUAL_GREATER .  603))
+      ((default . error) (IS . (aspect_specification_opt . 0)) (WITH .  108))
+      ((default . error) (IDENTIFIER .  609))
+      ((default . error) (IDENTIFIER .  608))
+      ((default . error) (EQUAL_GREATER .  607))
       ((default . error) (COMMA . (pragma_argument_association . 0)) 
(RIGHT_PAREN . (pragma_argument_association . 0)))
       ((default . error) (OF . (primary . 6)) (COLON_EQUAL . (primary . 6)) 
(DO . (primary . 6)) (LOOP . (primary . 6)) (ELSIF . (primary . 6)) (ELSE . 
(primary . 6)) (DIGITS . (primary . 6)) (RIGHT_PAREN . (primary . 6)) (COMMA . 
(primary . 6)) (RANGE . (primary . 6)) (THEN . (primary . 6)) (WITH . (primary 
. 6)) (BAR . (primary . 6)) (EQUAL_GREATER . (primary . 6)) (IS . (primary . 
6)) (IN . (primary . 6)) (NOT . (primary . 6)) (EQUAL . (primary . 6)) (GREATER 
. (primary . 6)) (GREATER [...]
       ((default . error) (OF . (primary . 4)) (COLON_EQUAL . (primary . 4)) 
(DO . (primary . 4)) (LOOP . (primary . 4)) (ELSIF . (primary . 4)) (ELSE . 
(primary . 4)) (DIGITS . (primary . 4)) (RIGHT_PAREN . (primary . 4)) (COMMA . 
(primary . 4)) (RANGE . (primary . 4)) (THEN . (primary . 4)) (WITH . (primary 
. 4)) (BAR . (primary . 4)) (EQUAL_GREATER . (primary . 4)) (IS . (primary . 
4)) (IN . (primary . 4)) (NOT . (primary . 4)) (EQUAL . (primary . 4)) (GREATER 
. (primary . 4)) (GREATER [...]
       ((default . error) (OF . (primary . 5)) (COLON_EQUAL . (primary . 5)) 
(DO . (primary . 5)) (LOOP . (primary . 5)) (ELSIF . (primary . 5)) (ELSE . 
(primary . 5)) (DIGITS . (primary . 5)) (RIGHT_PAREN . (primary . 5)) (COMMA . 
(primary . 5)) (RANGE . (primary . 5)) (THEN . (primary . 5)) (WITH . (primary 
. 5)) (BAR . (primary . 5)) (EQUAL_GREATER . (primary . 5)) (IS . (primary . 
5)) (IN . (primary . 5)) (NOT . (primary . 5)) (EQUAL . (primary . 5)) (GREATER 
. (primary . 5)) (GREATER [...]
-      ((default . error) (THEN .  602))
+      ((default . error) (THEN .  606))
       ((default . error) (IDENTIFIER . (quantifier . 0)))
       ((default . error) (IDENTIFIER . (quantifier . 1)))
-      ((default . error) (IDENTIFIER .  600))
-      ((default . error) (IS .  599))
+      ((default . error) (IDENTIFIER .  604))
+      ((default . error) (IS .  603))
       ((default . error) (WHEN . (pragma . 0)) (THEN . (pragma . 0)) (OR . 
(pragma . 0)) (ELSIF . (pragma . 0)) (ELSE . (pragma . 0)) (WHILE . (pragma . 
0)) (SELECT . (pragma . 0)) (RETURN . (pragma . 0)) (REQUEUE . (pragma . 0)) 
(RAISE . (pragma . 0)) (NULL . (pragma . 0)) (LOOP . (pragma . 0)) (IF . 
(pragma . 0)) (GOTO . (pragma . 0)) (EXIT . (pragma . 0)) (DELAY . (pragma . 
0)) (DECLARE . (pragma . 0)) (CASE . (pragma . 0)) (ABORT . (pragma . 0)) 
(ACCEPT . (pragma . 0)) (CHARACTER_LIT [...]
       ((default . error) (RIGHT_PAREN . (pragma_argument_association_list . 
1)) (COMMA . (pragma_argument_association_list . 1)))
       ((default . error) (OF . (factor . 0)) (COLON_EQUAL . (factor . 0)) (DO 
. (factor . 0)) (LOOP . (factor . 0)) (ELSIF . (factor . 0)) (ELSE . (factor . 
0)) (DIGITS . (factor . 0)) (COMMA . (factor . 0)) (RIGHT_PAREN . (factor . 0)) 
(RANGE . (factor . 0)) (THEN . (factor . 0)) (WITH . (factor . 0)) (BAR . 
(factor . 0)) (EQUAL_GREATER . (factor . 0)) (IS . (factor . 0)) (SLASH_EQUAL . 
(factor . 0)) (LESS_EQUAL . (factor . 0)) (LESS . (factor . 0)) (GREATER_EQUAL 
. (factor . 0)) (GREAT [...]
       ((default . error) (DO . (relation_and_list . 1)) (LOOP . 
(relation_and_list . 1)) (ELSIF . (relation_and_list . 1)) (ELSE . 
(relation_and_list . 1)) (EQUAL_GREATER . (relation_and_list . 1)) (DIGITS . 
(relation_and_list . 1)) (RIGHT_PAREN . (relation_and_list . 1)) (COMMA . 
(relation_and_list . 1)) (RANGE . (relation_and_list . 1)) (THEN . 
(relation_and_list . 1)) (SEMICOLON . (relation_and_list . 1)) (WITH . 
(relation_and_list . 1)) (IS . (relation_and_list . 1)) (AND . (relation [...]
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (DO . (relation_or_list . 1)) (LOOP . 
(relation_or_list . 1)) (ELSIF . (relation_or_list . 1)) (ELSE . 
(relation_or_list . 1)) (EQUAL_GREATER . (relation_or_list . 1)) (DIGITS . 
(relation_or_list . 1)) (RIGHT_PAREN . (relation_or_list . 1)) (COMMA . 
(relation_or_list . 1)) (RANGE . (relation_or_list . 1)) (THEN . 
(relation_or_list . 1)) (SEMICOLON . (relation_or_list . 1)) (WITH . 
(relation_or_list . 1)) (IS . (relation_or_list . 1)) (OR . (relation_or_list . 
1)))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (DO . (relation_xor_list . 1)) (LOOP . 
(relation_xor_list . 1)) (ELSIF . (relation_xor_list . 1)) (ELSE . 
(relation_xor_list . 1)) (EQUAL_GREATER . (relation_xor_list . 1)) (DIGITS . 
(relation_xor_list . 1)) (RIGHT_PAREN . (relation_xor_list . 1)) (COMMA . 
(relation_xor_list . 1)) (RANGE . (relation_xor_list . 1)) (THEN . 
(relation_xor_list . 1)) (SEMICOLON . (relation_xor_list . 1)) (WITH . 
(relation_xor_list . 1)) (IS . (relation_xor_list . 1)) (XOR . (relation [...]
       ((default . error) (DO . (relation_xor_list . 0)) (LOOP . 
(relation_xor_list . 0)) (ELSIF . (relation_xor_list . 0)) (ELSE . 
(relation_xor_list . 0)) (EQUAL_GREATER . (relation_xor_list . 0)) (DIGITS . 
(relation_xor_list . 0)) (RIGHT_PAREN . (relation_xor_list . 0)) (COMMA . 
(relation_xor_list . 0)) (RANGE . (relation_xor_list . 0)) (THEN . 
(relation_xor_list . 0)) (SEMICOLON . (relation_xor_list . 0)) (WITH . 
(relation_xor_list . 0)) (IS . (relation_xor_list . 0)) (XOR . (relation [...]
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (DO . (relation_or_list . 0)) (LOOP . 
(relation_or_list . 0)) (ELSIF . (relation_or_list . 0)) (ELSE . 
(relation_or_list . 0)) (EQUAL_GREATER . (relation_or_list . 0)) (DIGITS . 
(relation_or_list . 0)) (RIGHT_PAREN . (relation_or_list . 0)) (COMMA . 
(relation_or_list . 0)) (RANGE . (relation_or_list . 0)) (THEN . 
(relation_or_list . 0)) (SEMICOLON . (relation_or_list . 0)) (WITH . 
(relation_or_list . 0)) (IS . (relation_or_list . 0)) (OR . (relation_or_list . 
0)))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (DO . (relation_and_list . 0)) (LOOP . 
(relation_and_list . 0)) (ELSIF . (relation_and_list . 0)) (ELSE . 
(relation_and_list . 0)) (EQUAL_GREATER . (relation_and_list . 0)) (DIGITS . 
(relation_and_list . 0)) (RIGHT_PAREN . (relation_and_list . 0)) (COMMA . 
(relation_and_list . 0)) (RANGE . (relation_and_list . 0)) (THEN . 
(relation_and_list . 0)) (SEMICOLON . (relation_and_list . 0)) (WITH . 
(relation_and_list . 0)) (IS . (relation_and_list . 0)) (AND . (relation [...]
-      ((default . error) (DO . (relation . 1)) (LOOP . (relation . 1)) (COMMA 
. (relation . 1)) (RIGHT_PAREN . (relation . 1)) (ELSIF . (relation . 1)) (ELSE 
. (relation . 1)) (EQUAL_GREATER . (relation . 1)) (DIGITS . (relation . 1)) 
(RANGE . (relation . 1)) (THEN . (relation . 1)) (SEMICOLON . (relation . 1)) 
(WITH . (relation . 1)) (IS . (relation . 1)) (AND . (relation . 1)) (OR . 
(relation . 1)) (XOR . (relation . 1)))
+      ((default . error) (DO . (relation . 1)) (LOOP . (relation . 1)) (COMMA 
. (relation . 1)) (ELSIF . (relation . 1)) (ELSE . (relation . 1)) 
(EQUAL_GREATER . (relation . 1)) (RIGHT_PAREN . (relation . 1)) (DIGITS . 
(relation . 1)) (RANGE . (relation . 1)) (THEN . (relation . 1)) (SEMICOLON . 
(relation . 1)) (WITH . (relation . 1)) (IS . (relation . 1)) (AND . (relation 
. 1)) (OR . (relation . 1)) (XOR . (relation . 1)))
       ((default . error) (OF . (term . 1)) (COLON_EQUAL . (term . 1)) (DO . 
(term . 1)) (LOOP . (term . 1)) (ELSIF . (term . 1)) (ELSE . (term . 1)) 
(DIGITS . (term . 1)) (RIGHT_PAREN . (term . 1)) (COMMA . (term . 1)) (RANGE . 
(term . 1)) (THEN . (term . 1)) (WITH . (term . 1)) (BAR . (term . 1)) 
(EQUAL_GREATER . (term . 1)) (IS . (term . 1)) (IN . (term . 1)) (NOT . (term . 
1)) (EQUAL . (term . 1)) (GREATER . (term . 1)) (GREATER_EQUAL . (term . 1)) 
(LESS . (term . 1)) (LESS_EQUAL . (t [...]
-      ((default . error) (OF . (term_list . 1)) (COLON_EQUAL . (term_list . 
1)) (DO . (term_list . 1)) (LOOP . (term_list . 1)) (ELSIF . (term_list . 1)) 
(ELSE . (term_list . 1)) (DIGITS . (term_list . 1)) (COMMA . (term_list . 1)) 
(RIGHT_PAREN . (term_list . 1)) (RANGE . (term_list . 1)) (THEN . (term_list . 
1)) (WITH . (term_list . 1)) (BAR . (term_list . 1)) (EQUAL_GREATER . 
(term_list . 1)) (IS . (term_list . 1)) (SLASH_EQUAL . (term_list . 1)) 
(LESS_EQUAL . (term_list . 1)) (LESS .  [...]
-      ((default . error) (BEGIN .  593) (END .  594))
-      ((default . error) (IDENTIFIER .  592))
-      ((default . error) (IS . ( 591 (subprogram_specification . 0))) (WITH . 
(subprogram_specification . 0)) (SEMICOLON . (subprogram_specification . 0)) 
(RENAMES . (subprogram_specification . 0)))
-      ((default . error) (RENAMES .  126) (SEMICOLON . 
(aspect_specification_opt . 0)) (IS . ( 590 (aspect_specification_opt . 0))) 
(WITH .  107))
-      ((default . error) (EXCEPTION .  588) (CONSTANT . ( 587 (aliased_opt . 
0))) (ARRAY . (aliased_opt . 0)) (ACCESS . (aliased_opt . 0)) (NOT . 
(aliased_opt . 0)) (IDENTIFIER . (aliased_opt . 0)) (STRING_LITERAL . 
(aliased_opt . 0)) (CHARACTER_LITERAL . (aliased_opt . 0)) (ALIASED .  509))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (END . (declarative_part_opt . 0)) (USE .  11) 
(SUBTYPE .  291) (PRAGMA .  7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(ENTRY . (overriding_indicator_opt . 2)) (FOR .  288) (IDENTIFIER .  287) (TYPE 
.  293) (GENERIC .  2) (PROTECTED .  290) (TASK .  292) (PACKAGE .  289))
+      ((default . error) (OF . (term_list . 1)) (COLON_EQUAL . (term_list . 
1)) (DO . (term_list . 1)) (LOOP . (term_list . 1)) (ELSIF . (term_list . 1)) 
(ELSE . (term_list . 1)) (DIGITS . (term_list . 1)) (COMMA . (term_list . 1)) 
(RIGHT_PAREN . (term_list . 1)) (RANGE . (term_list . 1)) (THEN . (term_list . 
1)) (WITH . (term_list . 1)) (BAR . (term_list . 1)) (EQUAL_GREATER . 
(term_list . 1)) (IS . (term_list . 1)) (SLASH_EQUAL . (term_list . 1)) 
(LESS_EQUAL . (term_list . 1)) (LESS .  [...]
+      ((default . error) (BEGIN .  597) (END .  598))
+      ((default . error) (IDENTIFIER .  596))
+      ((default . error) (IS . ( 595 (subprogram_specification . 1))) (WITH . 
(subprogram_specification . 1)) (SEMICOLON . (subprogram_specification . 1)) 
(RENAMES . (subprogram_specification . 1)))
+      ((default . error) (IS . ( 594 (subprogram_specification . 0))) (WITH . 
(subprogram_specification . 0)) (SEMICOLON . (subprogram_specification . 0)) 
(RENAMES . (subprogram_specification . 0)))
+      ((default . error) (RENAMES .  127) (SEMICOLON . 
(aspect_specification_opt . 0)) (IS . ( 593 (aspect_specification_opt . 0))) 
(WITH .  108))
+      ((default . error) (EXCEPTION .  591) (CONSTANT . ( 590 (aliased_opt . 
0))) (ARRAY . (aliased_opt . 0)) (ACCESS . (aliased_opt . 0)) (NOT . 
(aliased_opt . 0)) (IDENTIFIER . (aliased_opt . 0)) (STRING_LITERAL . 
(aliased_opt . 0)) (CHARACTER_LITERAL . (aliased_opt . 0)) (ALIASED .  512))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (END . (declarative_part_opt . 0)) (USE .  11) 
(SUBTYPE .  292) (PRAGMA .  7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(ENTRY . (overriding_indicator_opt . 2)) (FOR .  289) (IDENTIFIER .  288) (TYPE 
.  294) (GENERIC .  2) (PROTECTED .  291) (TASK .  293) (PACKAGE .  290))
       ((default . error) (USE . (declarations . 1)) (TYPE . (declarations . 
1)) (TASK . (declarations . 1)) (SUBTYPE . (declarations . 1)) (PROTECTED . 
(declarations . 1)) (PROCEDURE . (declarations . 1)) (PRAGMA . (declarations . 
1)) (PACKAGE . (declarations . 1)) (OVERRIDING . (declarations . 1)) (NOT . 
(declarations . 1)) (GENERIC . (declarations . 1)) (FUNCTION . (declarations . 
1)) (FOR . (declarations . 1)) (ENTRY . (declarations . 1)) (IDENTIFIER . 
(declarations . 1)) (BEGIN . (de [...]
-      ((default . error) (SEMICOLON .  583) (IS . (discriminant_part_opt . 0)) 
(LEFT_PAREN .  197))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (IS . 
(aspect_specification_opt . 0)) (WITH .  107))
-      ((default . error) (IDENTIFIER .  581))
+      ((default . error) (SEMICOLON .  586) (IS . (discriminant_part_opt . 0)) 
(LEFT_PAREN .  198))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (IS . 
(aspect_specification_opt . 0)) (WITH .  108))
+      ((default . error) (IDENTIFIER .  584))
+      ((default . error) (IDENTIFIER .  583))
+      ((default . error) (IS .  582))
+      ((default . error) (IS . (aspect_specification_opt . 0)) (WITH .  108))
       ((default . error) (IDENTIFIER .  580))
-      ((default . error) (IS .  579))
-      ((default . error) (IS . (aspect_specification_opt . 0)) (WITH .  107))
-      ((default . error) (IDENTIFIER .  577))
-      ((default . error) (IDENTIFIER .  576))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
+      ((default . error) (IDENTIFIER .  579))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
       ((default . error) (USE . ((direct_name . 0) (name . 0))) (LEFT_PAREN . 
(name . 0)) (DOT . (name . 0)) (TICK . (name . 0)))
       ((default . error) (USE . ((direct_name . 1) (name . 7))) (LEFT_PAREN . 
(name . 7)) (DOT . (name . 7)) (TICK . (name . 7)))
-      ((default . error) (USE . ( 574 (name . 4))) (LEFT_PAREN . (name . 4)) 
(DOT . (name . 4)) (TICK . (name . 4)))
-      ((default . error) (USE .  573))
-      ((default . error) (DOT .  86) (TICK .  87) (USE .  572) (LEFT_PAREN .  
105))
-      ((default . error) (EXCEPTION .  569) (IDENTIFIER . (null_exclusion_opt 
. 0)) (STRING_LITERAL . (null_exclusion_opt . 0)) (CHARACTER_LITERAL . 
(null_exclusion_opt . 0)) (ACCESS . (null_exclusion_opt . 0)) (NOT .  207))
+      ((default . error) (USE . ( 577 (name . 4))) (LEFT_PAREN . (name . 4)) 
(DOT . (name . 4)) (TICK . (name . 4)))
+      ((default . error) (USE .  576))
+      ((default . error) (DOT .  87) (TICK .  88) (USE .  575) (LEFT_PAREN .  
106))
+      ((default . error) (EXCEPTION .  572) (IDENTIFIER . (null_exclusion_opt 
. 0)) (STRING_LITERAL . (null_exclusion_opt . 0)) (CHARACTER_LITERAL . 
(null_exclusion_opt . 0)) (ACCESS . (null_exclusion_opt . 0)) (NOT .  208))
       ((default . error) (SEMICOLON . (association_opt . 2)) (IS . 
(association_opt . 2)) (COMMA . (association_opt . 2)) (RIGHT_PAREN . 
(association_opt . 2)))
       ((default . error) (SEMICOLON . (association_opt . 1)) (IS . 
(association_opt . 1)) (COMMA . (association_opt . 1)) (RIGHT_PAREN . 
(association_opt . 1)))
-      ((default . error) (DOT .  86) (TICK .  87) (BAR . (discrete_choice . 
1)) (EQUAL_GREATER . (discrete_choice . 1)) (LEFT_PAREN .  105))
+      ((default . error) (DOT .  87) (TICK .  88) (BAR . (discrete_choice . 
1)) (EQUAL_GREATER . (discrete_choice . 1)) (LEFT_PAREN .  106))
       ((default . error) (BAR . (choice_relation_and_list . 1)) (EQUAL_GREATER 
. (choice_relation_and_list . 1)) (AND . (choice_relation_and_list . 1)))
-      ((default . error) (XOR . (choice_relation . 1)) (OR . (choice_relation 
. 1)) (BAR . (choice_relation . 1)) (EQUAL_GREATER . (choice_relation . 1)) 
(AND . (choice_relation . 1)) (EQUAL .  264) (SLASH_EQUAL .  269) (LESS .  267) 
(LESS_EQUAL .  268) (GREATER .  265) (GREATER_EQUAL .  266))
+      ((default . error) (XOR . (choice_relation . 1)) (OR . (choice_relation 
. 1)) (BAR . (choice_relation . 1)) (EQUAL_GREATER . (choice_relation . 1)) 
(AND . (choice_relation . 1)) (EQUAL .  265) (SLASH_EQUAL .  270) (LESS .  268) 
(LESS_EQUAL .  269) (GREATER .  266) (GREATER_EQUAL .  267))
       ((default . error) (BAR . (choice_relation_or_list . 1)) (EQUAL_GREATER 
. (choice_relation_or_list . 1)) (OR . (choice_relation_or_list . 1)))
       ((default . error) (BAR . (choice_relation_xor_list . 1)) (EQUAL_GREATER 
. (choice_relation_xor_list . 1)) (XOR . (choice_relation_xor_list . 1)))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (BAR . (choice_relation_xor_list . 0)) (EQUAL_GREATER 
. (choice_relation_xor_list . 0)) (XOR . (choice_relation_xor_list . 0)))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (BAR . (choice_relation_or_list . 0)) (EQUAL_GREATER 
. (choice_relation_or_list . 0)) (OR . (choice_relation_or_list . 0)))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (BAR . (choice_relation_and_list . 0)) (EQUAL_GREATER 
. (choice_relation_and_list . 0)) (AND . (choice_relation_and_list . 0)))
       ((default . error) (SEMICOLON . (association_opt . 4)) (IS . 
(association_opt . 4)) (COMMA . (association_opt . 4)) (RIGHT_PAREN . 
(association_opt . 4)))
       ((default . error) (SEMICOLON . (association_opt . 3)) (IS . 
(association_opt . 3)) (COMMA . (association_opt . 3)) (RIGHT_PAREN . 
(association_opt . 3)))
       ((default . error) (EQUAL_GREATER . (discrete_choice_list . 2)) (BAR . 
(discrete_choice_list . 2)))
-      ((default . error) (DOT_DOT .  263) (BAR . (choice_relation . 1)) 
(EQUAL_GREATER . (choice_relation . 1)) (AND . (choice_relation . 1)) (OR . 
(choice_relation . 1)) (XOR . (choice_relation . 1)) (EQUAL .  264) 
(SLASH_EQUAL .  269) (LESS .  267) (LESS_EQUAL .  268) (GREATER .  265) 
(GREATER_EQUAL .  266))
-      ((default . error) (LOOP . (range . 1)) (DO . (range . 1)) (COMMA . 
(range . 1)) (OF . (range . 1)) (COLON_EQUAL . (range . 1)) (ELSIF . (range . 
1)) (ELSE . (range . 1)) (DIGITS . (range . 1)) (RANGE . (range . 1)) (THEN . 
(range . 1)) (SEMICOLON . (range . 1)) (WITH . (range . 1)) (IS . (range . 1)) 
(AND . (range . 1)) (OR . (range . 1)) (XOR . (range . 1)) (RIGHT_PAREN . 
(range . 1)) (EQUAL_GREATER . (range . 1)) (BAR . (range . 1)) (LEFT_PAREN .  
563))
+      ((default . error) (DOT_DOT .  264) (BAR . (choice_relation . 1)) 
(EQUAL_GREATER . (choice_relation . 1)) (AND . (choice_relation . 1)) (OR . 
(choice_relation . 1)) (XOR . (choice_relation . 1)) (EQUAL .  265) 
(SLASH_EQUAL .  270) (LESS .  268) (LESS_EQUAL .  269) (GREATER .  266) 
(GREATER_EQUAL .  267))
+      ((default . error) (LOOP . (range . 1)) (DO . (range . 1)) (COMMA . 
(range . 1)) (OF . (range . 1)) (COLON_EQUAL . (range . 1)) (ELSIF . (range . 
1)) (ELSE . (range . 1)) (DIGITS . (range . 1)) (RANGE . (range . 1)) (THEN . 
(range . 1)) (SEMICOLON . (range . 1)) (WITH . (range . 1)) (IS . (range . 1)) 
(AND . (range . 1)) (OR . (range . 1)) (XOR . (range . 1)) (RIGHT_PAREN . 
(range . 1)) (EQUAL_GREATER . (range . 1)) (BAR . (range . 1)) (LEFT_PAREN .  
566))
       ((default . error) (SEMICOLON . (relation . 1)) (IS . (relation . 1)) 
(WITH . (relation . 1)) (RIGHT_PAREN . (relation . 1)) (COMMA . (relation . 1)) 
(BAR . (choice_relation . 0)) (EQUAL_GREATER . (choice_relation . 0)) (AND . 
((relation . 1) (choice_relation . 0))) (OR . ((relation . 1) (choice_relation 
. 0))) (XOR . ((relation . 1) (choice_relation . 0))))
-      ((default . error) (PLUS .  143) (MINUS .  142) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (ABS .  145) (NOT .  148) 
(NULL .  149) (NEW .  147) (LEFT_PAREN .  146))
-      ((default . error) (BAR .  561) (DO . (relation . 3)) (LOOP . (relation 
. 3)) (COMMA . (relation . 3)) (RIGHT_PAREN . (relation . 3)) (ELSIF . 
(relation . 3)) (ELSE . (relation . 3)) (EQUAL_GREATER . (relation . 3)) 
(DIGITS . (relation . 3)) (RANGE . (relation . 3)) (THEN . (relation . 3)) 
(SEMICOLON . (relation . 3)) (WITH . (relation . 3)) (IS . (relation . 3)) (AND 
. (relation . 3)) (OR . (relation . 3)) (XOR . (relation . 3)))
-      ((default . error) (DO . (membership_choice_list . 0)) (LOOP . 
(membership_choice_list . 0)) (COMMA . (membership_choice_list . 0)) 
(RIGHT_PAREN . (membership_choice_list . 0)) (ELSIF . (membership_choice_list . 
0)) (ELSE . (membership_choice_list . 0)) (EQUAL_GREATER . 
(membership_choice_list . 0)) (DIGITS . (membership_choice_list . 0)) (RANGE . 
(membership_choice_list . 0)) (THEN . (membership_choice_list . 0)) (SEMICOLON 
. (membership_choice_list . 0)) (WITH . (membership_choic [...]
-      ((default . error) (DO . (membership_choice . 1)) (LOOP . 
(membership_choice . 1)) (COMMA . (membership_choice . 1)) (RIGHT_PAREN . 
(membership_choice . 1)) (ELSIF . (membership_choice . 1)) (ELSE . 
(membership_choice . 1)) (EQUAL_GREATER . (membership_choice . 1)) (DIGITS . 
(membership_choice . 1)) (RANGE . (membership_choice . 1)) (THEN . 
(membership_choice . 1)) (SEMICOLON . (membership_choice . 1)) (WITH . 
(membership_choice . 1)) (IS . (membership_choice . 1)) (AND . (membersh [...]
-      ((default . error) (DOT_DOT .  263) (DO . (membership_choice . 0)) (LOOP 
. (membership_choice . 0)) (COMMA . (membership_choice . 0)) (RIGHT_PAREN . 
(membership_choice . 0)) (ELSIF . (membership_choice . 0)) (ELSE . 
(membership_choice . 0)) (EQUAL_GREATER . (membership_choice . 0)) (DIGITS . 
(membership_choice . 0)) (RANGE . (membership_choice . 0)) (THEN . 
(membership_choice . 0)) (SEMICOLON . (membership_choice . 0)) (WITH . 
(membership_choice . 0)) (IS . (membership_choice . 0)) [...]
+      ((default . error) (PLUS .  144) (MINUS .  143) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (ABS .  146) (NOT .  149) 
(NULL .  150) (NEW .  148) (LEFT_PAREN .  147))
+      ((default . error) (BAR .  564) (DO . (relation . 3)) (LOOP . (relation 
. 3)) (COMMA . (relation . 3)) (ELSIF . (relation . 3)) (ELSE . (relation . 3)) 
(EQUAL_GREATER . (relation . 3)) (RIGHT_PAREN . (relation . 3)) (DIGITS . 
(relation . 3)) (RANGE . (relation . 3)) (THEN . (relation . 3)) (SEMICOLON . 
(relation . 3)) (WITH . (relation . 3)) (IS . (relation . 3)) (AND . (relation 
. 3)) (OR . (relation . 3)) (XOR . (relation . 3)))
+      ((default . error) (DO . (membership_choice_list . 0)) (LOOP . 
(membership_choice_list . 0)) (COMMA . (membership_choice_list . 0)) (ELSIF . 
(membership_choice_list . 0)) (ELSE . (membership_choice_list . 0)) 
(EQUAL_GREATER . (membership_choice_list . 0)) (RIGHT_PAREN . 
(membership_choice_list . 0)) (DIGITS . (membership_choice_list . 0)) (RANGE . 
(membership_choice_list . 0)) (THEN . (membership_choice_list . 0)) (SEMICOLON 
. (membership_choice_list . 0)) (WITH . (membership_choic [...]
+      ((default . error) (DO . (membership_choice . 1)) (LOOP . 
(membership_choice . 1)) (COMMA . (membership_choice . 1)) (ELSIF . 
(membership_choice . 1)) (ELSE . (membership_choice . 1)) (EQUAL_GREATER . 
(membership_choice . 1)) (RIGHT_PAREN . (membership_choice . 1)) (DIGITS . 
(membership_choice . 1)) (RANGE . (membership_choice . 1)) (THEN . 
(membership_choice . 1)) (SEMICOLON . (membership_choice . 1)) (WITH . 
(membership_choice . 1)) (IS . (membership_choice . 1)) (AND . (membersh [...]
+      ((default . error) (DOT_DOT .  264) (DO . (membership_choice . 0)) (LOOP 
. (membership_choice . 0)) (COMMA . (membership_choice . 0)) (ELSIF . 
(membership_choice . 0)) (ELSE . (membership_choice . 0)) (EQUAL_GREATER . 
(membership_choice . 0)) (RIGHT_PAREN . (membership_choice . 0)) (DIGITS . 
(membership_choice . 0)) (RANGE . (membership_choice . 0)) (THEN . 
(membership_choice . 0)) (SEMICOLON . (membership_choice . 0)) (WITH . 
(membership_choice . 0)) (IS . (membership_choice . 0)) [...]
       ((default . error) (DO . (range . 2)) (LOOP . (range . 2)) (OF . (range 
. 2)) (COLON_EQUAL . (range . 2)) (ELSIF . (range . 2)) (ELSE . (range . 2)) 
(DIGITS . (range . 2)) (RANGE . (range . 2)) (THEN . (range . 2)) (SEMICOLON . 
(range . 2)) (WITH . (range . 2)) (IS . (range . 2)) (AND . (range . 2)) (OR . 
(range . 2)) (XOR . (range . 2)) (COMMA . (range . 2)) (RIGHT_PAREN . (range . 
2)) (EQUAL_GREATER . (range . 2)) (BAR . (range . 2)))
       ((default . error) (BEGIN . (package_renaming_declaration . 0)) 
(IDENTIFIER . (package_renaming_declaration . 0)) (ENTRY . 
(package_renaming_declaration . 0)) (FOR . (package_renaming_declaration . 0)) 
(PROTECTED . (package_renaming_declaration . 0)) (SUBTYPE . 
(package_renaming_declaration . 0)) (TASK . (package_renaming_declaration . 0)) 
(TYPE . (package_renaming_declaration . 0)) (END . 
(package_renaming_declaration . 0)) (WITH . (package_renaming_declaration . 0)) 
(USE . (packa [...]
       ((default . error) (SEMICOLON . (association_list . 1)) (IS . 
(association_list . 1)) (COMMA . (association_list . 1)) (RIGHT_PAREN . 
(association_list . 1)))
+      ((default . error) (SEMICOLON .  563))
+      ((default . error) (SEMICOLON .  562))
+      ((default . error) (SEMICOLON .  561))
       ((default . error) (SEMICOLON .  560))
-      ((default . error) (SEMICOLON .  559))
-      ((default . error) (SEMICOLON .  558))
-      ((default . error) (SEMICOLON .  557))
-      ((default . error) (ACCESS . (null_exclusion_opt . 0)) (NOT .  552) 
(IDENTIFIER .  551) (CHARACTER_LITERAL .  49) (STRING_LITERAL .  48))
-      ((default . error) (RIGHT_PAREN . (discriminant_specification_opt . 0)) 
(SEMICOLON . (discriminant_specification_opt . 0)) (IDENTIFIER .  71))
+      ((default . error) (ACCESS . (null_exclusion_opt . 0)) (NOT .  555) 
(IDENTIFIER .  554) (CHARACTER_LITERAL .  50) (STRING_LITERAL .  49))
+      ((default . error) (RIGHT_PAREN . (discriminant_specification_opt . 0)) 
(SEMICOLON . (discriminant_specification_opt . 0)) (IDENTIFIER .  72))
       ((default . error) (IS . (discriminant_part_opt . 2)) (WITH . 
(discriminant_part_opt . 2)) (SEMICOLON . (discriminant_part_opt . 2)))
       ((default . error) (IS . (discriminant_part_opt . 1)) (WITH . 
(discriminant_part_opt . 1)) (SEMICOLON . (discriminant_part_opt . 1)))
       ((default . error) (PACKAGE . (formal_type_declaration . 2)) (PROCEDURE 
. (formal_type_declaration . 2)) (FUNCTION . (formal_type_declaration . 2)) 
(IDENTIFIER . (formal_type_declaration . 2)) (PRAGMA . (formal_type_declaration 
. 2)) (TYPE . (formal_type_declaration . 2)) (WITH . (formal_type_declaration . 
2)))
-      ((default . error) (TAGGED .  549) (NEW . 
(abstract_limited_synchronized_opt . 3)) (SYNCHRONIZED .  548) (LIMITED .  547))
-      ((default . error) (LEFT_PAREN .  546))
-      ((default . error) (BOX .  545))
-      ((default . error) (BOX .  544))
+      ((default . error) (TAGGED .  552) (NEW . 
(abstract_limited_synchronized_opt . 3)) (SYNCHRONIZED .  551) (LIMITED .  550))
+      ((default . error) (LEFT_PAREN .  549))
+      ((default . error) (BOX .  548))
+      ((default . error) (BOX .  547))
       ((default . error) (SEMICOLON . (interface_type_definition . 8)) (WITH . 
(interface_type_definition . 8)))
-      ((default . error) (BOX .  543))
-      ((default . error) (INTERFACE .  542) (PRIVATE . 
(abstract_tagged_limited_opt . 5)) (NEW . (abstract_limited_synchronized_opt . 
4)))
-      ((default . error) (BOX .  541))
-      ((default . error) (INTERFACE .  540))
-      ((default . error) (BOX .  539))
-      ((default . error) (INTERFACE .  538) (NEW . 
(abstract_limited_synchronized_opt . 5)))
-      ((default . error) (PRIVATE . (abstract_tagged_limited_opt . 4)) 
(LIMITED .  536) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  107))
-      ((default . error) (INTERFACE .  535))
-      ((default . error) (NEW .  534))
-      ((default . error) (PRIVATE .  533))
+      ((default . error) (BOX .  546))
+      ((default . error) (INTERFACE .  545) (PRIVATE . 
(abstract_tagged_limited_opt . 5)) (NEW . (abstract_limited_synchronized_opt . 
4)))
+      ((default . error) (BOX .  544))
+      ((default . error) (INTERFACE .  543))
+      ((default . error) (BOX .  542))
+      ((default . error) (INTERFACE .  541) (NEW . 
(abstract_limited_synchronized_opt . 5)))
+      ((default . error) (PRIVATE . (abstract_tagged_limited_opt . 4)) 
(LIMITED .  539) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  108))
+      ((default . error) (INTERFACE .  538))
+      ((default . error) (NEW .  537))
+      ((default . error) (PRIVATE .  536))
       ((default . error) (WITH . (formal_type_definition . 9)) (SEMICOLON . 
(formal_type_definition . 9)))
       ((default . error) (WITH . (formal_type_definition . 8)) (SEMICOLON . 
(formal_type_definition . 8)))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
       ((default . error) (WITH . (formal_type_definition . 1)) (SEMICOLON . 
(formal_type_definition . 1)))
       ((default . error) (WITH . (formal_type_definition . 10)) (SEMICOLON . 
(formal_type_definition . 10)))
-      ((default . error) (SEMICOLON .  531))
-      ((default . error) (SEMICOLON .  530))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (DOT .  86) (TICK .  87) (COLON_EQUAL .  526) 
(LEFT_PAREN .  105) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  107))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (SEMICOLON .  524))
-      ((default . error) (RIGHT_PAREN . (parameter_and_result_profile . 0)) 
(DO . (parameter_and_result_profile . 0)) (RENAMES . 
(parameter_and_result_profile . 0)) (COLON_EQUAL . 
(parameter_and_result_profile . 0)) (SEMICOLON . (parameter_and_result_profile 
. 0)) (WITH . (parameter_and_result_profile . 0)) (IS . 
(parameter_and_result_profile . 0)))
+      ((default . error) (SEMICOLON .  534))
+      ((default . error) (SEMICOLON .  533))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (DOT .  87) (TICK .  88) (COLON_EQUAL .  529) 
(LEFT_PAREN .  106) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  108))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (SEMICOLON .  527))
+      ((default . error) (RIGHT_PAREN . (parameter_and_result_profile . 0)) 
(DO . (parameter_and_result_profile . 0)) (RENAMES . 
(parameter_and_result_profile . 0)) (COLON_EQUAL . 
(parameter_and_result_profile . 0)) (WITH . (parameter_and_result_profile . 0)) 
(SEMICOLON . (parameter_and_result_profile . 0)) (IS . 
(parameter_and_result_profile . 0)))
       ((default . error) (IDENTIFIER . (general_access_modifier_opt . 1)) 
(STRING_LITERAL . (general_access_modifier_opt . 1)) (CHARACTER_LITERAL . 
(general_access_modifier_opt . 1)))
       ((default . error) (IDENTIFIER . (general_access_modifier_opt . 2)) 
(STRING_LITERAL . (general_access_modifier_opt . 2)) (CHARACTER_LITERAL . 
(general_access_modifier_opt . 2)))
       ((default . error) (FUNCTION . (protected_opt . 1)) (PROCEDURE . 
(protected_opt . 1)))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (FUNCTION .  521) (PROCEDURE .  522))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (FUNCTION .  524) (PROCEDURE .  525))
       ((default . error) (IN . (aliased_opt . 1)) (OUT . (aliased_opt . 1)) 
(ARRAY . (aliased_opt . 1)) (CONSTANT . (aliased_opt . 1)) (IDENTIFIER . 
(aliased_opt . 1)) (STRING_LITERAL . (aliased_opt . 1)) (CHARACTER_LITERAL . 
(aliased_opt . 1)) (ACCESS . (aliased_opt . 1)) (NOT . (aliased_opt . 1)))
-      ((default . error) (SEMICOLON . (parameter_specification . 3)) 
(RIGHT_PAREN . (parameter_specification . 3)) (COLON_EQUAL .  520))
-      ((default . error) (NOT . (mode_opt . 0)) (IDENTIFIER . (mode_opt . 0)) 
(STRING_LITERAL . (mode_opt . 0)) (CHARACTER_LITERAL . (mode_opt . 0)) (IN .  
203) (OUT .  204))
+      ((default . error) (SEMICOLON . (parameter_specification . 3)) 
(RIGHT_PAREN . (parameter_specification . 3)) (COLON_EQUAL .  523))
+      ((default . error) (NOT . (mode_opt . 0)) (IDENTIFIER . (mode_opt . 0)) 
(STRING_LITERAL . (mode_opt . 0)) (CHARACTER_LITERAL . (mode_opt . 0)) (IN .  
204) (OUT .  205))
       ((default . error) (RIGHT_PAREN . (parameter_specification_list . 1)) 
(SEMICOLON . (parameter_specification_list . 1)))
-      ((default . error) (RIGHT_PAREN . ((association_opt . 0) (expression_opt 
. 0))) (COMMA . ((association_opt . 0) (expression_opt . 0))) (EQUAL_GREATER . 
(discrete_choice_list . 0)) (BAR . (discrete_choice_list . 0)) (OTHERS .  171) 
(IDENTIFIER .  47) (CHARACTER_LITERAL .  169) (STRING_LITERAL .  48) (PLUS .  
143) (MINUS .  142) (ABS .  145) (NOT .  170) (NULL .  517) (NEW .  147) 
(LEFT_PAREN .  146))
+      ((default . error) (RIGHT_PAREN . ((association_opt . 0) (expression_opt 
. 0))) (COMMA . ((association_opt . 0) (expression_opt . 0))) (EQUAL_GREATER . 
(discrete_choice_list . 0)) (BAR . (discrete_choice_list . 0)) (OTHERS .  172) 
(IDENTIFIER .  48) (CHARACTER_LITERAL .  170) (STRING_LITERAL .  49) (PLUS .  
144) (MINUS .  143) (ABS .  146) (NOT .  171) (NULL .  520) (NEW .  148) 
(LEFT_PAREN .  147))
       ((default . error) (DO . (aggregate . 0)) (LOOP . (aggregate . 0)) (USE 
. (aggregate . 0)) (COLON_EQUAL . (aggregate . 0)) (WHILE . (aggregate . 0)) 
(SELECT . (aggregate . 0)) (REQUEUE . (aggregate . 0)) (RAISE . (aggregate . 
0)) (PRAGMA . (aggregate . 0)) (NULL . (aggregate . 0)) (IF . (aggregate . 0)) 
(GOTO . (aggregate . 0)) (FOR . (aggregate . 0)) (EXIT . (aggregate . 0)) 
(DELAY . (aggregate . 0)) (DECLARE . (aggregate . 0)) (CASE . (aggregate . 0)) 
(BEGIN . (aggregate . 0)) (A [...]
-      ((default . error) (RIGHT_PAREN .  516))
+      ((default . error) (RIGHT_PAREN .  519))
       ((default . error) (OF . (aggregate . 3)) (LESS_LESS . (aggregate . 3)) 
(IDENTIFIER . (aggregate . 3)) (STRING_LITERAL . (aggregate . 3)) 
(CHARACTER_LITERAL . (aggregate . 3)) (ACCEPT . (aggregate . 3)) (ABORT . 
(aggregate . 3)) (BEGIN . (aggregate . 3)) (CASE . (aggregate . 3)) (DECLARE . 
(aggregate . 3)) (DELAY . (aggregate . 3)) (EXIT . (aggregate . 3)) (FOR . 
(aggregate . 3)) (GOTO . (aggregate . 3)) (IF . (aggregate . 3)) (NULL . 
(aggregate . 3)) (PRAGMA . (aggregate . 3)) (RA [...]
-      ((default . error) (PLUS . (primary . 0)) (MINUS . (primary . 0)) 
(AMPERSAND . (primary . 0)) (DOT_DOT . (primary . 0)) (IN . (primary . 0)) (NOT 
. (primary . 0)) (EQUAL . (primary . 0)) (GREATER . (primary . 0)) 
(GREATER_EQUAL . (primary . 0)) (LESS . (primary . 0)) (LESS_EQUAL . (primary . 
0)) (SLASH_EQUAL . (primary . 0)) (RIGHT_PAREN . (primary . 0)) (COMMA . 
(primary . 0)) (SLASH . (primary . 0)) (STAR . (primary . 0)) (MOD . (primary . 
0)) (REM . (primary . 0)) (STAR_STAR . ( [...]
-      ((default . error) (COMMA .  260) (RIGHT_PAREN .  781))
-      ((default . error) (IDENTIFIER . (null_exclusion_opt . 0)) 
(STRING_LITERAL . (null_exclusion_opt . 0)) (CHARACTER_LITERAL . 
(null_exclusion_opt . 0)) (NOT .  207))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (RETURN .  89) (LEFT_PAREN .  776))
-      ((default . error) (IS . (parameter_profile_opt . 0)) (SEMICOLON . 
(parameter_profile_opt . 0)) (WITH . (parameter_profile_opt . 0)) (COLON_EQUAL 
. (parameter_profile_opt . 0)) (RENAMES . (parameter_profile_opt . 0)) (DO . 
(parameter_profile_opt . 0)) (RIGHT_PAREN . (parameter_profile_opt . 0)) 
(LEFT_PAREN .  776))
-      ((default . error) (DOT .  86) (TICK .  87) (RIGHT_PAREN . 
(access_definition . 0)) (DO . (access_definition . 0)) (RENAMES . 
(access_definition . 0)) (COLON_EQUAL . (access_definition . 0)) (WITH . 
(access_definition . 0)) (SEMICOLON . (access_definition . 0)) (IS . 
(access_definition . 0)) (LEFT_PAREN .  105))
+      ((default . error) (PLUS . (primary . 0)) (MINUS . (primary . 0)) 
(AMPERSAND . (primary . 0)) (DOT_DOT . (primary . 0)) (IN . (primary . 0)) (NOT 
. (primary . 0)) (EQUAL . (primary . 0)) (GREATER . (primary . 0)) 
(GREATER_EQUAL . (primary . 0)) (LESS . (primary . 0)) (LESS_EQUAL . (primary . 
0)) (SLASH_EQUAL . (primary . 0)) (RIGHT_PAREN . (primary . 0)) (COMMA . 
(primary . 0)) (SLASH . (primary . 0)) (STAR . (primary . 0)) (MOD . (primary . 
0)) (REM . (primary . 0)) (STAR_STAR . ( [...]
+      ((default . error) (COMMA .  261) (RIGHT_PAREN .  787))
+      ((default . error) (IDENTIFIER . (null_exclusion_opt . 0)) 
(STRING_LITERAL . (null_exclusion_opt . 0)) (CHARACTER_LITERAL . 
(null_exclusion_opt . 0)) (NOT .  208))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (RETURN .  90) (LEFT_PAREN .  782))
+      ((default . error) (IS . (parameter_profile_opt . 0)) (SEMICOLON . 
(parameter_profile_opt . 0)) (WITH . (parameter_profile_opt . 0)) (COLON_EQUAL 
. (parameter_profile_opt . 0)) (RENAMES . (parameter_profile_opt . 0)) (DO . 
(parameter_profile_opt . 0)) (RIGHT_PAREN . (parameter_profile_opt . 0)) 
(LEFT_PAREN .  782))
+      ((default . error) (DOT .  87) (TICK .  88) (RIGHT_PAREN . 
(access_definition . 0)) (DO . (access_definition . 0)) (RENAMES . 
(access_definition . 0)) (COLON_EQUAL . (access_definition . 0)) (WITH . 
(access_definition . 0)) (SEMICOLON . (access_definition . 0)) (IS . 
(access_definition . 0)) (LEFT_PAREN .  106))
       ((default . error) (WITH . (formal_object_declaration . 3)) (TYPE . 
(formal_object_declaration . 3)) (PRAGMA . (formal_object_declaration . 3)) 
(IDENTIFIER . (formal_object_declaration . 3)) (FUNCTION . 
(formal_object_declaration . 3)) (PROCEDURE . (formal_object_declaration . 3)) 
(PACKAGE . (formal_object_declaration . 3)))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (SEMICOLON .  773))
-      ((default . error) (DOT .  86) (TICK .  87) (WITH . 
(formal_package_actual_part . 1)) (SEMICOLON . (formal_package_actual_part . 
1)) (LEFT_PAREN .  771))
-      ((default . error) (SEMICOLON .  770))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (SEMICOLON .  779))
+      ((default . error) (DOT .  87) (TICK .  88) (WITH . 
(formal_package_actual_part . 1)) (SEMICOLON . (formal_package_actual_part . 
1)) (LEFT_PAREN .  777))
+      ((default . error) (SEMICOLON .  776))
       ((default . error) (WITH . (formal_subprogram_declaration . 3)) (TYPE . 
(formal_subprogram_declaration . 3)) (PRAGMA . (formal_subprogram_declaration . 
3)) (IDENTIFIER . (formal_subprogram_declaration . 3)) (FUNCTION . 
(formal_subprogram_declaration . 3)) (PROCEDURE . 
(formal_subprogram_declaration . 3)) (PACKAGE . (formal_subprogram_declaration 
. 3)))
       ((default . error) (WITH . (formal_subprogram_declaration . 0)) (TYPE . 
(formal_subprogram_declaration . 0)) (PRAGMA . (formal_subprogram_declaration . 
0)) (IDENTIFIER . (formal_subprogram_declaration . 0)) (FUNCTION . 
(formal_subprogram_declaration . 0)) (PROCEDURE . 
(formal_subprogram_declaration . 0)) (PACKAGE . (formal_subprogram_declaration 
. 0)))
-      ((default . error) (SEMICOLON .  769))
+      ((default . error) (SEMICOLON .  775))
       ((default . error) (SEMICOLON . (formal_type_definition . 0)) (WITH . 
(formal_type_definition . 0)))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (AND .  767) (WITH . (interface_type_definition . 5)) 
(SEMICOLON . (interface_type_definition . 5)))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (AND .  773) (WITH . (interface_type_definition . 5)) 
(SEMICOLON . (interface_type_definition . 5)))
       ((default . error) (RECORD . (abstract_tagged_limited_opt . 3)) (NULL . 
(abstract_tagged_limited_opt . 3)) (PRIVATE . (abstract_tagged_limited_opt . 
3)))
-      ((default . error) (SEMICOLON .  766))
-      ((default . error) (AND .  765) (WITH . (interface_type_definition . 7)) 
(SEMICOLON . (interface_type_definition . 7)))
+      ((default . error) (SEMICOLON .  772))
+      ((default . error) (AND .  771) (WITH . (interface_type_definition . 7)) 
(SEMICOLON . (interface_type_definition . 7)))
       ((default . error) (SEMICOLON . (formal_type_definition . 3)) (WITH . 
(formal_type_definition . 3)))
-      ((default . error) (AND .  764) (WITH . (interface_type_definition . 6)) 
(SEMICOLON . (interface_type_definition . 6)))
+      ((default . error) (AND .  770) (WITH . (interface_type_definition . 6)) 
(SEMICOLON . (interface_type_definition . 6)))
       ((default . error) (SEMICOLON . (formal_type_definition . 4)) (WITH . 
(formal_type_definition . 4)))
-      ((default . error) (AND .  763) (WITH . (interface_type_definition . 4)) 
(SEMICOLON . (interface_type_definition . 4)))
-      ((default . error) (RIGHT_PAREN .  762))
+      ((default . error) (AND .  769) (WITH . (interface_type_definition . 4)) 
(SEMICOLON . (interface_type_definition . 4)))
+      ((default . error) (RIGHT_PAREN .  768))
       ((default . error) (SEMICOLON . (formal_type_definition . 5)) (WITH . 
(formal_type_definition . 5)))
-      ((default . error) (SEMICOLON . (formal_type_definition . 6)) (WITH . 
(formal_type_definition . 6)) (DIGITS .  761))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  752) 
(NULL .  149) (NEW .  147) (LEFT_PAREN .  146))
+      ((default . error) (SEMICOLON . (formal_type_definition . 6)) (WITH . 
(formal_type_definition . 6)) (DIGITS .  767))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  758) 
(NULL .  150) (NEW .  148) (LEFT_PAREN .  147))
       ((default . error) (NEW . (abstract_limited_synchronized_opt . 1)))
       ((default . error) (NEW . (abstract_limited_synchronized_opt . 2)))
-      ((default . error) (LIMITED .  751) (RECORD . 
(abstract_tagged_limited_opt . 2)) (NULL . (abstract_tagged_limited_opt . 2)) 
(PRIVATE . (abstract_tagged_limited_opt . 2)))
+      ((default . error) (LIMITED .  757) (RECORD . 
(abstract_tagged_limited_opt . 2)) (NULL . (abstract_tagged_limited_opt . 2)) 
(PRIVATE . (abstract_tagged_limited_opt . 2)))
       ((default . error) (RIGHT_PAREN . (discriminant_specification_list . 1)) 
(SEMICOLON . (discriminant_specification_list . 1)))
       ((default . error) (SEMICOLON . (null_exclusion_opt_name . 0)) 
(RIGHT_PAREN . (null_exclusion_opt_name . 0)) (COLON_EQUAL . 
(null_exclusion_opt_name . 0)) (DOT . (name . 0)) (LEFT_PAREN . (name . 0)) 
(TICK . (name . 0)))
-      ((default . error) (NULL .  750))
-      ((default . error) (SEMICOLON . (discriminant_specification_opt . 4)) 
(RIGHT_PAREN . (discriminant_specification_opt . 4)) (COLON_EQUAL .  749))
-      ((default . error) (DOT .  86) (TICK .  87) (LEFT_PAREN .  105))
-      ((default . error) (SEMICOLON . (discriminant_specification_opt . 2)) 
(RIGHT_PAREN . (discriminant_specification_opt . 2)) (COLON_EQUAL .  748))
+      ((default . error) (NULL .  756))
+      ((default . error) (SEMICOLON . (discriminant_specification_opt . 4)) 
(RIGHT_PAREN . (discriminant_specification_opt . 4)) (COLON_EQUAL .  755))
+      ((default . error) (DOT .  87) (TICK .  88) (LEFT_PAREN .  106))
+      ((default . error) (SEMICOLON . (discriminant_specification_opt . 2)) 
(RIGHT_PAREN . (discriminant_specification_opt . 2)) (COLON_EQUAL .  754))
       ((default . error) (SEMICOLON . (null_exclusion_opt_name . 1)) 
(RIGHT_PAREN . (null_exclusion_opt_name . 1)) (COLON_EQUAL . 
(null_exclusion_opt_name . 1)) (DOT . (name . 3)) (LEFT_PAREN . (name . 3)) 
(TICK . (name . 3)))
       ((default . error) ($EOI . (generic_renaming_declaration . 1)) (LIMITED 
. (generic_renaming_declaration . 1)) (SEPARATE . (generic_renaming_declaration 
. 1)) (WITH . (generic_renaming_declaration . 1)) (END . 
(generic_renaming_declaration . 1)) (PRIVATE . (generic_renaming_declaration . 
1)) (USE . (generic_renaming_declaration . 1)) (TYPE . 
(generic_renaming_declaration . 1)) (TASK . (generic_renaming_declaration . 1)) 
(SUBTYPE . (generic_renaming_declaration . 1)) (PROTECTED . (ge [...]
       ((default . error) ($EOI . (generic_renaming_declaration . 0)) (LIMITED 
. (generic_renaming_declaration . 0)) (SEPARATE . (generic_renaming_declaration 
. 0)) (WITH . (generic_renaming_declaration . 0)) (END . 
(generic_renaming_declaration . 0)) (PRIVATE . (generic_renaming_declaration . 
0)) (USE . (generic_renaming_declaration . 0)) (TYPE . 
(generic_renaming_declaration . 0)) (TASK . (generic_renaming_declaration . 0)) 
(SUBTYPE . (generic_renaming_declaration . 0)) (PROTECTED . (ge [...]
       ((default . error) ($EOI . (generic_renaming_declaration . 2)) (LIMITED 
. (generic_renaming_declaration . 2)) (SEPARATE . (generic_renaming_declaration 
. 2)) (WITH . (generic_renaming_declaration . 2)) (END . 
(generic_renaming_declaration . 2)) (PRIVATE . (generic_renaming_declaration . 
2)) (USE . (generic_renaming_declaration . 2)) (TYPE . 
(generic_renaming_declaration . 2)) (TASK . (generic_renaming_declaration . 2)) 
(SUBTYPE . (generic_renaming_declaration . 2)) (PROTECTED . (ge [...]
       ((default . error) (END . (generic_instantiation . 0)) (BEGIN . 
(generic_instantiation . 0)) (IDENTIFIER . (generic_instantiation . 0)) (ENTRY 
. (generic_instantiation . 0)) (FOR . (generic_instantiation . 0)) (PROTECTED . 
(generic_instantiation . 0)) (SUBTYPE . (generic_instantiation . 0)) (TASK . 
(generic_instantiation . 0)) (TYPE . (generic_instantiation . 0)) ($EOI . 
(generic_instantiation . 0)) (FUNCTION . (generic_instantiation . 0)) (GENERIC 
. (generic_instantiation . 0)) (L [...]
-      ((default . error) (PLUS .  143) (MINUS .  142) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (ABS .  145) (NOT .  148) 
(NULL .  149) (NEW .  147) (LEFT_PAREN .  146))
-      ((default . error) (BAR .  561) (LOOP . (relation . 2)) (DO . (relation 
. 2)) (XOR . (relation . 2)) (OR . (relation . 2)) (AND . (relation . 2)) (IS . 
(relation . 2)) (WITH . (relation . 2)) (SEMICOLON . (relation . 2)) (THEN . 
(relation . 2)) (RANGE . (relation . 2)) (DIGITS . (relation . 2)) 
(EQUAL_GREATER . (relation . 2)) (ELSE . (relation . 2)) (ELSIF . (relation . 
2)) (RIGHT_PAREN . (relation . 2)) (COMMA . (relation . 2)))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (PLUS .  144) (MINUS .  143) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (ABS .  146) (NOT .  149) 
(NULL .  150) (NEW .  148) (LEFT_PAREN .  147))
+      ((default . error) (BAR .  564) (LOOP . (relation . 2)) (DO . (relation 
. 2)) (XOR . (relation . 2)) (OR . (relation . 2)) (AND . (relation . 2)) (IS . 
(relation . 2)) (WITH . (relation . 2)) (SEMICOLON . (relation . 2)) (THEN . 
(relation . 2)) (RANGE . (relation . 2)) (DIGITS . (relation . 2)) (RIGHT_PAREN 
. (relation . 2)) (EQUAL_GREATER . (relation . 2)) (ELSE . (relation . 2)) 
(ELSIF . (relation . 2)) (COMMA . (relation . 2)))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (AND . (choice_relation_and_then_list . 0)) 
(EQUAL_GREATER . (choice_relation_and_then_list . 0)) (BAR . 
(choice_relation_and_then_list . 0)))
       ((default . error) (OR . (choice_relation_or_else_list . 0)) 
(EQUAL_GREATER . (choice_relation_or_else_list . 0)) (BAR . 
(choice_relation_or_else_list . 0)))
       ((default . error) (OR . (choice_relation_or_else_list . 1)) 
(EQUAL_GREATER . (choice_relation_or_else_list . 1)) (BAR . 
(choice_relation_or_else_list . 1)))
       ((default . error) (AND . (choice_relation_and_then_list . 1)) 
(EQUAL_GREATER . (choice_relation_and_then_list . 1)) (BAR . 
(choice_relation_and_then_list . 1)))
-      ((default . error) (RENAMES .  744))
-      ((default . error) (RENAMES .  743))
-      ((default . error) (ACCESS .  234) (IDENTIFIER .  47) (CHARACTER_LITERAL 
.  49) (STRING_LITERAL .  48))
-      ((default . error) (LEFT_PAREN .  219) (RECORD .  739))
-      ((default . error) (AT .  738))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (DOT .  86) (TICK .  87) (IS . ( 736 
(aspect_specification_opt . 0))) (WITH .  107) (LEFT_PAREN .  105))
-      ((default . error) (WITH . (discriminant_part_opt . 0)) (IS . 
(discriminant_part_opt . 0)) (LEFT_PAREN .  197))
-      ((default . error) (IS . ( 734 (aspect_specification_opt . 0))) (WITH .  
107))
-      ((default . error) (IS .  733))
-      ((default . error) (NOT .  730) (IDENTIFIER .  47) (CHARACTER_LITERAL .  
49) (STRING_LITERAL .  48))
-      ((default . error) (WITH . (discriminant_part_opt . 0)) (IS . 
(discriminant_part_opt . 0)) (SEMICOLON . (discriminant_part_opt . 0)) 
(LEFT_PAREN .  197))
-      ((default . error) (IS . ( 728 (aspect_specification_opt . 0))) (WITH .  
107))
-      ((default . error) (SEMICOLON .  726) (IS .  727))
+      ((default . error) (RENAMES .  750))
+      ((default . error) (RENAMES .  749))
+      ((default . error) (ACCESS .  235) (IDENTIFIER .  48) (CHARACTER_LITERAL 
.  50) (STRING_LITERAL .  49))
+      ((default . error) (LEFT_PAREN .  220) (RECORD .  745))
+      ((default . error) (AT .  744))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (DOT .  87) (TICK .  88) (IS . ( 742 
(aspect_specification_opt . 0))) (WITH .  108) (LEFT_PAREN .  106))
+      ((default . error) (WITH . (discriminant_part_opt . 0)) (IS . 
(discriminant_part_opt . 0)) (LEFT_PAREN .  198))
+      ((default . error) (IS . ( 740 (aspect_specification_opt . 0))) (WITH .  
108))
+      ((default . error) (IS .  739))
+      ((default . error) (NOT .  736) (IDENTIFIER .  48) (CHARACTER_LITERAL .  
50) (STRING_LITERAL .  49))
+      ((default . error) (WITH . (discriminant_part_opt . 0)) (IS . 
(discriminant_part_opt . 0)) (SEMICOLON . (discriminant_part_opt . 0)) 
(LEFT_PAREN .  198))
+      ((default . error) (IS . ( 734 (aspect_specification_opt . 0))) (WITH .  
108))
+      ((default . error) (SEMICOLON .  732) (IS .  733))
       ((default . error) (END . (incomplete_type_declaration . 1)) (PRIVATE . 
(incomplete_type_declaration . 1)) (USE . (incomplete_type_declaration . 1)) 
(TYPE . (incomplete_type_declaration . 1)) (TASK . (incomplete_type_declaration 
. 1)) (SUBTYPE . (incomplete_type_declaration . 1)) (PROTECTED . 
(incomplete_type_declaration . 1)) (PROCEDURE . (incomplete_type_declaration . 
1)) (PRAGMA . (incomplete_type_declaration . 1)) (PACKAGE . 
(incomplete_type_declaration . 1)) (OVERRIDING . (inc [...]
-      ((default . error) (IS .  725))
-      ((default . error) (END .  724))
-      ((default . error) (DOT .  86) (TICK .  87) (SEMICOLON . 
(package_specification . 1)) (LEFT_PAREN .  105))
-      ((default . error) (COLON_EQUAL .  723))
-      ((default . error) (SEMICOLON .  722))
-      ((default . error) (IDENTIFIER . (constant_opt . 0)) (STRING_LITERAL . 
(constant_opt . 0)) (CHARACTER_LITERAL . (constant_opt . 0)) (NOT . 
(constant_opt . 0)) (ACCESS . (constant_opt . 0)) (ARRAY . (constant_opt . 0)) 
(CONSTANT .  720))
-      ((default . error) (SEPARATE .  719) (ABSTRACT .  718))
-      ((default . error) (NULL .  717))
-      ((default . error) (WITH . (parameter_profile_opt . 0)) (SEMICOLON . 
(parameter_profile_opt . 0)) (LEFT_PAREN .  715))
-      ((default . error) (END . (sequence_of_statements_opt . 0)) (EXCEPTION . 
(sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . (label_opt . 0)) (ABORT 
. (label_opt . 0)) (DELAY . (label_opt .  [...]
-      ((default . error) (SEMICOLON . (name_opt . 0)) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48))
+      ((default . error) (IS .  731))
+      ((default . error) (END .  730))
+      ((default . error) (DOT .  87) (TICK .  88) (SEMICOLON . 
(package_specification . 1)) (LEFT_PAREN .  106))
+      ((default . error) (COLON_EQUAL .  729))
+      ((default . error) (SEMICOLON .  728))
+      ((default . error) (IDENTIFIER . (constant_opt . 0)) (STRING_LITERAL . 
(constant_opt . 0)) (CHARACTER_LITERAL . (constant_opt . 0)) (NOT . 
(constant_opt . 0)) (ACCESS . (constant_opt . 0)) (ARRAY . (constant_opt . 0)) 
(CONSTANT .  726))
+      ((default . error) (SEPARATE .  725) (ABSTRACT .  724))
+      ((default . error) (NULL .  723))
+      ((default . error) (LEFT_PAREN .  721))
+      ((default . error) (WITH . (parameter_profile_opt . 0)) (SEMICOLON . 
(parameter_profile_opt . 0)) (LEFT_PAREN .  719))
+      ((default . error) (END . (sequence_of_statements_opt . 0)) (EXCEPTION . 
(sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . (label_opt . 0)) (ABORT 
. (label_opt . 0)) (DELAY . (label_opt .  [...]
+      ((default . error) (SEMICOLON . (name_opt . 0)) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49))
       ((default . error) (LOOP . (relation_and_then_list . 0)) (DO . 
(relation_and_then_list . 0)) (AND . (relation_and_then_list . 0)) (IS . 
(relation_and_then_list . 0)) (WITH . (relation_and_then_list . 0)) (SEMICOLON 
. (relation_and_then_list . 0)) (THEN . (relation_and_then_list . 0)) (RANGE . 
(relation_and_then_list . 0)) (COMMA . (relation_and_then_list . 0)) 
(RIGHT_PAREN . (relation_and_then_list . 0)) (DIGITS . (relation_and_then_list 
. 0)) (EQUAL_GREATER . (relation_and_then_li [...]
       ((default . error) (LOOP . (relation_or_else_list . 0)) (DO . 
(relation_or_else_list . 0)) (OR . (relation_or_else_list . 0)) (IS . 
(relation_or_else_list . 0)) (WITH . (relation_or_else_list . 0)) (SEMICOLON . 
(relation_or_else_list . 0)) (THEN . (relation_or_else_list . 0)) (RANGE . 
(relation_or_else_list . 0)) (COMMA . (relation_or_else_list . 0)) (RIGHT_PAREN 
. (relation_or_else_list . 0)) (DIGITS . (relation_or_else_list . 0)) 
(EQUAL_GREATER . (relation_or_else_list . 0)) (ELS [...]
       ((default . error) (LOOP . (relation_or_else_list . 1)) (DO . 
(relation_or_else_list . 1)) (OR . (relation_or_else_list . 1)) (IS . 
(relation_or_else_list . 1)) (WITH . (relation_or_else_list . 1)) (SEMICOLON . 
(relation_or_else_list . 1)) (THEN . (relation_or_else_list . 1)) (RANGE . 
(relation_or_else_list . 1)) (COMMA . (relation_or_else_list . 1)) (RIGHT_PAREN 
. (relation_or_else_list . 1)) (DIGITS . (relation_or_else_list . 1)) 
(EQUAL_GREATER . (relation_or_else_list . 1)) (ELS [...]
       ((default . error) (LOOP . (relation_and_then_list . 1)) (DO . 
(relation_and_then_list . 1)) (AND . (relation_and_then_list . 1)) (IS . 
(relation_and_then_list . 1)) (WITH . (relation_and_then_list . 1)) (SEMICOLON 
. (relation_and_then_list . 1)) (THEN . (relation_and_then_list . 1)) (RANGE . 
(relation_and_then_list . 1)) (COMMA . (relation_and_then_list . 1)) 
(RIGHT_PAREN . (relation_and_then_list . 1)) (DIGITS . (relation_and_then_list 
. 1)) (EQUAL_GREATER . (relation_and_then_li [...]
-      ((default . error) (WHEN .  710))
-      ((default . error) (OF .  709) (COLON .  707) (IN .  708))
-      ((default . error) (EQUAL_GREATER .  706))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (IS . (aspect_specification_opt . 0)) (WITH .  107))
-      ((default . error) (IS . (aspect_specification_opt . 0)) (WITH .  107))
-      ((default . error) (IS .  133))
-      ((default . error) (IDENTIFIER .  701))
-      ((default . error) (COLON .  700))
-      ((default . error) (IDENTIFIER .  699))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (END . (sequence_of_statements_opt . 0)) (EXCEPTION . 
(sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . (label_opt . 0)) (ABORT 
. (label_opt . 0)) (DELAY . (label_opt .  [...]
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (BEGIN . (declarative_part_opt . 0)) (USE .  11) 
(SUBTYPE .  291) (PRAGMA .  7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(ENTRY . (overriding_indicator_opt . 2)) (FOR .  288) (IDENTIFIER .  287) (TYPE 
.  293) (GENERIC .  2) (PROTECTED .  290) (TASK .  292) (PACKAGE .  289))
-      ((default . error) (UNTIL .  693) (PLUS .  143) (MINUS .  142) (ABS .  
145) (NOT .  148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (WHEN . (identifier_opt . 0)) (SEMICOLON . 
(identifier_opt . 0)) (IDENTIFIER .  691))
-      ((default . error) (LOOP . (iterator_specification_opt . 0)) (IDENTIFIER 
.  600))
-      ((default . error) (IDENTIFIER .  688))
-      ((default . error) (THEN . (expression_opt . 0)) (PLUS .  143) (MINUS .  
142) (ABS .  145) (NOT .  148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (END . (sequence_of_statements_opt . 0)) (ACCEPT . 
(label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . 
(label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) (LOOP . 
(label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . 
(label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . 
(label_opt . 0)) (ABORT . (label_opt . 0)) (DELAY . (label_opt . 0)) (EXIT . 
(label_opt . 0)) (GOTO . (label_opt [...]
-      ((default . error) (SEMICOLON .  685))
-      ((default . error) (SEMICOLON .  683) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (SEMICOLON .  677) (DO . 
(extended_return_object_declaration_opt . 0)) (PLUS .  143) (MINUS .  142) (ABS 
.  145) (NOT .  148) (NULL .  149) (NEW .  147) (IDENTIFIER .  678) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (ELSE . (select_alternative_list_opt . 0)) (END . 
(select_alternative_list_opt . 0)) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (DELAY .  614) (WHEN .  666) (TERMINATE .  665) (ACCEPT 
.  609))
-      ((default . error) (LOOP . (expression_opt . 0)) (PLUS .  143) (MINUS .  
142) (ABS .  145) (NOT .  148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (WHEN .  714))
+      ((default . error) (OF .  713) (COLON .  711) (IN .  712))
+      ((default . error) (EQUAL_GREATER .  710))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (IS . (aspect_specification_opt . 0)) (WITH .  108))
+      ((default . error) (IS . (aspect_specification_opt . 0)) (WITH .  108))
+      ((default . error) (IS .  134))
+      ((default . error) (IDENTIFIER .  705))
+      ((default . error) (COLON .  704))
+      ((default . error) (IDENTIFIER .  703))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (END . (sequence_of_statements_opt . 0)) (EXCEPTION . 
(sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . (label_opt . 0)) (ABORT 
. (label_opt . 0)) (DELAY . (label_opt .  [...]
+      ((default . error) (IS . (expression_opt . 0)) (PLUS .  144) (MINUS .  
143) (ABS .  146) (NOT .  149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (BEGIN . (declarative_part_opt . 0)) (USE .  11) 
(SUBTYPE .  292) (PRAGMA .  7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(ENTRY . (overriding_indicator_opt . 2)) (FOR .  289) (IDENTIFIER .  288) (TYPE 
.  294) (GENERIC .  2) (PROTECTED .  291) (TASK .  293) (PACKAGE .  290))
+      ((default . error) (UNTIL .  697) (PLUS .  144) (MINUS .  143) (ABS .  
146) (NOT .  149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (WHEN . (identifier_opt . 0)) (SEMICOLON . 
(identifier_opt . 0)) (IDENTIFIER .  695))
+      ((default . error) (LOOP . (iterator_specification_opt . 0)) (IDENTIFIER 
.  604))
+      ((default . error) (IDENTIFIER .  692))
+      ((default . error) (THEN . (expression_opt . 0)) (PLUS .  144) (MINUS .  
143) (ABS .  146) (NOT .  149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (END . (sequence_of_statements_opt . 0)) (ACCEPT . 
(label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . 
(label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) (LOOP . 
(label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . 
(label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . 
(label_opt . 0)) (ABORT . (label_opt . 0)) (DELAY . (label_opt . 0)) (EXIT . 
(label_opt . 0)) (GOTO . (label_opt [...]
+      ((default . error) (SEMICOLON .  689))
+      ((default . error) (SEMICOLON .  687) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (SEMICOLON .  681) (DO . 
(extended_return_object_declaration_opt . 0)) (PLUS .  144) (MINUS .  143) (ABS 
.  146) (NOT .  149) (NULL .  150) (NEW .  148) (IDENTIFIER .  682) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (ELSE . (select_alternative_list_opt . 0)) (END . 
(select_alternative_list_opt . 0)) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (DELAY .  618) (WHEN .  670) (TERMINATE .  669) (ACCEPT 
.  613))
+      ((default . error) (LOOP . (expression_opt . 0)) (PLUS .  144) (MINUS .  
143) (ABS .  146) (NOT .  149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (OR . (compound_statement . 5)) (THEN . 
(compound_statement . 5)) (WHEN . (compound_statement . 5)) (EXCEPTION . 
(compound_statement . 5)) (END . (compound_statement . 5)) (LESS_LESS . 
(compound_statement . 5)) (IDENTIFIER . (compound_statement . 5)) 
(STRING_LITERAL . (compound_statement . 5)) (CHARACTER_LITERAL . 
(compound_statement . 5)) (ACCEPT . (compound_statement . 5)) (ABORT . 
(compound_statement . 5)) (BEGIN . (compound_statement . 5)) (CASE . 
(compound_s [...]
       ((default . error) (OR . (simple_statement . 1)) (THEN . 
(simple_statement . 1)) (WHEN . (simple_statement . 1)) (EXCEPTION . 
(simple_statement . 1)) (END . (simple_statement . 1)) (LESS_LESS . 
(simple_statement . 1)) (IDENTIFIER . (simple_statement . 1)) (STRING_LITERAL . 
(simple_statement . 1)) (CHARACTER_LITERAL . (simple_statement . 1)) (ACCEPT . 
(simple_statement . 1)) (ABORT . (simple_statement . 1)) (BEGIN . 
(simple_statement . 1)) (CASE . (simple_statement . 1)) (DECLARE .  [...]
       ((default . error) (OR . (select_statement . 3)) (THEN . 
(select_statement . 3)) (WHEN . (select_statement . 3)) (EXCEPTION . 
(select_statement . 3)) (END . (select_statement . 3)) (LESS_LESS . 
(select_statement . 3)) (IDENTIFIER . (select_statement . 3)) (STRING_LITERAL . 
(select_statement . 3)) (CHARACTER_LITERAL . (select_statement . 3)) (ACCEPT . 
(select_statement . 3)) (ABORT . (select_statement . 3)) (BEGIN . 
(select_statement . 3)) (CASE . (select_statement . 3)) (DECLARE .  [...]
@@ -2296,710 +2323,720 @@
       ((default . error) (OR . (simple_statement . 7)) (THEN . 
(simple_statement . 7)) (WHEN . (simple_statement . 7)) (EXCEPTION . 
(simple_statement . 7)) (END . (simple_statement . 7)) (LESS_LESS . 
(simple_statement . 7)) (IDENTIFIER . (simple_statement . 7)) (STRING_LITERAL . 
(simple_statement . 7)) (CHARACTER_LITERAL . (simple_statement . 7)) (ACCEPT . 
(simple_statement . 7)) (ABORT . (simple_statement . 7)) (BEGIN . 
(simple_statement . 7)) (CASE . (simple_statement . 7)) (DECLARE .  [...]
       ((default . error) (OR . (simple_statement . 2)) (THEN . 
(simple_statement . 2)) (WHEN . (simple_statement . 2)) (EXCEPTION . 
(simple_statement . 2)) (END . (simple_statement . 2)) (LESS_LESS . 
(simple_statement . 2)) (IDENTIFIER . (simple_statement . 2)) (STRING_LITERAL . 
(simple_statement . 2)) (CHARACTER_LITERAL . (simple_statement . 2)) (ACCEPT . 
(simple_statement . 2)) (ABORT . (simple_statement . 2)) (BEGIN . 
(simple_statement . 2)) (CASE . (simple_statement . 2)) (DECLARE .  [...]
       ((default . error) (OR . (compound_statement . 4)) (THEN . 
(compound_statement . 4)) (WHEN . (compound_statement . 4)) (EXCEPTION . 
(compound_statement . 4)) (END . (compound_statement . 4)) (LESS_LESS . 
(compound_statement . 4)) (IDENTIFIER . (compound_statement . 4)) 
(STRING_LITERAL . (compound_statement . 4)) (CHARACTER_LITERAL . 
(compound_statement . 4)) (ACCEPT . (compound_statement . 4)) (ABORT . 
(compound_statement . 4)) (BEGIN . (compound_statement . 4)) (CASE . 
(compound_s [...]
-      ((default . error) (END .  663))
+      ((default . error) (END .  667))
       ((default . error) (OR . (compound_statement . 0)) (THEN . 
(compound_statement . 0)) (WHEN . (compound_statement . 0)) (EXCEPTION . 
(compound_statement . 0)) (END . (compound_statement . 0)) (LESS_LESS . 
(compound_statement . 0)) (IDENTIFIER . (compound_statement . 0)) 
(STRING_LITERAL . (compound_statement . 0)) (CHARACTER_LITERAL . 
(compound_statement . 0)) (ACCEPT . (compound_statement . 0)) (ABORT . 
(compound_statement . 0)) (BEGIN . (compound_statement . 0)) (CASE . 
(compound_s [...]
-      ((default . error) (LOOP .  662))
-      ((default . error) (NULL .  620) (GOTO .  617) (ABORT .  610) (ACCEPT .  
609) (DECLARE .  613) (BEGIN .  611) (LOOP .  619) (CASE .  612) (IF .  618) 
(PRAGMA .  7) (RAISE .  621) (DELAY .  614) (REQUEUE .  622) (RETURN .  623) 
(EXIT .  615) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) (STRING_LITERAL .  
48) (WHILE .  625) (FOR .  616) (SELECT .  624))
+      ((default . error) (LOOP .  666))
+      ((default . error) (NULL .  624) (GOTO .  621) (ABORT .  614) (ACCEPT .  
613) (DECLARE .  617) (BEGIN .  615) (LOOP .  623) (CASE .  616) (IF .  622) 
(PRAGMA .  7) (RAISE .  625) (DELAY .  618) (REQUEUE .  626) (RETURN .  627) 
(EXIT .  619) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) (STRING_LITERAL .  
49) (WHILE .  629) (FOR .  620) (SELECT .  628))
       ((default . error) (OR . (compound_statement . 2)) (THEN . 
(compound_statement . 2)) (WHEN . (compound_statement . 2)) (EXCEPTION . 
(compound_statement . 2)) (END . (compound_statement . 2)) (LESS_LESS . 
(compound_statement . 2)) (IDENTIFIER . (compound_statement . 2)) 
(STRING_LITERAL . (compound_statement . 2)) (CHARACTER_LITERAL . 
(compound_statement . 2)) (ACCEPT . (compound_statement . 2)) (ABORT . 
(compound_statement . 2)) (BEGIN . (compound_statement . 2)) (CASE . 
(compound_s [...]
-      ((default . error) (DOT .  86) (SEMICOLON .  659) (TICK .  87) 
(COLON_EQUAL .  658) (LEFT_PAREN .  105))
+      ((default . error) (DOT .  87) (SEMICOLON .  663) (TICK .  88) 
(COLON_EQUAL .  662) (LEFT_PAREN .  106))
       ((default . error) (OR . (simple_statement . 10)) (THEN . 
(simple_statement . 10)) (WHEN . (simple_statement . 10)) (EXCEPTION . 
(simple_statement . 10)) (END . (simple_statement . 10)) (LESS_LESS . 
(simple_statement . 10)) (IDENTIFIER . (simple_statement . 10)) (STRING_LITERAL 
. (simple_statement . 10)) (CHARACTER_LITERAL . (simple_statement . 10)) 
(ACCEPT . (simple_statement . 10)) (ABORT . (simple_statement . 10)) (BEGIN . 
(simple_statement . 10)) (CASE . (simple_statement . 10) [...]
       ((default . error) (OR . (simple_statement . 4)) (THEN . 
(simple_statement . 4)) (WHEN . (simple_statement . 4)) (EXCEPTION . 
(simple_statement . 4)) (END . (simple_statement . 4)) (LESS_LESS . 
(simple_statement . 4)) (IDENTIFIER . (simple_statement . 4)) (STRING_LITERAL . 
(simple_statement . 4)) (CHARACTER_LITERAL . (simple_statement . 4)) (ACCEPT . 
(simple_statement . 4)) (ABORT . (simple_statement . 4)) (BEGIN . 
(simple_statement . 4)) (CASE . (simple_statement . 4)) (DECLARE .  [...]
       ((default . error) (OR . (simple_statement . 9)) (THEN . 
(simple_statement . 9)) (WHEN . (simple_statement . 9)) (EXCEPTION . 
(simple_statement . 9)) (END . (simple_statement . 9)) (LESS_LESS . 
(simple_statement . 9)) (IDENTIFIER . (simple_statement . 9)) (STRING_LITERAL . 
(simple_statement . 9)) (CHARACTER_LITERAL . (simple_statement . 9)) (ACCEPT . 
(simple_statement . 9)) (ABORT . (simple_statement . 9)) (BEGIN . 
(simple_statement . 9)) (CASE . (simple_statement . 9)) (DECLARE .  [...]
       ((default . error) (OR . (simple_statement . 6)) (THEN . 
(simple_statement . 6)) (WHEN . (simple_statement . 6)) (EXCEPTION . 
(simple_statement . 6)) (END . (simple_statement . 6)) (LESS_LESS . 
(simple_statement . 6)) (IDENTIFIER . (simple_statement . 6)) (STRING_LITERAL . 
(simple_statement . 6)) (CHARACTER_LITERAL . (simple_statement . 6)) (ACCEPT . 
(simple_statement . 6)) (ABORT . (simple_statement . 6)) (BEGIN . 
(simple_statement . 6)) (CASE . (simple_statement . 6)) (DECLARE .  [...]
       ((default . error) (OR . (select_statement . 0)) (THEN . 
(select_statement . 0)) (WHEN . (select_statement . 0)) (EXCEPTION . 
(select_statement . 0)) (END . (select_statement . 0)) (LESS_LESS . 
(select_statement . 0)) (IDENTIFIER . (select_statement . 0)) (STRING_LITERAL . 
(select_statement . 0)) (CHARACTER_LITERAL . (select_statement . 0)) (ACCEPT . 
(select_statement . 0)) (ABORT . (select_statement . 0)) (BEGIN . 
(select_statement . 0)) (CASE . (select_statement . 0)) (DECLARE .  [...]
       ((default . error) (OR . (compound_statement . 6)) (THEN . 
(compound_statement . 6)) (WHEN . (compound_statement . 6)) (EXCEPTION . 
(compound_statement . 6)) (END . (compound_statement . 6)) (LESS_LESS . 
(compound_statement . 6)) (IDENTIFIER . (compound_statement . 6)) 
(STRING_LITERAL . (compound_statement . 6)) (CHARACTER_LITERAL . 
(compound_statement . 6)) (ACCEPT . (compound_statement . 6)) (ABORT . 
(compound_statement . 6)) (BEGIN . (compound_statement . 6)) (CASE . 
(compound_s [...]
-      ((default . error) (WHEN . (sequence_of_statements_opt . 1)) (THEN . 
(sequence_of_statements_opt . 1)) (OR . (sequence_of_statements_opt . 1)) 
(ELSIF . (sequence_of_statements_opt . 1)) (ELSE . (sequence_of_statements_opt 
. 1)) (END . (sequence_of_statements_opt . 1)) (EXCEPTION . 
(sequence_of_statements_opt . 1)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_op [...]
-      ((default . error) (END . (handled_sequence_of_statements . 1)) 
(EXCEPTION .  656))
+      ((default . error) (WHEN . (sequence_of_statements_opt . 1)) (THEN . 
(sequence_of_statements_opt . 1)) (OR . (sequence_of_statements_opt . 1)) 
(ELSIF . (sequence_of_statements_opt . 1)) (ELSE . (sequence_of_statements_opt 
. 1)) (END . (sequence_of_statements_opt . 1)) (EXCEPTION . 
(sequence_of_statements_opt . 1)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_op [...]
+      ((default . error) (END . (handled_sequence_of_statements . 1)) 
(EXCEPTION .  660))
       ((default . error) (OR . (simple_statement . 5)) (THEN . 
(simple_statement . 5)) (WHEN . (simple_statement . 5)) (EXCEPTION . 
(simple_statement . 5)) (END . (simple_statement . 5)) (LESS_LESS . 
(simple_statement . 5)) (IDENTIFIER . (simple_statement . 5)) (STRING_LITERAL . 
(simple_statement . 5)) (CHARACTER_LITERAL . (simple_statement . 5)) (ACCEPT . 
(simple_statement . 5)) (ABORT . (simple_statement . 5)) (BEGIN . 
(simple_statement . 5)) (CASE . (simple_statement . 5)) (DECLARE .  [...]
       ((default . error) (WHEN . (sequence_of_statements . 0)) (THEN . 
(sequence_of_statements . 0)) (OR . (sequence_of_statements . 0)) (ELSIF . 
(sequence_of_statements . 0)) (ELSE . (sequence_of_statements . 0)) (EXCEPTION 
. (sequence_of_statements . 0)) (END . (sequence_of_statements . 0)) (LESS_LESS 
. (sequence_of_statements . 0)) (IDENTIFIER . (sequence_of_statements . 0)) 
(STRING_LITERAL . (sequence_of_statements . 0)) (CHARACTER_LITERAL . 
(sequence_of_statements . 0)) (ACCEPT . (s [...]
       ((default . error) (OR . (select_statement . 1)) (THEN . 
(select_statement . 1)) (WHEN . (select_statement . 1)) (EXCEPTION . 
(select_statement . 1)) (END . (select_statement . 1)) (LESS_LESS . 
(select_statement . 1)) (IDENTIFIER . (select_statement . 1)) (STRING_LITERAL . 
(select_statement . 1)) (CHARACTER_LITERAL . (select_statement . 1)) (ACCEPT . 
(select_statement . 1)) (ABORT . (select_statement . 1)) (BEGIN . 
(select_statement . 1)) (CASE . (select_statement . 1)) (DECLARE .  [...]
-      ((default . error) (SEMICOLON .  655))
-      ((default . error) (SEMICOLON .  654))
+      ((default . error) (SEMICOLON .  659))
+      ((default . error) (SEMICOLON .  658))
       ((default . error) (TYPE . (generic_instantiation . 2)) (TASK . 
(generic_instantiation . 2)) (SUBTYPE . (generic_instantiation . 2)) (PROTECTED 
. (generic_instantiation . 2)) (FOR . (generic_instantiation . 2)) (ENTRY . 
(generic_instantiation . 2)) (IDENTIFIER . (generic_instantiation . 2)) (BEGIN 
. (generic_instantiation . 2)) (END . (generic_instantiation . 2)) (WITH . 
(generic_instantiation . 2)) (USE . (generic_instantiation . 2)) (SEPARATE . 
(generic_instantiation . 2)) (PROCE [...]
       ((default . error) (TYPE . (generic_instantiation . 1)) (TASK . 
(generic_instantiation . 1)) (SUBTYPE . (generic_instantiation . 1)) (PROTECTED 
. (generic_instantiation . 1)) (FOR . (generic_instantiation . 1)) (ENTRY . 
(generic_instantiation . 1)) (IDENTIFIER . (generic_instantiation . 1)) (BEGIN 
. (generic_instantiation . 1)) (END . (generic_instantiation . 1)) (WITH . 
(generic_instantiation . 1)) (USE . (generic_instantiation . 1)) (SEPARATE . 
(generic_instantiation . 1)) (PROCE [...]
-      ((default . error) (END . (exception_handler_list_opt . 0)) (WHEN .  
920))
+      ((default . error) (END . (exception_handler_list_opt . 0)) (WHEN .  
930))
       ((default . error) (OR . (sequence_of_statements . 1)) (THEN . 
(sequence_of_statements . 1)) (WHEN . (sequence_of_statements . 1)) (WHILE . 
(sequence_of_statements . 1)) (SELECT . (sequence_of_statements . 1)) (RETURN . 
(sequence_of_statements . 1)) (REQUEUE . (sequence_of_statements . 1)) (RAISE . 
(sequence_of_statements . 1)) (PRAGMA . (sequence_of_statements . 1)) (NULL . 
(sequence_of_statements . 1)) (LOOP . (sequence_of_statements . 1)) (IF . 
(sequence_of_statements . 1)) (GOT [...]
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (WHEN . (procedure_call_statement . 0)) (OR . 
(procedure_call_statement . 0)) (THEN . (procedure_call_statement . 0)) (ELSIF 
. (procedure_call_statement . 0)) (ELSE . (procedure_call_statement . 0)) 
(WHILE . (procedure_call_statement . 0)) (SELECT . (procedure_call_statement . 
0)) (RETURN . (procedure_call_statement . 0)) (REQUEUE . 
(procedure_call_statement . 0)) (RAISE . (procedure_call_statement . 0)) 
(PRAGMA . (procedure_call_statement . 0)) (NULL . (procedur [...]
       ((default . error) (OR . (statement . 1)) (THEN . (statement . 1)) (WHEN 
. (statement . 1)) (EXCEPTION . (statement . 1)) (END . (statement . 1)) 
(LESS_LESS . (statement . 1)) (IDENTIFIER . (statement . 1)) (STRING_LITERAL . 
(statement . 1)) (CHARACTER_LITERAL . (statement . 1)) (ACCEPT . (statement . 
1)) (ABORT . (statement . 1)) (BEGIN . (statement . 1)) (CASE . (statement . 
1)) (DECLARE . (statement . 1)) (DELAY . (statement . 1)) (EXIT . (statement . 
1)) (FOR . (statement . 1)) [...]
       ((default . error) (OR . (statement . 0)) (THEN . (statement . 0)) (WHEN 
. (statement . 0)) (EXCEPTION . (statement . 0)) (END . (statement . 0)) 
(LESS_LESS . (statement . 0)) (IDENTIFIER . (statement . 0)) (STRING_LITERAL . 
(statement . 0)) (CHARACTER_LITERAL . (statement . 0)) (ACCEPT . (statement . 
0)) (ABORT . (statement . 0)) (BEGIN . (statement . 0)) (CASE . (statement . 
0)) (DECLARE . (statement . 0)) (DELAY . (statement . 0)) (EXIT . (statement . 
0)) (FOR . (statement . 0)) [...]
-      ((default . error) (END . (sequence_of_statements_opt . 0)) (ACCEPT . 
(label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . 
(label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) (LOOP . 
(label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . 
(label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . 
(label_opt . 0)) (ABORT . (label_opt . 0)) (DELAY . (label_opt . 0)) (EXIT . 
(label_opt . 0)) (GOTO . (label_opt [...]
-      ((default . error) (SEMICOLON . (name_opt . 0)) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48))
+      ((default . error) (END . (sequence_of_statements_opt . 0)) (ACCEPT . 
(label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . 
(label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) (LOOP . 
(label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . 
(label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . 
(label_opt . 0)) (ABORT . (label_opt . 0)) (DELAY . (label_opt . 0)) (EXIT . 
(label_opt . 0)) (GOTO . (label_opt [...]
+      ((default . error) (SEMICOLON . (name_opt . 0)) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49))
       ((default . error) (LOOP . (iteration_scheme . 0)))
-      ((default . error) (SEMICOLON .  916))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (END . (sequence_of_statements_opt . 0)) (OR . 
(sequence_of_statements_opt . 0)) (ELSE . (sequence_of_statements_opt . 0)) 
(ACCEPT . (label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) 
(DECLARE . (label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) 
(LOOP . (label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) 
(WHILE . (label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL 
. (label_opt . 0)) (ABORT . (lab [...]
+      ((default . error) (SEMICOLON .  926))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (END . (sequence_of_statements_opt . 0)) (OR . 
(sequence_of_statements_opt . 0)) (ELSE . (sequence_of_statements_opt . 0)) 
(ACCEPT . (label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) 
(DECLARE . (label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) 
(LOOP . (label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) 
(WHILE . (label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL 
. (label_opt . 0)) (ABORT . (lab [...]
       ((default . error) (ELSE . (select_alternative . 3)) (OR . 
(select_alternative . 3)) (END . (select_alternative . 3)))
-      ((default . error) (OR . (sequence_of_statements_opt . 0)) (END . 
(sequence_of_statements_opt . 0)) (ELSE . (sequence_of_statements_opt . 0)) 
(THEN . (sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTE [...]
-      ((default . error) (ELSE .  911) (OR .  912))
-      ((default . error) (DOT .  86) (SEMICOLON .  659) (TICK .  87) (OR . 
(sequence_of_statements_opt . 0)) (ELSE . (sequence_of_statements_opt . 0)) 
(THEN . (sequence_of_statements_opt . 0)) (LEFT_PAREN .  105) (ACCEPT . 
(label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . 
(label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) (LOOP . 
(label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . 
(label_opt . 0)) (STRING_LITERAL . (la [...]
-      ((default . error) (OR . (sequence_of_statements_opt . 0)) (ELSE . 
(sequence_of_statements_opt . 0)) (THEN . (sequence_of_statements_opt . 0)) 
(ACCEPT . (label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) 
(DECLARE . (label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) 
(LOOP . (label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) 
(WHILE . (label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL 
. (label_opt . 0)) (ABORT . (la [...]
+      ((default . error) (OR . (sequence_of_statements_opt . 0)) (END . 
(sequence_of_statements_opt . 0)) (ELSE . (sequence_of_statements_opt . 0)) 
(THEN . (sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTE [...]
+      ((default . error) (ELSE .  921) (OR .  922))
+      ((default . error) (DOT .  87) (SEMICOLON .  663) (TICK .  88) (OR . 
(sequence_of_statements_opt . 0)) (ELSE . (sequence_of_statements_opt . 0)) 
(THEN . (sequence_of_statements_opt . 0)) (LEFT_PAREN .  106) (ACCEPT . 
(label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . 
(label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) (LOOP . 
(label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . 
(label_opt . 0)) (STRING_LITERAL . (la [...]
+      ((default . error) (OR . (sequence_of_statements_opt . 0)) (ELSE . 
(sequence_of_statements_opt . 0)) (THEN . (sequence_of_statements_opt . 0)) 
(ACCEPT . (label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) 
(DECLARE . (label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) 
(LOOP . (label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) 
(WHILE . (label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL 
. (label_opt . 0)) (ABORT . (la [...]
       ((default . error) (ELSE . (select_alternative_list . 0)) (END . 
(select_alternative_list . 0)) (OR . (select_alternative_list . 0)))
-      ((default . error) (ELSE . (select_alternative_list_opt . 1)) (END . 
(select_alternative_list_opt . 1)) (OR .  908))
-      ((default . error) (ELSE .  906) (END .  907))
-      ((default . error) (THEN .  905))
+      ((default . error) (ELSE . (select_alternative_list_opt . 1)) (END . 
(select_alternative_list_opt . 1)) (OR .  918))
+      ((default . error) (ELSE .  916) (END .  917))
+      ((default . error) (THEN .  915))
       ((default . error) (WHEN . (simple_return_statement . 0)) (THEN . 
(simple_return_statement . 0)) (OR . (simple_return_statement . 0)) (ELSIF . 
(simple_return_statement . 0)) (ELSE . (simple_return_statement . 0)) (WHILE . 
(simple_return_statement . 0)) (SELECT . (simple_return_statement . 0)) (RETURN 
. (simple_return_statement . 0)) (REQUEUE . (simple_return_statement . 0)) 
(RAISE . (simple_return_statement . 0)) (PRAGMA . (simple_return_statement . 
0)) (NULL . (simple_return_state [...]
-      ((default . error) (COLON .  904) (STAR_STAR . (name . 0)) (REM . (name 
. 0)) (MOD . (name . 0)) (STAR . (name . 0)) (SLASH . (name . 0)) (SEMICOLON . 
(name . 0)) (SLASH_EQUAL . (name . 0)) (LESS_EQUAL . (name . 0)) (LESS . (name 
. 0)) (GREATER_EQUAL . (name . 0)) (GREATER . (name . 0)) (EQUAL . (name . 0)) 
(NOT . (name . 0)) (IN . (name . 0)) (AMPERSAND . (name . 0)) (MINUS . (name . 
0)) (PLUS . (name . 0)) (LEFT_PAREN . (name . 0)) (AND . (name . 0)) (OR . 
(name . 0)) (XOR . (nam [...]
-      ((default . error) (SEMICOLON .  903))
-      ((default . error) (DO . (extended_return_object_declaration_opt . 1)) 
(SEMICOLON .  902))
-      ((default . error) (DO .  901))
-      ((default . error) (WITH .  900) (DOT .  86) (TICK .  87) (SEMICOLON .  
899) (LEFT_PAREN .  105))
+      ((default . error) (COLON .  914) (STAR_STAR . (name . 0)) (REM . (name 
. 0)) (MOD . (name . 0)) (STAR . (name . 0)) (SLASH . (name . 0)) (SEMICOLON . 
(name . 0)) (SLASH_EQUAL . (name . 0)) (LESS_EQUAL . (name . 0)) (LESS . (name 
. 0)) (GREATER_EQUAL . (name . 0)) (GREATER . (name . 0)) (EQUAL . (name . 0)) 
(NOT . (name . 0)) (IN . (name . 0)) (AMPERSAND . (name . 0)) (MINUS . (name . 
0)) (PLUS . (name . 0)) (LEFT_PAREN . (name . 0)) (AND . (name . 0)) (OR . 
(name . 0)) (XOR . (nam [...]
+      ((default . error) (SEMICOLON .  913))
+      ((default . error) (DO . (extended_return_object_declaration_opt . 1)) 
(SEMICOLON .  912))
+      ((default . error) (DO .  911))
+      ((default . error) (WITH .  910) (DOT .  87) (TICK .  88) (SEMICOLON .  
909) (LEFT_PAREN .  106))
       ((default . error) (WHEN . (raise_statement . 0)) (THEN . 
(raise_statement . 0)) (OR . (raise_statement . 0)) (ELSIF . (raise_statement . 
0)) (ELSE . (raise_statement . 0)) (WHILE . (raise_statement . 0)) (SELECT . 
(raise_statement . 0)) (RETURN . (raise_statement . 0)) (REQUEUE . 
(raise_statement . 0)) (RAISE . (raise_statement . 0)) (PRAGMA . 
(raise_statement . 0)) (NULL . (raise_statement . 0)) (LOOP . (raise_statement 
. 0)) (IF . (raise_statement . 0)) (GOTO . (raise_statement  [...]
-      ((default . error) (WITH .  898) (DOT .  86) (TICK .  87) (SEMICOLON .  
897) (LEFT_PAREN .  105))
+      ((default . error) (WITH .  908) (DOT .  87) (TICK .  88) (SEMICOLON .  
907) (LEFT_PAREN .  106))
       ((default . error) (WHEN . (simple_statement . 0)) (THEN . 
(simple_statement . 0)) (OR . (simple_statement . 0)) (ELSIF . 
(simple_statement . 0)) (ELSE . (simple_statement . 0)) (WHILE . 
(simple_statement . 0)) (SELECT . (simple_statement . 0)) (RETURN . 
(simple_statement . 0)) (REQUEUE . (simple_statement . 0)) (RAISE . 
(simple_statement . 0)) (PRAGMA . (simple_statement . 0)) (NULL . 
(simple_statement . 0)) (LOOP . (simple_statement . 0)) (IF . (simple_statement 
. 0)) (GOTO . (si [...]
-      ((default . error) (END .  896))
-      ((default . error) (THEN .  895))
-      ((default . error) (SEMICOLON .  894))
+      ((default . error) (END .  906))
+      ((default . error) (THEN .  905))
+      ((default . error) (SEMICOLON .  904))
       ((default . error) (LOOP . (iterator_specification_opt . 1)))
       ((default . error) (LOOP . (iteration_scheme . 1)))
       ((default . error) (WHEN . (identifier_opt . 1)) (SEMICOLON . 
(identifier_opt . 1)))
-      ((default . error) (WHEN .  893) (SEMICOLON .  892))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (SEMICOLON .  890))
-      ((default . error) (BEGIN .  889))
-      ((default . error) (IS .  888))
-      ((default . error) (END .  887))
-      ((default . error) (DOT .  86) (TICK .  87) (SEMICOLON .  886) 
(LEFT_PAREN .  105))
-      ((default . error) (SEMICOLON . (actual_parameter_part_opt . 0)) (DO . 
(actual_parameter_part_opt . 0)) (LEFT_PAREN . ((actual_parameter_part_opt . 0) 
 883)))
+      ((default . error) (WHEN .  903) (SEMICOLON .  902))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (SEMICOLON .  900))
+      ((default . error) (BEGIN .  899))
+      ((default . error) (IS .  898))
+      ((default . error) (END .  897))
+      ((default . error) (DOT .  87) (TICK .  88) (SEMICOLON .  896) 
(LEFT_PAREN .  106))
+      ((default . error) (SEMICOLON . (actual_parameter_part_opt . 0)) (DO . 
(actual_parameter_part_opt . 0)) (LEFT_PAREN . ((actual_parameter_part_opt . 0) 
 893)))
       ((default . error) (REQUEUE . (label_opt . 2)) (RAISE . (label_opt . 2)) 
(PRAGMA . (label_opt . 2)) (NULL . (label_opt . 2)) (GOTO . (label_opt . 2)) 
(EXIT . (label_opt . 2)) (DELAY . (label_opt . 2)) (ABORT . (label_opt . 2)) 
(CHARACTER_LITERAL . (label_opt . 2)) (STRING_LITERAL . (label_opt . 2)) 
(IDENTIFIER . (label_opt . 2)) (WHILE . (label_opt . 2)) (SELECT . (label_opt . 
2)) (RETURN . (label_opt . 2)) (LOOP . (label_opt . 2)) (IF . (label_opt . 2)) 
(FOR . (label_opt . 2)) (DE [...]
-      ((default . error) (GREATER_GREATER .  882))
-      ((default . error) (IS .  881))
-      ((default . error) (IS .  880))
+      ((default . error) (GREATER_GREATER .  892))
+      ((default . error) (IS .  891))
+      ((default . error) (IS .  890))
       ((default . error) (COMMA . (pragma_argument_association . 2)) 
(RIGHT_PAREN . (pragma_argument_association . 2)))
-      ((default . error) (ELSE .  876) (RIGHT_PAREN . (if_expression . 3)) 
(ELSIF .  877))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (NOT .  730) (IDENTIFIER .  47) (CHARACTER_LITERAL .  
49) (STRING_LITERAL .  48))
-      ((default . error) (REVERSE .  872) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (PLUS .  143) (MINUS .  142) 
(ABS .  145) (NOT .  752) (NULL .  149) (NEW .  147) (LEFT_PAREN .  146))
-      ((default . error) (REVERSE .  870) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48))
-      ((default . error) (EQUAL_GREATER . (discrete_choice_list . 0)) (BAR . 
(discrete_choice_list . 0)) (OTHERS .  171) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (PLUS .  143) (MINUS .  142) 
(ABS .  145) (NOT .  170) (NULL .  149) (NEW .  147) (LEFT_PAREN .  146))
+      ((default . error) (ELSE .  886) (RIGHT_PAREN . (if_expression . 3)) 
(ELSIF .  887))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (NOT .  736) (IDENTIFIER .  48) (CHARACTER_LITERAL .  
50) (STRING_LITERAL .  49))
+      ((default . error) (REVERSE .  882) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (PLUS .  144) (MINUS .  143) 
(ABS .  146) (NOT .  758) (NULL .  150) (NEW .  148) (LEFT_PAREN .  147))
+      ((default . error) (REVERSE .  880) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49))
+      ((default . error) (EQUAL_GREATER . (discrete_choice_list . 0)) (BAR . 
(discrete_choice_list . 0)) (OTHERS .  172) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (PLUS .  144) (MINUS .  143) 
(ABS .  146) (NOT .  171) (NULL .  150) (NEW .  148) (LEFT_PAREN .  147))
       ((default . error) (RIGHT_PAREN . (case_expression_alternative_list . 
0)) (COMMA . (case_expression_alternative_list . 0)))
-      ((default . error) (COMMA .  868) (RIGHT_PAREN . (case_expression . 0)))
-      ((default . error) (SEMICOLON .  867))
-      ((default . error) (END .  866))
-      ((default . error) (IDENTIFIER .  212) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  752) 
(NULL .  149) (NEW .  147) (LEFT_PAREN .  146))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
+      ((default . error) (COMMA .  878) (RIGHT_PAREN . (case_expression . 0)))
+      ((default . error) (SEMICOLON .  877))
+      ((default . error) (END .  876))
+      ((default . error) (IDENTIFIER .  213) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  758) 
(NULL .  150) (NEW .  148) (LEFT_PAREN .  147))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
+      ((default . error) (CASE .  366) (IF .  368) (PLUS .  144) (MINUS .  
143) (ABS .  146) (NOT .  149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
       ((default . error) (ARRAY . (constant_opt . 1)) (IDENTIFIER . 
(constant_opt . 1)) (STRING_LITERAL . (constant_opt . 1)) (CHARACTER_LITERAL . 
(constant_opt . 1)) (ACCESS . (constant_opt . 1)) (NOT . (constant_opt . 1)))
-      ((default . error) (ARRAY .  477) (IDENTIFIER .  47) (CHARACTER_LITERAL 
.  49) (STRING_LITERAL .  48) (ACCESS . (null_exclusion_opt . 0)) (NOT .  856))
+      ((default . error) (ARRAY .  480) (IDENTIFIER .  48) (CHARACTER_LITERAL 
.  50) (STRING_LITERAL .  49) (ACCESS . (null_exclusion_opt . 0)) (NOT .  862))
       ((default . error) (USE . (exception_declaration . 0)) (TYPE . 
(exception_declaration . 0)) (TASK . (exception_declaration . 0)) (SUBTYPE . 
(exception_declaration . 0)) (PROTECTED . (exception_declaration . 0)) 
(PROCEDURE . (exception_declaration . 0)) (PRAGMA . (exception_declaration . 
0)) (PACKAGE . (exception_declaration . 0)) (OVERRIDING . 
(exception_declaration . 0)) (NOT . (exception_declaration . 0)) (GENERIC . 
(exception_declaration . 0)) (FUNCTION . (exception_declaration  [...]
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (SEMICOLON . (name_opt . 0)) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48))
-      ((default . error) (PRIVATE . (abstract_tagged_limited_opt . 0)) (NULL . 
(abstract_tagged_limited_opt . 0)) (RECORD . (abstract_tagged_limited_opt . 0)) 
(TAGGED .  843) (RANGE .  841) (MOD .  839) (DIGITS .  836) (DELTA .  835) 
(TASK .  488) (PROTECTED .  484) (SYNCHRONIZED .  486) (INTERFACE .  480) 
(ARRAY .  477) (LEFT_PAREN .  837) (ACCESS . (null_exclusion_opt . 0)) (NOT .  
207) (NEW . ((abstract_limited_synchronized_opt . 0) (abstract_limited_opt . 
0))) (LIMITED .  838) (ABSTR [...]
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (SEMICOLON . (name_opt . 0)) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49))
+      ((default . error) (PRIVATE . (abstract_tagged_limited_opt . 0)) (NULL . 
(abstract_tagged_limited_opt . 0)) (RECORD . (abstract_tagged_limited_opt . 0)) 
(TAGGED .  849) (RANGE .  847) (MOD .  845) (DIGITS .  842) (DELTA .  841) 
(TASK .  491) (PROTECTED .  487) (SYNCHRONIZED .  489) (INTERFACE .  483) 
(ARRAY .  480) (LEFT_PAREN .  843) (ACCESS . (null_exclusion_opt . 0)) (NOT .  
208) (NEW . ((abstract_limited_synchronized_opt . 0) (abstract_limited_opt . 
0))) (LIMITED .  844) (ABSTR [...]
       ((default . error) (BEGIN . (single_task_declaration . 2)) (IDENTIFIER . 
(single_task_declaration . 2)) (ENTRY . (single_task_declaration . 2)) (FOR . 
(single_task_declaration . 2)) (FUNCTION . (single_task_declaration . 2)) 
(GENERIC . (single_task_declaration . 2)) (NOT . (single_task_declaration . 2)) 
(OVERRIDING . (single_task_declaration . 2)) (PACKAGE . 
(single_task_declaration . 2)) (PRAGMA . (single_task_declaration . 2)) 
(PROCEDURE . (single_task_declaration . 2)) (PROTECTE [...]
-      ((default . error) (NEW .  831) (END . (declarative_part_opt . 0)) 
(PRIVATE . (declarative_part_opt . 0)) (USE .  11) (SUBTYPE .  291) (PRAGMA .  
7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . (overriding_indicator_opt . 2)) 
(PROCEDURE . (overriding_indicator_opt . 2)) (ENTRY . (overriding_indicator_opt 
. 2)) (FOR .  288) (IDENTIFIER .  287) (TYPE .  293) (GENERIC .  2) (PROTECTED 
.  290) (TASK .  292) (PACKAGE .  289))
-      ((default . error) (SEPARATE .  830))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (IS . 
(aspect_specification_opt . 0)) (WITH .  107))
-      ((default . error) (NULL .  828))
-      ((default . error) (DO . (subtype_indication . 3)) (OF . 
(subtype_indication . 3)) (AND . (subtype_indication . 3)) (SEMICOLON . 
(subtype_indication . 3)) (WITH . (subtype_indication . 3)) (COLON_EQUAL . 
(subtype_indication . 3)) (DOT .  86) (TICK .  87) (RANGE .  827) (LEFT_PAREN . 
 797))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
-      ((default . error) (NEW .  823) (END . (declarative_part_opt . 0)) 
(PRIVATE . (declarative_part_opt . 0)) (USE .  11) (SUBTYPE .  291) (PRAGMA .  
7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . (overriding_indicator_opt . 2)) 
(PROCEDURE . (overriding_indicator_opt . 2)) (ENTRY . (overriding_indicator_opt 
. 2)) (FOR .  288) (IDENTIFIER .  287) (TYPE .  293) (GENERIC .  2) (PROTECTED 
.  290) (TASK .  292) (PACKAGE .  289))
-      ((default . error) (SEPARATE .  822))
-      ((default . error) (IS . (aspect_specification_opt . 0)) (WITH .  107))
-      ((default . error) (SEPARATE .  820))
-      ((default . error) (SEMICOLON .  819))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (IDENTIFIER . (mod_clause_opt . 0)) (AT .  816))
-      ((default . error) (SEMICOLON .  815))
-      ((default . error) (SEMICOLON .  814))
-      ((default . error) (DOT .  86) (TICK .  87) (RENAMES .  813) (LEFT_PAREN 
.  105))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
+      ((default . error) (NEW .  837) (END . (declarative_part_opt . 0)) 
(PRIVATE . (declarative_part_opt . 0)) (USE .  11) (SUBTYPE .  292) (PRAGMA .  
7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . (overriding_indicator_opt . 2)) 
(PROCEDURE . (overriding_indicator_opt . 2)) (ENTRY . (overriding_indicator_opt 
. 2)) (FOR .  289) (IDENTIFIER .  288) (TYPE .  294) (GENERIC .  2) (PROTECTED 
.  291) (TASK .  293) (PACKAGE .  290))
+      ((default . error) (SEPARATE .  836))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (IS . 
(aspect_specification_opt . 0)) (WITH .  108))
+      ((default . error) (NULL .  834))
+      ((default . error) (DO . (subtype_indication . 3)) (OF . 
(subtype_indication . 3)) (AND . (subtype_indication . 3)) (SEMICOLON . 
(subtype_indication . 3)) (WITH . (subtype_indication . 3)) (COLON_EQUAL . 
(subtype_indication . 3)) (DOT .  87) (TICK .  88) (RANGE .  833) (LEFT_PAREN . 
 803))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
+      ((default . error) (NEW .  829) (END . (declarative_part_opt . 0)) 
(PRIVATE . (declarative_part_opt . 0)) (USE .  11) (SUBTYPE .  292) (PRAGMA .  
7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . (overriding_indicator_opt . 2)) 
(PROCEDURE . (overriding_indicator_opt . 2)) (ENTRY . (overriding_indicator_opt 
. 2)) (FOR .  289) (IDENTIFIER .  288) (TYPE .  294) (GENERIC .  2) (PROTECTED 
.  291) (TASK .  293) (PACKAGE .  290))
+      ((default . error) (SEPARATE .  828))
+      ((default . error) (IS . (aspect_specification_opt . 0)) (WITH .  108))
+      ((default . error) (SEPARATE .  826))
+      ((default . error) (SEMICOLON .  825))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (IDENTIFIER . (mod_clause_opt . 0)) (AT .  822))
+      ((default . error) (SEMICOLON .  821))
+      ((default . error) (SEMICOLON .  820))
+      ((default . error) (DOT .  87) (TICK .  88) (RENAMES .  819) (LEFT_PAREN 
.  106))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
       ((default . error) (XOR . (choice_relation . 0)) (OR . (choice_relation 
. 0)) (BAR . (choice_relation . 0)) (EQUAL_GREATER . (choice_relation . 0)) 
(AND . (choice_relation . 0)))
-      ((default . error) (RIGHT_PAREN .  810))
-      ((default . error) (DO . (membership_choice_list . 1)) (LOOP . 
(membership_choice_list . 1)) (COMMA . (membership_choice_list . 1)) 
(RIGHT_PAREN . (membership_choice_list . 1)) (ELSIF . (membership_choice_list . 
1)) (ELSE . (membership_choice_list . 1)) (EQUAL_GREATER . 
(membership_choice_list . 1)) (DIGITS . (membership_choice_list . 1)) (RANGE . 
(membership_choice_list . 1)) (THEN . (membership_choice_list . 1)) (SEMICOLON 
. (membership_choice_list . 1)) (WITH . (membership_choic [...]
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (ACCESS . (null_exclusion_opt . 1)) (IDENTIFIER .  
806) (CHARACTER_LITERAL .  49) (STRING_LITERAL .  48))
+      ((default . error) (RIGHT_PAREN .  816))
+      ((default . error) (DO . (membership_choice_list . 1)) (LOOP . 
(membership_choice_list . 1)) (COMMA . (membership_choice_list . 1)) (ELSIF . 
(membership_choice_list . 1)) (ELSE . (membership_choice_list . 1)) 
(EQUAL_GREATER . (membership_choice_list . 1)) (RIGHT_PAREN . 
(membership_choice_list . 1)) (DIGITS . (membership_choice_list . 1)) (RANGE . 
(membership_choice_list . 1)) (THEN . (membership_choice_list . 1)) (SEMICOLON 
. (membership_choice_list . 1)) (WITH . (membership_choic [...]
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (ACCESS . (null_exclusion_opt . 1)) (IDENTIFIER .  
812) (CHARACTER_LITERAL .  50) (STRING_LITERAL .  49))
       ((default . error) (NULL . (abstract_tagged_limited_opt . 1)) (RECORD . 
(abstract_tagged_limited_opt . 1)) (PRIVATE . (abstract_tagged_limited_opt . 
1)))
-      ((default . error) (NULL .  805) (NEW .  147) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (NULL .  811) (NEW .  148) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (RIGHT_PAREN . (discrete_subtype_definition_list . 
0)) (COMMA . (discrete_subtype_definition_list . 0)))
-      ((default . error) (COMMA .  803) (RIGHT_PAREN .  804))
+      ((default . error) (COMMA .  809) (RIGHT_PAREN .  810))
       ((default . error) (RIGHT_PAREN . (index_subtype_definition_list . 0)) 
(COMMA . (index_subtype_definition_list . 0)))
-      ((default . error) (COMMA .  801) (RIGHT_PAREN .  802))
-      ((default . error) (RIGHT_PAREN . (subtype_indication . 3)) (COMMA . 
(subtype_indication . 3)) (PLUS . (primary . 2)) (MINUS . (primary . 2)) 
(AMPERSAND . (primary . 2)) (DOT_DOT . (primary . 2)) (SLASH . (primary . 2)) 
(STAR . (primary . 2)) (MOD . (primary . 2)) (REM . (primary . 2)) (STAR_STAR . 
(primary . 2)) (DOT .  86) (TICK .  273) (RANGE .  798) (LEFT_PAREN .  797))
+      ((default . error) (COMMA .  807) (RIGHT_PAREN .  808))
+      ((default . error) (RIGHT_PAREN . (subtype_indication . 3)) (COMMA . 
(subtype_indication . 3)) (PLUS . (primary . 2)) (MINUS . (primary . 2)) 
(AMPERSAND . (primary . 2)) (DOT_DOT . (primary . 2)) (SLASH . (primary . 2)) 
(STAR . (primary . 2)) (MOD . (primary . 2)) (REM . (primary . 2)) (STAR_STAR . 
(primary . 2)) (DOT .  87) (TICK .  274) (RANGE .  804) (LEFT_PAREN .  803))
       ((default . error) (LOOP . (discrete_subtype_definition . 1)) 
(EQUAL_GREATER . (discrete_subtype_definition . 1)) (COMMA . 
(discrete_subtype_definition . 1)) (RIGHT_PAREN . (discrete_subtype_definition 
. 1)))
-      ((default . error) (DOT_DOT .  263))
+      ((default . error) (DOT_DOT .  264))
       ((default . error) (LOOP . (discrete_subtype_definition . 0)) 
(EQUAL_GREATER . (discrete_subtype_definition . 0)) (COMMA . 
(discrete_subtype_definition . 0)) (RIGHT_PAREN . (discrete_subtype_definition 
. 0)))
-      ((default . error) (BOX .  796))
+      ((default . error) (BOX .  802))
       ((default . error) (WITH . (formal_type_definition . 2)) (SEMICOLON . 
(formal_type_definition . 2)))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
       ((default . error) (PACKAGE . (formal_type_declaration . 1)) (PROCEDURE 
. (formal_type_declaration . 1)) (FUNCTION . (formal_type_declaration . 1)) 
(IDENTIFIER . (formal_type_declaration . 1)) (PRAGMA . (formal_type_declaration 
. 1)) (TYPE . (formal_type_declaration . 1)) (WITH . (formal_type_declaration . 
1)))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (SEMICOLON . (formal_derived_type_definition . 3)) 
(WITH . ((formal_derived_type_definition . 3)  790)) (DOT .  86) (TICK .  87) 
(AND .  789) (LEFT_PAREN .  105))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (SEMICOLON . (formal_derived_type_definition . 3)) 
(WITH . ((formal_derived_type_definition . 3)  796)) (DOT .  87) (TICK .  88) 
(AND .  795) (LEFT_PAREN .  106))
       ((default . error) (PACKAGE . (formal_type_declaration . 0)) (PROCEDURE 
. (formal_type_declaration . 0)) (FUNCTION . (formal_type_declaration . 0)) 
(IDENTIFIER . (formal_type_declaration . 0)) (PRAGMA . (formal_type_declaration 
. 0)) (TYPE . (formal_type_declaration . 0)) (WITH . (formal_type_declaration . 
0)))
       ((default . error) (PACKAGE . (formal_subprogram_declaration . 2)) 
(PROCEDURE . (formal_subprogram_declaration . 2)) (FUNCTION . 
(formal_subprogram_declaration . 2)) (IDENTIFIER . 
(formal_subprogram_declaration . 2)) (PRAGMA . (formal_subprogram_declaration . 
2)) (TYPE . (formal_subprogram_declaration . 2)) (WITH . 
(formal_subprogram_declaration . 2)))
-      ((default . error) (BOX .  788) (IDENTIFIER .  47) (STRING_LITERAL .  
48) (CHARACTER_LITERAL .  169) (RIGHT_PAREN . ((association_opt . 0) 
(expression_opt . 0))) (COMMA . ((association_opt . 0) (expression_opt . 0))) 
(EQUAL_GREATER . (discrete_choice_list . 0)) (BAR . (discrete_choice_list . 0)) 
(PLUS .  143) (MINUS .  142) (OTHERS .  171) (ABS .  145) (NOT .  170) (NULL .  
149) (NEW .  147) (LEFT_PAREN .  146))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
+      ((default . error) (BOX .  794) (IDENTIFIER .  48) (STRING_LITERAL .  
49) (CHARACTER_LITERAL .  170) (RIGHT_PAREN . ((association_opt . 0) 
(expression_opt . 0))) (COMMA . ((association_opt . 0) (expression_opt . 0))) 
(EQUAL_GREATER . (discrete_choice_list . 0)) (BAR . (discrete_choice_list . 0)) 
(PLUS .  144) (MINUS .  143) (OTHERS .  172) (ABS .  146) (NOT .  171) (NULL .  
150) (NEW .  148) (LEFT_PAREN .  147))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
       ((default . error) (PACKAGE . (formal_object_declaration . 1)) 
(PROCEDURE . (formal_object_declaration . 1)) (FUNCTION . 
(formal_object_declaration . 1)) (IDENTIFIER . (formal_object_declaration . 1)) 
(PRAGMA . (formal_object_declaration . 1)) (TYPE . (formal_object_declaration . 
1)) (WITH . (formal_object_declaration . 1)))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
-      ((default . error) (SEMICOLON .  785))
-      ((default . error) (IDENTIFIER .  71))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
+      ((default . error) (SEMICOLON .  791))
+      ((default . error) (IDENTIFIER .  72))
       ((default . error) (RENAMES . (access_definition . 1)) (DO . 
(access_definition . 1)) (RIGHT_PAREN . (access_definition . 1)) (IS . 
(access_definition . 1)) (SEMICOLON . (access_definition . 1)) (WITH . 
(access_definition . 1)) (COLON_EQUAL . (access_definition . 1)))
       ((default . error) (RENAMES . (access_definition . 2)) (DO . 
(access_definition . 2)) (RIGHT_PAREN . (access_definition . 2)) (IS . 
(access_definition . 2)) (SEMICOLON . (access_definition . 2)) (WITH . 
(access_definition . 2)) (COLON_EQUAL . (access_definition . 2)))
       ((default . error) (SEMICOLON . (parameter_specification . 2)) 
(RIGHT_PAREN . (parameter_specification . 2)))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
       ((default . error) (DO . (aggregate . 1)) (LOOP . (aggregate . 1)) (USE 
. (aggregate . 1)) (COLON_EQUAL . (aggregate . 1)) (WHILE . (aggregate . 1)) 
(SELECT . (aggregate . 1)) (REQUEUE . (aggregate . 1)) (RAISE . (aggregate . 
1)) (PRAGMA . (aggregate . 1)) (NULL . (aggregate . 1)) (IF . (aggregate . 1)) 
(GOTO . (aggregate . 1)) (FOR . (aggregate . 1)) (EXIT . (aggregate . 1)) 
(DELAY . (aggregate . 1)) (DECLARE . (aggregate . 1)) (CASE . (aggregate . 1)) 
(BEGIN . (aggregate . 1)) (A [...]
-      ((default . error) (RIGHT_PAREN .  783))
+      ((default . error) (RIGHT_PAREN .  789))
       ((default . error) (OF . (aggregate . 2)) (LESS_LESS . (aggregate . 2)) 
(IDENTIFIER . (aggregate . 2)) (STRING_LITERAL . (aggregate . 2)) 
(CHARACTER_LITERAL . (aggregate . 2)) (ACCEPT . (aggregate . 2)) (ABORT . 
(aggregate . 2)) (BEGIN . (aggregate . 2)) (CASE . (aggregate . 2)) (DECLARE . 
(aggregate . 2)) (DELAY . (aggregate . 2)) (EXIT . (aggregate . 2)) (FOR . 
(aggregate . 2)) (GOTO . (aggregate . 2)) (IF . (aggregate . 2)) (NULL . 
(aggregate . 2)) (PRAGMA . (aggregate . 2)) (RA [...]
-      ((default . error) (COLON_EQUAL .  1053) (DOT .  86) (TICK .  87) 
(RIGHT_PAREN . (parameter_specification . 1)) (SEMICOLON . 
(parameter_specification . 1)) (LEFT_PAREN .  105))
+      ((default . error) (COLON_EQUAL .  1067) (DOT .  87) (TICK .  88) 
(RIGHT_PAREN . (parameter_specification . 1)) (SEMICOLON . 
(parameter_specification . 1)) (LEFT_PAREN .  106))
       ((default . error) (WITH . (formal_object_declaration . 2)) (TYPE . 
(formal_object_declaration . 2)) (PRAGMA . (formal_object_declaration . 2)) 
(IDENTIFIER . (formal_object_declaration . 2)) (FUNCTION . 
(formal_object_declaration . 2)) (PROCEDURE . (formal_object_declaration . 2)) 
(PACKAGE . (formal_object_declaration . 2)))
-      ((default . error) (SEMICOLON .  1052))
-      ((default . error) (SEMICOLON .  1051))
-      ((default . error) (RIGHT_PAREN .  1050))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (PRIVATE .  1048))
-      ((default . error) (AND .  1047) (WITH . (interface_type_definition . 
1)) (SEMICOLON . (interface_type_definition . 1)))
-      ((default . error) (DOT .  86) (SEMICOLON . (interface_list . 0)) (WITH 
. (interface_list . 0)) (AND . (interface_list . 0)) (TICK .  87) (LEFT_PAREN . 
 105))
-      ((default . error) (AND .  1047) (WITH . (interface_type_definition . 
3)) (SEMICOLON . (interface_type_definition . 3)))
-      ((default . error) (AND .  1047) (WITH . (interface_type_definition . 
2)) (SEMICOLON . (interface_type_definition . 2)))
-      ((default . error) (AND .  1047) (WITH . (interface_type_definition . 
0)) (SEMICOLON . (interface_type_definition . 0)))
+      ((default . error) (SEMICOLON .  1066))
+      ((default . error) (SEMICOLON .  1065))
+      ((default . error) (RIGHT_PAREN .  1064))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (PRIVATE .  1062))
+      ((default . error) (AND .  1061) (WITH . (interface_type_definition . 
1)) (SEMICOLON . (interface_type_definition . 1)))
+      ((default . error) (DOT .  87) (SEMICOLON . (interface_list . 0)) (WITH 
. (interface_list . 0)) (AND . (interface_list . 0)) (TICK .  88) (LEFT_PAREN . 
 106))
+      ((default . error) (AND .  1061) (WITH . (interface_type_definition . 
3)) (SEMICOLON . (interface_type_definition . 3)))
+      ((default . error) (AND .  1061) (WITH . (interface_type_definition . 
2)) (SEMICOLON . (interface_type_definition . 2)))
+      ((default . error) (AND .  1061) (WITH . (interface_type_definition . 
0)) (SEMICOLON . (interface_type_definition . 0)))
       ((default . error) (SEMICOLON . (formal_type_definition . 7)) (WITH . 
(formal_type_definition . 7)))
-      ((default . error) (IDENTIFIER .  47) (STRING_LITERAL .  48) 
(CHARACTER_LITERAL .  169) (RIGHT_PAREN . ((association_opt . 0) 
(expression_opt . 0))) (COMMA . ((association_opt . 0) (expression_opt . 0))) 
(EQUAL_GREATER . (discrete_choice_list . 0)) (BAR . (discrete_choice_list . 0)) 
(PLUS .  143) (MINUS .  142) (OTHERS .  171) (ABS .  145) (NOT .  1044) (NULL . 
 149) (NEW .  147) (LEFT_PAREN .  146))
-      ((default . error) (BOX .  1043) (IDENTIFIER .  47) (CHARACTER_LITERAL . 
 49) (STRING_LITERAL .  48) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (LEFT_PAREN .  146))
+      ((default . error) (IDENTIFIER .  48) (STRING_LITERAL .  49) 
(CHARACTER_LITERAL .  170) (RIGHT_PAREN . ((association_opt . 0) 
(expression_opt . 0))) (COMMA . ((association_opt . 0) (expression_opt . 0))) 
(EQUAL_GREATER . (discrete_choice_list . 0)) (BAR . (discrete_choice_list . 0)) 
(PLUS .  144) (MINUS .  143) (OTHERS .  172) (ABS .  146) (NOT .  1058) (NULL . 
 150) (NEW .  148) (LEFT_PAREN .  147))
+      ((default . error) (BOX .  1057) (IDENTIFIER .  48) (CHARACTER_LITERAL . 
 50) (STRING_LITERAL .  49) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (LEFT_PAREN .  147))
       ((default . error) (LOOP . (subtype_indication . 2)) (DO . 
(subtype_indication . 2)) (EQUAL_GREATER . (subtype_indication . 2)) (COMMA . 
(subtype_indication . 2)) (RIGHT_PAREN . (subtype_indication . 2)) (COLON_EQUAL 
. (subtype_indication . 2)) (WITH . (subtype_indication . 2)) (SEMICOLON . 
(subtype_indication . 2)) (AND . (subtype_indication . 2)) (OF . 
(subtype_indication . 2)))
       ((default . error) (LOOP . (constraint . 1)) (DO . (constraint . 1)) 
(EQUAL_GREATER . (constraint . 1)) (COMMA . (constraint . 1)) (RIGHT_PAREN . 
(constraint . 1)) (COLON_EQUAL . (constraint . 1)) (WITH . (constraint . 1)) 
(SEMICOLON . (constraint . 1)) (AND . (constraint . 1)) (OF . (constraint . 1)))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (OF .  1040))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  752) 
(NULL .  149) (NEW .  147) (LEFT_PAREN .  146))
-      ((default . error) (OF .  1038))
-      ((default . error) (PLUS . (primary . 0)) (MINUS . (primary . 0)) 
(AMPERSAND . (primary . 0)) (DOT_DOT . (primary . 0)) (SLASH . (primary . 0)) 
(STAR . (primary . 0)) (MOD . (primary . 0)) (REM . (primary . 0)) (IDENTIFIER 
.  47) (CHARACTER_LITERAL .  49) (STRING_LITERAL .  48))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (OF .  1054))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  758) 
(NULL .  150) (NEW .  148) (LEFT_PAREN .  147))
+      ((default . error) (OF .  1052))
+      ((default . error) (PLUS . (primary . 0)) (MINUS . (primary . 0)) 
(AMPERSAND . (primary . 0)) (DOT_DOT . (primary . 0)) (SLASH . (primary . 0)) 
(STAR . (primary . 0)) (MOD . (primary . 0)) (REM . (primary . 0)) (IDENTIFIER 
.  48) (CHARACTER_LITERAL .  50) (STRING_LITERAL .  49))
       ((default . error) (DOT . (name . 0)) (LEFT_PAREN . (name . 0)) (TICK . 
(name . 0)) (SEMICOLON . (null_exclusion_opt_name . 2)) (RIGHT_PAREN . 
(null_exclusion_opt_name . 2)) (COLON_EQUAL . (null_exclusion_opt_name . 2)))
       ((default . error) (DOT . (name . 3)) (LEFT_PAREN . (name . 3)) (TICK . 
(name . 3)) (SEMICOLON . (null_exclusion_opt_name . 3)) (RIGHT_PAREN . 
(null_exclusion_opt_name . 3)) (COLON_EQUAL . (null_exclusion_opt_name . 3)))
       ((default . error) (SEMICOLON . (discriminant_specification_opt . 3)) 
(RIGHT_PAREN . (discriminant_specification_opt . 3)))
       ((default . error) (SEMICOLON . (discriminant_specification_opt . 1)) 
(RIGHT_PAREN . (discriminant_specification_opt . 1)))
       ((default . error) (DO . (range . 0)) (LOOP . (range . 0)) (XOR . (range 
. 0)) (OR . (range . 0)) (AND . (range . 0)) (IS . (range . 0)) (WITH . (range 
. 0)) (SEMICOLON . (range . 0)) (THEN . (range . 0)) (RANGE . (range . 0)) 
(DIGITS . (range . 0)) (ELSE . (range . 0)) (ELSIF . (range . 0)) (COLON_EQUAL 
. (range . 0)) (OF . (range . 0)) (COMMA . (range . 0)) (BAR . (range . 0)) 
(EQUAL_GREATER . (range . 0)) (RIGHT_PAREN . (range . 0)))
-      ((default . error) (DOT .  86) (TICK .  87) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  107) (LEFT_PAREN .  105))
-      ((default . error) (DOT .  86) (TICK .  87) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  107) (LEFT_PAREN .  105))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
+      ((default . error) (DOT .  87) (TICK .  88) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  108) (LEFT_PAREN .  106))
+      ((default . error) (DOT .  87) (TICK .  88) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  108) (LEFT_PAREN .  106))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
       ((default . error) (WHEN . (record_representation_clause . 0)) (END . 
(record_representation_clause . 0)) (PRIVATE . (record_representation_clause . 
0)) (CASE . (record_representation_clause . 0)) (USE . 
(record_representation_clause . 0)) (TYPE . (record_representation_clause . 0)) 
(TASK . (record_representation_clause . 0)) (SUBTYPE . 
(record_representation_clause . 0)) (PROTECTED . (record_representation_clause 
. 0)) (PROCEDURE . (record_representation_clause . 0)) (PRAGMA . (re [...]
       ((default . error) (WHEN . (enumeration_representation_clause . 0)) (END 
. (enumeration_representation_clause . 0)) (PRIVATE . 
(enumeration_representation_clause . 0)) (CASE . 
(enumeration_representation_clause . 0)) (USE . 
(enumeration_representation_clause . 0)) (TYPE . 
(enumeration_representation_clause . 0)) (TASK . 
(enumeration_representation_clause . 0)) (SUBTYPE . 
(enumeration_representation_clause . 0)) (PROTECTED . 
(enumeration_representation_clause . 0)) (PROCEDURE . (enu [...]
-      ((default . error) (MOD .  1034))
-      ((default . error) (IDENTIFIER .  1031))
-      ((default . error) (SEMICOLON .  1030))
+      ((default . error) (MOD .  1048))
+      ((default . error) (IDENTIFIER .  1045))
+      ((default . error) (SEMICOLON .  1044))
       ((default . error) (WHEN . (aspect_clause . 0)) (PRIVATE . 
(aspect_clause . 0)) (END . (aspect_clause . 0)) (CASE . (aspect_clause . 0)) 
(BEGIN . (aspect_clause . 0)) (IDENTIFIER . (aspect_clause . 0)) (ENTRY . 
(aspect_clause . 0)) (FOR . (aspect_clause . 0)) (FUNCTION . (aspect_clause . 
0)) (GENERIC . (aspect_clause . 0)) (NOT . (aspect_clause . 0)) (OVERRIDING . 
(aspect_clause . 0)) (PACKAGE . (aspect_clause . 0)) (PRAGMA . (aspect_clause . 
0)) (PROCEDURE . (aspect_clause . 0)) ( [...]
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
-      ((default . error) (IS .  1028))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (END .  1024) (PRIVATE .  1025))
-      ((default . error) (SEMICOLON .  1023))
-      ((default . error) (SEMICOLON .  1022))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  148) 
(NULL .  149) (NEW .  147) (LEFT_PAREN .  146))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (SEMICOLON .  1018) (IS .  1019))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (END .  1014) (PRIVATE .  1015))
-      ((default . error) (SEMICOLON .  1013))
-      ((default . error) (SYNCHRONIZED .  548) (TAGGED .  549) (NEW . 
((abstract_limited_synchronized_opt . 3) (abstract_limited_opt . 3))) (LIMITED 
.  1012))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (IDENTIFIER .  1006) (CHARACTER_LITERAL .  1007))
-      ((default . error) (INTERFACE .  542) (PRIVATE . 
(abstract_tagged_limited_opt . 5)) (NULL . (abstract_tagged_limited_opt . 5)) 
(RECORD . (abstract_tagged_limited_opt . 5)) (NEW . 
((abstract_limited_synchronized_opt . 4) (abstract_limited_opt . 2))))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (RECORD .  1004))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (END . (component_list_opt . 0)) (NULL .  995) (CASE 
.  994) (IDENTIFIER .  71) (FOR .  288))
-      ((default . error) (SEMICOLON .  993) (PRIVATE . 
(abstract_tagged_limited_opt . 4)) (NULL . (abstract_tagged_limited_opt . 4)) 
(RECORD . (abstract_tagged_limited_opt . 4)) (LIMITED .  536))
-      ((default . error) (NEW .  992))
-      ((default . error) (NEW .  991))
-      ((default . error) (PRIVATE .  989) (RECORD .  842) (NULL .  840))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
+      ((default . error) (IS .  1042))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (END .  1038) (PRIVATE .  1039))
+      ((default . error) (SEMICOLON .  1037))
+      ((default . error) (SEMICOLON .  1036))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  149) 
(NULL .  150) (NEW .  148) (LEFT_PAREN .  147))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (SEMICOLON .  1032) (IS .  1033))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (END .  1028) (PRIVATE .  1029))
+      ((default . error) (SEMICOLON .  1027))
+      ((default . error) (SYNCHRONIZED .  551) (TAGGED .  552) (NEW . 
((abstract_limited_synchronized_opt . 3) (abstract_limited_opt . 3))) (LIMITED 
.  1026))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (IDENTIFIER .  1020) (CHARACTER_LITERAL .  1021))
+      ((default . error) (INTERFACE .  545) (PRIVATE . 
(abstract_tagged_limited_opt . 5)) (NULL . (abstract_tagged_limited_opt . 5)) 
(RECORD . (abstract_tagged_limited_opt . 5)) (NEW . 
((abstract_limited_synchronized_opt . 4) (abstract_limited_opt . 2))))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (RECORD .  1018))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (END . (component_list_opt . 0)) (NULL .  1009) (CASE 
.  1008) (IDENTIFIER .  72) (FOR .  289))
+      ((default . error) (SEMICOLON .  1007) (PRIVATE . 
(abstract_tagged_limited_opt . 4)) (NULL . (abstract_tagged_limited_opt . 4)) 
(RECORD . (abstract_tagged_limited_opt . 4)) (LIMITED .  539))
+      ((default . error) (NEW .  1006))
+      ((default . error) (NEW .  1005))
+      ((default . error) (PRIVATE .  1003) (RECORD .  848) (NULL .  846))
       ((default . error) (WITH . (type_definition . 8)) (SEMICOLON . 
(type_definition . 8)))
       ((default . error) (WITH . (type_definition . 6)) (SEMICOLON . 
(type_definition . 6)))
       ((default . error) (WITH . (type_definition . 9)) (SEMICOLON . 
(type_definition . 9)))
       ((default . error) (WITH . (type_definition . 0)) (SEMICOLON . 
(type_definition . 0)))
       ((default . error) (WITH . (type_definition . 10)) (SEMICOLON . 
(type_definition . 10)))
       ((default . error) (WITH . (type_definition . 7)) (SEMICOLON . 
(type_definition . 7)))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
       ((default . error) (SEMICOLON . (package_specification . 0)))
-      ((default . error) (SEMICOLON .  987))
-      ((default . error) (NULL .  986))
-      ((default . error) (COLON_EQUAL .  984) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  107))
-      ((default . error) (COLON_EQUAL .  982) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  107))
-      ((default . error) (COLON_EQUAL .  980) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  107))
-      ((default . error) (SEMICOLON .  979))
-      ((default . error) (SEMICOLON .  978))
-      ((default . error) (SEMICOLON .  977))
-      ((default . error) (SEMICOLON .  976))
-      ((default . error) (RIGHT_PAREN .  975))
-      ((default . error) (LOOP . (subtype_indication . 3)) (DOT .  86) (IN . 
(primary . 2)) (NOT . (primary . 2)) (EQUAL . (primary . 2)) (GREATER . 
(primary . 2)) (GREATER_EQUAL . (primary . 2)) (LESS . (primary . 2)) 
(LESS_EQUAL . (primary . 2)) (SLASH_EQUAL . (primary . 2)) (RIGHT_PAREN . 
((subtype_indication . 3) (primary . 2))) (COMMA . ((subtype_indication . 3) 
(primary . 2))) (BAR . (primary . 2)) (EQUAL_GREATER . ((subtype_indication . 
3) (primary . 2))) (AND . (primary . 2)) (OR [...]
-      ((default . error) (SEMICOLON . (name_opt . 0)) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48))
+      ((default . error) (SEMICOLON .  1001))
+      ((default . error) (NULL .  1000))
+      ((default . error) (COLON_EQUAL .  998) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  108))
+      ((default . error) (COLON_EQUAL .  996) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  108))
+      ((default . error) (COLON_EQUAL .  994) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  108))
+      ((default . error) (SEMICOLON .  993))
+      ((default . error) (SEMICOLON .  992))
+      ((default . error) (SEMICOLON .  991))
+      ((default . error) (SEMICOLON .  990))
+      ((default . error) (RIGHT_PAREN .  989))
+      ((default . error) (RIGHT_PAREN .  988))
+      ((default . error) (RIGHT_PAREN .  987))
+      ((default . error) (SEMICOLON .  986))
+      ((default . error) (RIGHT_PAREN .  985))
+      ((default . error) (LOOP . (subtype_indication . 3)) (DOT .  87) (IN . 
(primary . 2)) (NOT . (primary . 2)) (EQUAL . (primary . 2)) (GREATER . 
(primary . 2)) (GREATER_EQUAL . (primary . 2)) (LESS . (primary . 2)) 
(LESS_EQUAL . (primary . 2)) (SLASH_EQUAL . (primary . 2)) (RIGHT_PAREN . 
((subtype_indication . 3) (primary . 2))) (COMMA . ((subtype_indication . 3) 
(primary . 2))) (BAR . (primary . 2)) (EQUAL_GREATER . ((subtype_indication . 
3) (primary . 2))) (AND . (primary . 2)) (OR [...]
+      ((default . error) (SEMICOLON . (name_opt . 0)) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49))
       ((default . error) (END . (package_body . 1)) (BEGIN . (package_body . 
1)) (IDENTIFIER . (package_body . 1)) (ENTRY . (package_body . 1)) (FOR . 
(package_body . 1)) (PROTECTED . (package_body . 1)) (SUBTYPE . (package_body . 
1)) (TASK . (package_body . 1)) (TYPE . (package_body . 1)) (WITH . 
(package_body . 1)) (USE . (package_body . 1)) (SEPARATE . (package_body . 1)) 
(PROCEDURE . (package_body . 1)) (PRIVATE . (package_body . 1)) (PRAGMA . 
(package_body . 1)) (PACKAGE . (package_ [...]
-      ((default . error) (WHEN .  710))
-      ((default . error) (BAR .  274) (EQUAL_GREATER .  972))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (DOT .  86) (TICK .  87) (LOOP . 
(iterator_specification . 5)) (EQUAL_GREATER . (iterator_specification . 5)) 
(LEFT_PAREN .  105))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  752) 
(NULL .  149) (NEW .  147) (LEFT_PAREN .  146))
+      ((default . error) (WHEN .  714))
+      ((default . error) (BAR .  275) (EQUAL_GREATER .  982))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (DOT .  87) (TICK .  88) (LOOP . 
(iterator_specification . 5)) (EQUAL_GREATER . (iterator_specification . 5)) 
(LEFT_PAREN .  106))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  758) 
(NULL .  150) (NEW .  148) (LEFT_PAREN .  147))
       ((default . error) (LOOP . (iterator_specification . 1)) (EQUAL_GREATER 
. (iterator_specification . 1)))
-      ((default . error) (OF .  969))
+      ((default . error) (OF .  979))
       ((default . error) (RIGHT_PAREN . (quantified_expression . 0)))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (RIGHT_PAREN . (elsif_expression_list . 0)) (ELSE . 
(elsif_expression_list . 0)) (ELSIF . (elsif_expression_list . 0)))
-      ((default . error) (RIGHT_PAREN . (if_expression . 1)) (ELSE .  965) 
(ELSIF .  877))
-      ((default . error) (END . (protected_operation_item_list_opt . 0)) 
(ENTRY .  956) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(FOR .  288))
-      ((default . error) (BEGIN . (declarative_part_opt . 0)) (USE .  11) 
(SUBTYPE .  291) (PRAGMA .  7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(ENTRY . (overriding_indicator_opt . 2)) (FOR .  288) (IDENTIFIER .  287) (TYPE 
.  293) (GENERIC .  2) (PROTECTED .  290) (TASK .  292) (PACKAGE .  289))
+      ((default . error) (RIGHT_PAREN . (if_expression . 1)) (ELSE .  975) 
(ELSIF .  887))
+      ((default . error) (END . (protected_operation_item_list_opt . 0)) 
(ENTRY .  966) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(FOR .  289))
+      ((default . error) (BEGIN . (declarative_part_opt . 0)) (USE .  11) 
(SUBTYPE .  292) (PRAGMA .  7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(ENTRY . (overriding_indicator_opt . 2)) (FOR .  289) (IDENTIFIER .  288) (TYPE 
.  294) (GENERIC .  2) (PROTECTED .  291) (TASK .  293) (PACKAGE .  290))
       ((default . error) (ACCEPT . (label_opt . 1)) (BEGIN . (label_opt . 1)) 
(CASE . (label_opt . 1)) (DECLARE . (label_opt . 1)) (FOR . (label_opt . 1)) 
(IF . (label_opt . 1)) (LOOP . (label_opt . 1)) (RETURN . (label_opt . 1)) 
(SELECT . (label_opt . 1)) (WHILE . (label_opt . 1)) (IDENTIFIER . (label_opt . 
1)) (STRING_LITERAL . (label_opt . 1)) (CHARACTER_LITERAL . (label_opt . 1)) 
(ABORT . (label_opt . 1)) (DELAY . (label_opt . 1)) (EXIT . (label_opt . 1)) 
(GOTO . (label_opt . 1)) (NU [...]
-      ((default . error) (RIGHT_PAREN . ((association_opt . 0) (expression_opt 
. 0))) (COMMA . ((association_opt . 0) (expression_opt . 0))) (EQUAL_GREATER . 
(discrete_choice_list . 0)) (BAR . (discrete_choice_list . 0)) (OTHERS .  171) 
(IDENTIFIER .  47) (CHARACTER_LITERAL .  169) (STRING_LITERAL .  48) (PLUS .  
143) (MINUS .  142) (ABS .  145) (NOT .  170) (NULL .  149) (NEW .  147) 
(LEFT_PAREN .  146))
+      ((default . error) (RIGHT_PAREN . ((association_opt . 0) (expression_opt 
. 0))) (COMMA . ((association_opt . 0) (expression_opt . 0))) (EQUAL_GREATER . 
(discrete_choice_list . 0)) (BAR . (discrete_choice_list . 0)) (OTHERS .  172) 
(IDENTIFIER .  48) (CHARACTER_LITERAL .  170) (STRING_LITERAL .  49) (PLUS .  
144) (MINUS .  143) (ABS .  146) (NOT .  171) (NULL .  150) (NEW .  148) 
(LEFT_PAREN .  147))
       ((default . error) (SEMICOLON . (actual_parameter_part_opt . 1)) 
(LEFT_PAREN . (actual_parameter_part_opt . 1)) (DO . (actual_parameter_part_opt 
. 1)))
-      ((default . error) (DO . (parameter_profile_opt . 0)) (SEMICOLON . 
(parameter_profile_opt . 0)) (LEFT_PAREN .  776))
+      ((default . error) (DO . (parameter_profile_opt . 0)) (SEMICOLON . 
(parameter_profile_opt . 0)) (LEFT_PAREN .  782))
       ((default . error) (OR . (simple_statement . 8)) (THEN . 
(simple_statement . 8)) (WHEN . (simple_statement . 8)) (EXCEPTION . 
(simple_statement . 8)) (END . (simple_statement . 8)) (LESS_LESS . 
(simple_statement . 8)) (IDENTIFIER . (simple_statement . 8)) (STRING_LITERAL . 
(simple_statement . 8)) (CHARACTER_LITERAL . (simple_statement . 8)) (ACCEPT . 
(simple_statement . 8)) (ABORT . (simple_statement . 8)) (BEGIN . 
(simple_statement . 8)) (CASE . (simple_statement . 8)) (DECLARE .  [...]
-      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
691))
-      ((default . error) (END . (case_statement_alternative_list . 0)) (WHEN . 
((case_statement_alternative_list . 0)  950)))
-      ((default . error) (END . (sequence_of_statements_opt . 0)) (EXCEPTION . 
(sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . (label_opt . 0)) (ABORT 
. (label_opt . 0)) (DELAY . (label_opt .  [...]
+      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
695))
+      ((default . error) (WHEN .  960))
+      ((default . error) (END . (sequence_of_statements_opt . 0)) (EXCEPTION . 
(sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . (label_opt . 0)) (ABORT 
. (label_opt . 0)) (DELAY . (label_opt .  [...]
       ((default . error) (WHEN . (delay_statement . 1)) (EXCEPTION . 
(delay_statement . 1)) (ELSIF . (delay_statement . 1)) (THEN . (delay_statement 
. 1)) (ELSE . (delay_statement . 1)) (OR . (delay_statement . 1)) (END . 
(delay_statement . 1)) (LESS_LESS . (delay_statement . 1)) (IDENTIFIER . 
(delay_statement . 1)) (STRING_LITERAL . (delay_statement . 1)) 
(CHARACTER_LITERAL . (delay_statement . 1)) (ACCEPT . (delay_statement . 1)) 
(ABORT . (delay_statement . 1)) (BEGIN . (delay_statemen [...]
-      ((default . error) (SEMICOLON .  948))
+      ((default . error) (SEMICOLON .  958))
       ((default . error) (OR . (exit_statement . 1)) (THEN . (exit_statement . 
1)) (WHEN . (exit_statement . 1)) (EXCEPTION . (exit_statement . 1)) (END . 
(exit_statement . 1)) (LESS_LESS . (exit_statement . 1)) (IDENTIFIER . 
(exit_statement . 1)) (STRING_LITERAL . (exit_statement . 1)) 
(CHARACTER_LITERAL . (exit_statement . 1)) (ACCEPT . (exit_statement . 1)) 
(ABORT . (exit_statement . 1)) (BEGIN . (exit_statement . 1)) (CASE . 
(exit_statement . 1)) (DECLARE . (exit_statement . 1)) (DEL [...]
-      ((default . error) (SEMICOLON . (expression_opt . 0)) (PLUS .  143) 
(MINUS .  142) (ABS .  145) (NOT .  148) (NULL .  149) (NEW .  147) (IDENTIFIER 
.  47) (CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (SEMICOLON . (expression_opt . 0)) (PLUS .  144) 
(MINUS .  143) (ABS .  146) (NOT .  149) (NULL .  150) (NEW .  148) (IDENTIFIER 
.  48) (CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (OR . (simple_statement . 3)) (THEN . 
(simple_statement . 3)) (WHEN . (simple_statement . 3)) (EXCEPTION . 
(simple_statement . 3)) (END . (simple_statement . 3)) (LESS_LESS . 
(simple_statement . 3)) (IDENTIFIER . (simple_statement . 3)) (STRING_LITERAL . 
(simple_statement . 3)) (CHARACTER_LITERAL . (simple_statement . 3)) (ACCEPT . 
(simple_statement . 3)) (ABORT . (simple_statement . 3)) (BEGIN . 
(simple_statement . 3)) (CASE . (simple_statement . 3)) (DECLARE .  [...]
-      ((default . error) (ELSIF . (sequence_of_statements_opt . 0)) (ELSE . 
(sequence_of_statements_opt . 0)) (END . (sequence_of_statements_opt . 0)) 
(ACCEPT . (label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) 
(DECLARE . (label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) 
(LOOP . (label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) 
(WHILE . (label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL 
. (label_opt . 0)) (ABORT . ( [...]
-      ((default . error) (LOOP .  945))
+      ((default . error) (ELSIF . (sequence_of_statements_opt . 0)) (ELSE . 
(sequence_of_statements_opt . 0)) (END . (sequence_of_statements_opt . 0)) 
(ACCEPT . (label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) 
(DECLARE . (label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) 
(LOOP . (label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) 
(WHILE . (label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL 
. (label_opt . 0)) (ABORT . ( [...]
+      ((default . error) (LOOP .  955))
       ((default . error) (OR . (raise_statement . 2)) (THEN . (raise_statement 
. 2)) (WHEN . (raise_statement . 2)) (EXCEPTION . (raise_statement . 2)) (END . 
(raise_statement . 2)) (LESS_LESS . (raise_statement . 2)) (IDENTIFIER . 
(raise_statement . 2)) (STRING_LITERAL . (raise_statement . 2)) 
(CHARACTER_LITERAL . (raise_statement . 2)) (ACCEPT . (raise_statement . 2)) 
(ABORT . (raise_statement . 2)) (BEGIN . (raise_statement . 2)) (CASE . 
(raise_statement . 2)) (DECLARE . (raise_statem [...]
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (OR . (requeue_statement . 1)) (THEN . 
(requeue_statement . 1)) (WHEN . (requeue_statement . 1)) (EXCEPTION . 
(requeue_statement . 1)) (END . (requeue_statement . 1)) (LESS_LESS . 
(requeue_statement . 1)) (IDENTIFIER . (requeue_statement . 1)) (STRING_LITERAL 
. (requeue_statement . 1)) (CHARACTER_LITERAL . (requeue_statement . 1)) 
(ACCEPT . (requeue_statement . 1)) (ABORT . (requeue_statement . 1)) (BEGIN . 
(requeue_statement . 1)) (CASE . (requeue_statement . 1) [...]
-      ((default . error) (ABORT .  943))
-      ((default . error) (END . (sequence_of_statements_opt . 0)) (EXCEPTION . 
(sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . (label_opt . 0)) (ABORT 
. (label_opt . 0)) (DELAY . (label_opt .  [...]
+      ((default . error) (ABORT .  953))
+      ((default . error) (END . (sequence_of_statements_opt . 0)) (EXCEPTION . 
(sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . (label_opt . 0)) (ABORT 
. (label_opt . 0)) (DELAY . (label_opt .  [...]
       ((default . error) (OR . (extended_return_statement . 1)) (THEN . 
(extended_return_statement . 1)) (WHEN . (extended_return_statement . 1)) 
(EXCEPTION . (extended_return_statement . 1)) (END . (extended_return_statement 
. 1)) (LESS_LESS . (extended_return_statement . 1)) (IDENTIFIER . 
(extended_return_statement . 1)) (STRING_LITERAL . (extended_return_statement . 
1)) (CHARACTER_LITERAL . (extended_return_statement . 1)) (ACCEPT . 
(extended_return_statement . 1)) (ABORT . (extended_ [...]
       ((default . error) (OR . (simple_return_statement . 1)) (THEN . 
(simple_return_statement . 1)) (WHEN . (simple_return_statement . 1)) 
(EXCEPTION . (simple_return_statement . 1)) (END . (simple_return_statement . 
1)) (LESS_LESS . (simple_return_statement . 1)) (IDENTIFIER . 
(simple_return_statement . 1)) (STRING_LITERAL . (simple_return_statement . 1)) 
(CHARACTER_LITERAL . (simple_return_statement . 1)) (ACCEPT . 
(simple_return_statement . 1)) (ABORT . (simple_return_statement . 1)) [...]
-      ((default . error) (CONSTANT . (aliased_opt . 0)) (IDENTIFIER . 
(aliased_opt . 0)) (STRING_LITERAL . (aliased_opt . 0)) (CHARACTER_LITERAL . 
(aliased_opt . 0)) (ACCESS . (aliased_opt . 0)) (NOT . (aliased_opt . 0)) 
(ALIASED .  509))
-      ((default . error) (ABORT .  940))
-      ((default . error) (END . (sequence_of_statements_opt . 0)) (ACCEPT . 
(label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . 
(label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) (LOOP . 
(label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . 
(label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . 
(label_opt . 0)) (ABORT . (label_opt . 0)) (DELAY . (label_opt . 0)) (EXIT . 
(label_opt . 0)) (GOTO . (label_opt [...]
-      ((default . error) (SELECT .  938))
-      ((default . error) (WHEN .  666) (TERMINATE .  665) (ACCEPT .  609) 
(DELAY .  614))
+      ((default . error) (CONSTANT . (aliased_opt . 0)) (IDENTIFIER . 
(aliased_opt . 0)) (STRING_LITERAL . (aliased_opt . 0)) (CHARACTER_LITERAL . 
(aliased_opt . 0)) (ACCESS . (aliased_opt . 0)) (NOT . (aliased_opt . 0)) 
(ALIASED .  512))
+      ((default . error) (ABORT .  950))
+      ((default . error) (END . (sequence_of_statements_opt . 0)) (ACCEPT . 
(label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . 
(label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) (LOOP . 
(label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . 
(label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . 
(label_opt . 0)) (ABORT . (label_opt . 0)) (DELAY . (label_opt . 0)) (EXIT . 
(label_opt . 0)) (GOTO . (label_opt [...]
+      ((default . error) (SELECT .  948))
+      ((default . error) (WHEN .  670) (TERMINATE .  669) (ACCEPT .  613) 
(DELAY .  618))
       ((default . error) (OR . (entry_call_alternative . 0)) (ELSE . 
(entry_call_alternative . 0)) (THEN . (triggering_alternative . 0)))
       ((default . error) (OR . (entry_call_alternative . 1)) (ELSE . 
(entry_call_alternative . 1)) (THEN . (triggering_alternative . 1)))
-      ((default . error) (END . (sequence_of_statements_opt . 0)) (ACCEPT . 
(label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . 
(label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) (LOOP . 
(label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . 
(label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . 
(label_opt . 0)) (ABORT . (label_opt . 0)) (DELAY . (label_opt . 0)) (EXIT . 
(label_opt . 0)) (GOTO . (label_opt [...]
-      ((default . error) (DELAY .  614))
+      ((default . error) (END . (sequence_of_statements_opt . 0)) (ACCEPT . 
(label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . 
(label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) (LOOP . 
(label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . 
(label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . 
(label_opt . 0)) (ABORT . (label_opt . 0)) (DELAY . (label_opt . 0)) (EXIT . 
(label_opt . 0)) (GOTO . (label_opt [...]
+      ((default . error) (DELAY .  618))
       ((default . error) (OR . (delay_alternative . 0)) (END . 
(delay_alternative . 0)) (ELSE . (delay_alternative . 0)) (THEN . 
(triggering_alternative . 2)))
       ((default . error) (END . (select_alternative . 1)) (OR . 
(select_alternative . 1)) (ELSE . (select_alternative . 1)))
-      ((default . error) (EQUAL_GREATER .  933))
+      ((default . error) (EQUAL_GREATER .  943))
       ((default . error) (END . (select_alternative . 5)) (OR . 
(select_alternative . 5)) (ELSE . (select_alternative . 5)))
-      ((default . error) (SEMICOLON .  932))
-      ((default . error) (END .  931))
-      ((default . error) (SEMICOLON .  930))
-      ((default . error) (OTHERS .  926) (IDENTIFIER .  925) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48))
+      ((default . error) (SEMICOLON .  942))
+      ((default . error) (END .  941))
+      ((default . error) (SEMICOLON .  940))
+      ((default . error) (OTHERS .  936) (IDENTIFIER .  935) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49))
       ((default . error) (END . (exception_handler_list . 0)) (WHEN . 
(exception_handler_list . 0)))
-      ((default . error) (END . (exception_handler_list_opt . 1)) (WHEN .  
920))
+      ((default . error) (END . (exception_handler_list_opt . 1)) (WHEN .  
930))
       ((default . error) (END . (handled_sequence_of_statements . 0)))
       ((default . error) (WHEN . (exception_handler_list . 1)) (END . 
(exception_handler_list . 1)))
-      ((default . error) (COLON .  1153) (EQUAL_GREATER . (name . 0)) (BAR . 
(name . 0)) (LEFT_PAREN . (name . 0)) (DOT . (name . 0)) (TICK . (name . 0)))
+      ((default . error) (COLON .  1167) (EQUAL_GREATER . (name . 0)) (BAR . 
(name . 0)) (LEFT_PAREN . (name . 0)) (DOT . (name . 0)) (TICK . (name . 0)))
       ((default . error) (BAR . (exception_choice . 1)) (EQUAL_GREATER . 
(exception_choice . 1)))
       ((default . error) (EQUAL_GREATER . (exception_choice_list . 0)) (BAR . 
(exception_choice_list . 0)))
-      ((default . error) (BAR .  1151) (EQUAL_GREATER .  1152))
-      ((default . error) (DOT .  86) (BAR . (exception_choice . 0)) 
(EQUAL_GREATER . (exception_choice . 0)) (TICK .  87) (LEFT_PAREN .  105))
+      ((default . error) (BAR .  1165) (EQUAL_GREATER .  1166))
+      ((default . error) (DOT .  87) (BAR . (exception_choice . 0)) 
(EQUAL_GREATER . (exception_choice . 0)) (TICK .  88) (LEFT_PAREN .  106))
       ((default . error) (WHEN . (assignment_statement . 0)) (THEN . 
(assignment_statement . 0)) (OR . (assignment_statement . 0)) (ELSIF . 
(assignment_statement . 0)) (ELSE . (assignment_statement . 0)) (WHILE . 
(assignment_statement . 0)) (SELECT . (assignment_statement . 0)) (RETURN . 
(assignment_statement . 0)) (REQUEUE . (assignment_statement . 0)) (RAISE . 
(assignment_statement . 0)) (PRAGMA . (assignment_statement . 0)) (NULL . 
(assignment_statement . 0)) (LOOP . (assignment_state [...]
-      ((default . error) (LOOP .  1150))
+      ((default . error) (LOOP .  1164))
       ((default . error) (TYPE . (subprogram_body . 0)) (TASK . 
(subprogram_body . 0)) (SUBTYPE . (subprogram_body . 0)) (PROTECTED . 
(subprogram_body . 0)) (FOR . (subprogram_body . 0)) (ENTRY . (subprogram_body 
. 0)) (IDENTIFIER . (subprogram_body . 0)) (BEGIN . (subprogram_body . 0)) (END 
. (subprogram_body . 0)) ($EOI . (subprogram_body . 0)) (FUNCTION . 
(subprogram_body . 0)) (GENERIC . (subprogram_body . 0)) (LIMITED . 
(subprogram_body . 0)) (NOT . (subprogram_body . 0)) (OVERRIDIN [...]
-      ((default . error) (TERMINATE .  1147) (ACCEPT .  609) (DELAY .  614))
-      ((default . error) (END .  1146))
-      ((default . error) (END . (sequence_of_statements_opt . 0)) (OR . 
(sequence_of_statements_opt . 0)) (ELSE . (sequence_of_statements_opt . 0)) 
(ACCEPT . (label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) 
(DECLARE . (label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) 
(LOOP . (label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) 
(WHILE . (label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL 
. (label_opt . 0)) (ABORT . (lab [...]
-      ((default . error) (END .  1144))
+      ((default . error) (TERMINATE .  1161) (ACCEPT .  613) (DELAY .  618))
+      ((default . error) (END .  1160))
+      ((default . error) (END . (sequence_of_statements_opt . 0)) (OR . 
(sequence_of_statements_opt . 0)) (ELSE . (sequence_of_statements_opt . 0)) 
(ACCEPT . (label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) 
(DECLARE . (label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) 
(LOOP . (label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) 
(WHILE . (label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL 
. (label_opt . 0)) (ABORT . (lab [...]
+      ((default . error) (END .  1158))
       ((default . error) (ELSE . (select_alternative_list . 1)) (END . 
(select_alternative_list . 1)) (OR . (select_alternative_list . 1)))
-      ((default . error) (SEMICOLON .  1143))
-      ((default . error) (END .  1142))
-      ((default . error) (END . (sequence_of_statements_opt . 0)) (ACCEPT . 
(label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . 
(label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) (LOOP . 
(label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . 
(label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . 
(label_opt . 0)) (ABORT . (label_opt . 0)) (DELAY . (label_opt . 0)) (EXIT . 
(label_opt . 0)) (GOTO . (label_opt [...]
-      ((default . error) (IDENTIFIER . (constant_opt . 0)) (STRING_LITERAL . 
(constant_opt . 0)) (CHARACTER_LITERAL . (constant_opt . 0)) (ACCESS . 
(constant_opt . 0)) (NOT . (constant_opt . 0)) (CONSTANT .  720))
-      ((default . error) (END .  1139))
-      ((default . error) (SEMICOLON .  1138))
-      ((default . error) (SEMICOLON .  1137))
-      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
691))
-      ((default . error) (ELSE .  1131) (END .  1133) (ELSIF .  1132))
-      ((default . error) (SEMICOLON .  1130))
+      ((default . error) (SEMICOLON .  1157))
+      ((default . error) (END .  1156))
+      ((default . error) (END . (sequence_of_statements_opt . 0)) (ACCEPT . 
(label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . 
(label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) (LOOP . 
(label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . 
(label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . 
(label_opt . 0)) (ABORT . (label_opt . 0)) (DELAY . (label_opt . 0)) (EXIT . 
(label_opt . 0)) (GOTO . (label_opt [...]
+      ((default . error) (IDENTIFIER . (constant_opt . 0)) (STRING_LITERAL . 
(constant_opt . 0)) (CHARACTER_LITERAL . (constant_opt . 0)) (ACCESS . 
(constant_opt . 0)) (NOT . (constant_opt . 0)) (CONSTANT .  726))
+      ((default . error) (END .  1153))
+      ((default . error) (SEMICOLON .  1152))
+      ((default . error) (SEMICOLON .  1151))
+      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
695))
+      ((default . error) (ELSE .  1145) (END .  1147) (ELSIF .  1146))
+      ((default . error) (SEMICOLON .  1144))
       ((default . error) (WHEN . (delay_statement . 0)) (ELSIF . 
(delay_statement . 0)) (EXCEPTION . (delay_statement . 0)) (WHILE . 
(delay_statement . 0)) (SELECT . (delay_statement . 0)) (RETURN . 
(delay_statement . 0)) (REQUEUE . (delay_statement . 0)) (RAISE . 
(delay_statement . 0)) (PRAGMA . (delay_statement . 0)) (NULL . 
(delay_statement . 0)) (LOOP . (delay_statement . 0)) (IF . (delay_statement . 
0)) (GOTO . (delay_statement . 0)) (FOR . (delay_statement . 0)) (EXIT . 
(delay_stat [...]
-      ((default . error) (END .  1129))
-      ((default . error) (EQUAL_GREATER . (discrete_choice_list . 0)) (BAR . 
(discrete_choice_list . 0)) (OTHERS .  171) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (PLUS .  143) (MINUS .  142) 
(ABS .  145) (NOT .  170) (NULL .  149) (NEW .  147) (LEFT_PAREN .  146))
-      ((default . error) (END . (case_statement_alternative_list . 1)) (WHEN . 
(case_statement_alternative_list . 1)))
-      ((default . error) (END .  1126) (WHEN .  950))
-      ((default . error) (SEMICOLON .  1125))
-      ((default . error) (DO .  1124) (SEMICOLON .  1123))
-      ((default . error) (BEGIN .  1122))
-      ((default . error) (IDENTIFIER .  1121))
+      ((default . error) (END .  1143))
+      ((default . error) (EQUAL_GREATER . (discrete_choice_list . 0)) (BAR . 
(discrete_choice_list . 0)) (OTHERS .  172) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (PLUS .  144) (MINUS .  143) 
(ABS .  146) (NOT .  171) (NULL .  150) (NEW .  148) (LEFT_PAREN .  147))
+      ((default . error) (END . (case_statement_alternative_list . 0)) (WHEN . 
(case_statement_alternative_list . 0)))
+      ((default . error) (END .  1140) (WHEN .  960))
+      ((default . error) (SEMICOLON .  1139))
+      ((default . error) (DO .  1138) (SEMICOLON .  1137))
+      ((default . error) (BEGIN .  1136))
+      ((default . error) (IDENTIFIER .  1135))
       ((default . error) (PROCEDURE . (protected_operation_item . 3)) 
(OVERRIDING . (protected_operation_item . 3)) (NOT . (protected_operation_item 
. 3)) (FUNCTION . (protected_operation_item . 3)) (FOR . 
(protected_operation_item . 3)) (ENTRY . (protected_operation_item . 3)) (END . 
(protected_operation_item . 3)))
       ((default . error) (PROCEDURE . (protected_operation_item . 2)) 
(OVERRIDING . (protected_operation_item . 2)) (NOT . (protected_operation_item 
. 2)) (FUNCTION . (protected_operation_item . 2)) (FOR . 
(protected_operation_item . 2)) (ENTRY . (protected_operation_item . 2)) (END . 
(protected_operation_item . 2)))
       ((default . error) (FUNCTION .  1) (PROCEDURE .  9))
       ((default . error) (END . (protected_operation_item_list . 0)) (ENTRY . 
(protected_operation_item_list . 0)) (FOR . (protected_operation_item_list . 
0)) (FUNCTION . (protected_operation_item_list . 0)) (NOT . 
(protected_operation_item_list . 0)) (OVERRIDING . 
(protected_operation_item_list . 0)) (PROCEDURE . 
(protected_operation_item_list . 0)))
-      ((default . error) (END . (protected_operation_item_list_opt . 1)) 
(ENTRY .  956) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(FOR .  288))
-      ((default . error) (END .  1118))
+      ((default . error) (END . (protected_operation_item_list_opt . 1)) 
(ENTRY .  966) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(FOR .  289))
+      ((default . error) (END .  1132))
       ((default . error) (PROCEDURE . (protected_operation_item . 1)) 
(OVERRIDING . (protected_operation_item . 1)) (NOT . (protected_operation_item 
. 1)) (FUNCTION . (protected_operation_item . 1)) (FOR . 
(protected_operation_item . 1)) (ENTRY . (protected_operation_item . 1)) (END . 
(protected_operation_item . 1)))
       ((default . error) (PROCEDURE . (protected_operation_item . 0)) 
(OVERRIDING . (protected_operation_item . 0)) (NOT . (protected_operation_item 
. 0)) (FUNCTION . (protected_operation_item . 0)) (FOR . 
(protected_operation_item . 0)) (ENTRY . (protected_operation_item . 0)) (END . 
(protected_operation_item . 0)))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (ELSIF . (elsif_expression_list . 1)) (ELSE . 
(elsif_expression_list . 1)) (RIGHT_PAREN . (elsif_expression_list . 1)))
-      ((default . error) (THEN .  1116))
+      ((default . error) (THEN .  1130))
       ((default . error) (RIGHT_PAREN . (if_expression . 2)))
-      ((default . error) (REVERSE .  1114) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48))
+      ((default . error) (REVERSE .  1128) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49))
       ((default . error) (LOOP . (iterator_specification . 0)) (EQUAL_GREATER 
. (iterator_specification . 0)))
-      ((default . error) (DOT .  86) (TICK .  87) (LOOP . 
(iterator_specification . 4)) (EQUAL_GREATER . (iterator_specification . 4)) 
(LEFT_PAREN .  105))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (DOT .  87) (TICK .  88) (LOOP . 
(iterator_specification . 4)) (EQUAL_GREATER . (iterator_specification . 4)) 
(LEFT_PAREN .  106))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (RIGHT_PAREN . (case_expression_alternative_list . 
1)) (COMMA . (case_expression_alternative_list . 1)))
-      ((default . error) (SEMICOLON .  1112))
-      ((default . error) (WITH . (parameter_profile_opt . 0)) (SEMICOLON . 
(parameter_profile_opt . 0)) (LEFT_PAREN .  776))
+      ((default . error) (SEMICOLON .  1126))
+      ((default . error) (WITH . (parameter_profile_opt . 0)) (SEMICOLON . 
(parameter_profile_opt . 0)) (LEFT_PAREN .  782))
       ((default . error) (USE . (entry_declaration . 1)) (TYPE . 
(entry_declaration . 1)) (TASK . (entry_declaration . 1)) (SUBTYPE . 
(entry_declaration . 1)) (PROTECTED . (entry_declaration . 1)) (PROCEDURE . 
(entry_declaration . 1)) (PRAGMA . (entry_declaration . 1)) (PACKAGE . 
(entry_declaration . 1)) (OVERRIDING . (entry_declaration . 1)) (NOT . 
(entry_declaration . 1)) (GENERIC . (entry_declaration . 1)) (FUNCTION . 
(entry_declaration . 1)) (FOR . (entry_declaration . 1)) (ENTRY . ( [...]
+      ((default . error) (WITH . (paren_expression . 2)) (SEMICOLON . 
(paren_expression . 2)))
+      ((default . error) (WITH . (paren_expression . 0)) (SEMICOLON . 
(paren_expression . 0)))
+      ((default . error) (WITH . (paren_expression . 1)) (SEMICOLON . 
(paren_expression . 1)))
+      ((default . error) (USE . (expression_function_declaration . 0)) (TYPE . 
(expression_function_declaration . 0)) (TASK . (expression_function_declaration 
. 0)) (SUBTYPE . (expression_function_declaration . 0)) (PROTECTED . 
(expression_function_declaration . 0)) (PROCEDURE . 
(expression_function_declaration . 0)) (PRAGMA . 
(expression_function_declaration . 0)) (PACKAGE . 
(expression_function_declaration . 0)) (OVERRIDING . 
(expression_function_declaration . 0)) (NOT . (expression_fu [...]
       ((default . error) (USE . (null_procedure_declaration . 0)) (TYPE . 
(null_procedure_declaration . 0)) (TASK . (null_procedure_declaration . 0)) 
(SUBTYPE . (null_procedure_declaration . 0)) (PROTECTED . 
(null_procedure_declaration . 0)) (PROCEDURE . (null_procedure_declaration . 
0)) (PRAGMA . (null_procedure_declaration . 0)) (PACKAGE . 
(null_procedure_declaration . 0)) (OVERRIDING . (null_procedure_declaration . 
0)) (NOT . (null_procedure_declaration . 0)) (GENERIC . (null_procedur [...]
       ((default . error) (USE . (abstract_subprogram_declaration . 0)) (TYPE . 
(abstract_subprogram_declaration . 0)) (TASK . (abstract_subprogram_declaration 
. 0)) (SUBTYPE . (abstract_subprogram_declaration . 0)) (PROTECTED . 
(abstract_subprogram_declaration . 0)) (PROCEDURE . 
(abstract_subprogram_declaration . 0)) (PRAGMA . 
(abstract_subprogram_declaration . 0)) (PACKAGE . 
(abstract_subprogram_declaration . 0)) (OVERRIDING . 
(abstract_subprogram_declaration . 0)) (NOT . (abstract_subp [...]
       ((default . error) (USE . (subprogram_body_stub . 0)) (TYPE . 
(subprogram_body_stub . 0)) (TASK . (subprogram_body_stub . 0)) (SUBTYPE . 
(subprogram_body_stub . 0)) (PROTECTED . (subprogram_body_stub . 0)) (PROCEDURE 
. (subprogram_body_stub . 0)) (PRAGMA . (subprogram_body_stub . 0)) (PACKAGE . 
(subprogram_body_stub . 0)) (OVERRIDING . (subprogram_body_stub . 0)) (NOT . 
(subprogram_body_stub . 0)) (GENERIC . (subprogram_body_stub . 0)) (FUNCTION . 
(subprogram_body_stub . 0)) (FOR . [...]
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (SEMICOLON .  1109))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (SEMICOLON .  1107))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (SEMICOLON .  1105))
-      ((default . error) (ACCESS . (null_exclusion_opt . 1)) (IDENTIFIER .  
47) (CHARACTER_LITERAL .  49) (STRING_LITERAL .  48))
-      ((default . error) (BEGIN . (declaration . 8)) (IDENTIFIER . 
(declaration . 8)) (ENTRY . (declaration . 8)) (FOR . (declaration . 8)) 
(FUNCTION . (declaration . 8)) (GENERIC . (declaration . 8)) (NOT . 
(declaration . 8)) (OVERRIDING . (declaration . 8)) (PACKAGE . (declaration . 
8)) (PRAGMA . (declaration . 8)) (PROCEDURE . (declaration . 8)) (PROTECTED . 
(declaration . 8)) (SUBTYPE . (declaration . 8)) (TASK . (declaration . 8)) 
(TYPE . (declaration . 8)) (USE . (declaration . 8)) [...]
-      ((default . error) (SEMICOLON .  1104))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (SEMICOLON .  1123))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (SEMICOLON .  1121))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (SEMICOLON .  1119))
+      ((default . error) (ACCESS . (null_exclusion_opt . 1)) (IDENTIFIER .  
48) (CHARACTER_LITERAL .  50) (STRING_LITERAL .  49))
+      ((default . error) (BEGIN . (declaration . 9)) (IDENTIFIER . 
(declaration . 9)) (ENTRY . (declaration . 9)) (FOR . (declaration . 9)) 
(FUNCTION . (declaration . 9)) (GENERIC . (declaration . 9)) (NOT . 
(declaration . 9)) (OVERRIDING . (declaration . 9)) (PACKAGE . (declaration . 
9)) (PRAGMA . (declaration . 9)) (PROCEDURE . (declaration . 9)) (PROTECTED . 
(declaration . 9)) (SUBTYPE . (declaration . 9)) (TASK . (declaration . 9)) 
(TYPE . (declaration . 9)) (USE . (declaration . 9)) [...]
+      ((default . error) (SEMICOLON .  1118))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
       ((default . error) (WITH . (record_type_definition . 0)) (SEMICOLON . 
(record_type_definition . 0)))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (NOT .  730) (IDENTIFIER .  47) (CHARACTER_LITERAL .  
49) (STRING_LITERAL .  48))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (NOT .  736) (IDENTIFIER .  48) (CHARACTER_LITERAL .  
50) (STRING_LITERAL .  49))
       ((default . error) (BEGIN . (incomplete_type_declaration . 0)) 
(IDENTIFIER . (incomplete_type_declaration . 0)) (ENTRY . 
(incomplete_type_declaration . 0)) (FOR . (incomplete_type_declaration . 0)) 
(FUNCTION . (incomplete_type_declaration . 0)) (GENERIC . 
(incomplete_type_declaration . 0)) (NOT . (incomplete_type_declaration . 0)) 
(OVERRIDING . (incomplete_type_declaration . 0)) (PACKAGE . 
(incomplete_type_declaration . 0)) (PRAGMA . (incomplete_type_declaration . 0)) 
(PROCEDURE .  [...]
-      ((default . error) (IDENTIFIER .  1098) (STRING_LITERAL .  1099))
-      ((default . error) (SEMICOLON .  1097))
+      ((default . error) (IDENTIFIER .  1112) (STRING_LITERAL .  1113))
+      ((default . error) (SEMICOLON .  1111))
       ((default . error) (WHEN . (component_item . 1)) (END . (component_item 
. 1)) (FOR . (component_item . 1)) (IDENTIFIER . (component_item . 1)) (CASE . 
(component_item . 1)))
       ((default . error) (WHEN . (component_item . 0)) (END . (component_item 
. 0)) (FOR . (component_item . 0)) (IDENTIFIER . (component_item . 0)) (CASE . 
(component_item . 0)))
       ((default . error) (WHEN . (component_list . 0)) (END . (component_list 
. 0)) (CASE . (component_list . 0)) (IDENTIFIER . (component_list . 0)) (FOR . 
(component_list . 0)))
-      ((default . error) (END . (component_list_opt . 1)) (CASE .  994) 
(IDENTIFIER .  71) (FOR .  288))
-      ((default . error) (END .  1094))
-      ((default . error) (COMMA .  94) (COLON .  1093))
+      ((default . error) (END . (component_list_opt . 1)) (CASE .  1008) 
(IDENTIFIER .  72) (FOR .  289))
+      ((default . error) (END .  1108))
+      ((default . error) (COMMA .  95) (COLON .  1107))
       ((default . error) (WHEN . (component_list . 3)) (END . (component_list 
. 3)) (CASE . (component_list . 3)) (IDENTIFIER . (component_list . 3)) (FOR . 
(component_list . 3)))
-      ((default . error) (DOT_DOT .  1092))
+      ((default . error) (DOT_DOT .  1106))
       ((default . error) (SEMICOLON . (record_definition . 1)) (WITH . 
(record_definition . 1)))
       ((default . error) (SEMICOLON . (type_definition . 2)) (WITH . 
(type_definition . 2)))
       ((default . error) (COMMA . (enumeration_literal . 0)) (RIGHT_PAREN . 
(enumeration_literal . 0)))
       ((default . error) (COMMA . (enumeration_literal . 1)) (RIGHT_PAREN . 
(enumeration_literal . 1)))
       ((default . error) (RIGHT_PAREN . (enumeration_literal_list . 0)) (COMMA 
. (enumeration_literal_list . 0)))
-      ((default . error) (COMMA .  1090) (RIGHT_PAREN .  1091))
-      ((default . error) (WITH . (real_range_specification_opt . 0)) 
(SEMICOLON . (real_range_specification_opt . 0)) (RANGE .  1087))
-      ((default . error) (DIGITS .  1086) (WITH . 
(real_range_specification_opt . 0)) (SEMICOLON . (real_range_specification_opt 
. 0)) (RANGE .  1087))
+      ((default . error) (COMMA .  1104) (RIGHT_PAREN .  1105))
+      ((default . error) (WITH . (real_range_specification_opt . 0)) 
(SEMICOLON . (real_range_specification_opt . 0)) (RANGE .  1101))
+      ((default . error) (DIGITS .  1100) (WITH . 
(real_range_specification_opt . 0)) (SEMICOLON . (real_range_specification_opt 
. 0)) (RANGE .  1101))
       ((default . error) (NEW . ((abstract_limited_opt . 1) 
(abstract_limited_synchronized_opt . 1))))
       ((default . error) (BEGIN . (single_task_declaration . 1)) (IDENTIFIER . 
(single_task_declaration . 1)) (ENTRY . (single_task_declaration . 1)) (FOR . 
(single_task_declaration . 1)) (FUNCTION . (single_task_declaration . 1)) 
(GENERIC . (single_task_declaration . 1)) (NOT . (single_task_declaration . 1)) 
(OVERRIDING . (single_task_declaration . 1)) (PACKAGE . 
(single_task_declaration . 1)) (PRAGMA . (single_task_declaration . 1)) 
(PROCEDURE . (single_task_declaration . 1)) (PROTECTE [...]
-      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
691))
-      ((default . error) (END . (declarative_part_opt . 0)) (USE .  11) 
(SUBTYPE .  291) (PRAGMA .  7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(ENTRY . (overriding_indicator_opt . 2)) (FOR .  288) (IDENTIFIER .  287) (TYPE 
.  293) (GENERIC .  2) (PROTECTED .  290) (TASK .  292) (PACKAGE .  289))
-      ((default . error) (AND .  1047) (WITH .  1083))
-      ((default . error) (SEMICOLON .  1082))
+      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
695))
+      ((default . error) (END . (declarative_part_opt . 0)) (USE .  11) 
(SUBTYPE .  292) (PRAGMA .  7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(ENTRY . (overriding_indicator_opt . 2)) (FOR .  289) (IDENTIFIER .  288) (TYPE 
.  294) (GENERIC .  2) (PROTECTED .  291) (TASK .  293) (PACKAGE .  290))
+      ((default . error) (AND .  1061) (WITH .  1097))
+      ((default . error) (SEMICOLON .  1096))
       ((default . error) (USE . (task_type_declaration . 2)) (TYPE . 
(task_type_declaration . 2)) (TASK . (task_type_declaration . 2)) (SUBTYPE . 
(task_type_declaration . 2)) (PROTECTED . (task_type_declaration . 2)) 
(PROCEDURE . (task_type_declaration . 2)) (PRAGMA . (task_type_declaration . 
2)) (PACKAGE . (task_type_declaration . 2)) (OVERRIDING . 
(task_type_declaration . 2)) (NOT . (task_type_declaration . 2)) (GENERIC . 
(task_type_declaration . 2)) (FUNCTION . (task_type_declaration  [...]
-      ((default . error) (NEW .  1080) (END . (declarative_part_opt . 0)) 
(PRIVATE . (declarative_part_opt . 0)) (USE .  11) (SUBTYPE .  291) (PRAGMA .  
7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . (overriding_indicator_opt . 2)) 
(PROCEDURE . (overriding_indicator_opt . 2)) (ENTRY . (overriding_indicator_opt 
. 2)) (FOR .  288) (IDENTIFIER .  287) (TYPE .  293) (GENERIC .  2) (PROTECTED 
.  290) (TASK .  292) (PACKAGE .  289))
-      ((default . error) (DO . (subtype_indication . 1)) (LOOP . 
(subtype_indication . 1)) (COLON_EQUAL . (subtype_indication . 1)) (SEMICOLON . 
(subtype_indication . 1)) (OF . (subtype_indication . 1)) (AND . 
(subtype_indication . 1)) (WITH . (subtype_indication . 1)) (EQUAL_GREATER . 
(subtype_indication . 1)) (COMMA . (subtype_indication . 1)) (RIGHT_PAREN . 
(subtype_indication . 1)) (DOT .  86) (TICK .  87) (RANGE .  827) (LEFT_PAREN . 
 797))
+      ((default . error) (NEW .  1094) (END . (declarative_part_opt . 0)) 
(PRIVATE . (declarative_part_opt . 0)) (USE .  11) (SUBTYPE .  292) (PRAGMA .  
7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . (overriding_indicator_opt . 2)) 
(PROCEDURE . (overriding_indicator_opt . 2)) (ENTRY . (overriding_indicator_opt 
. 2)) (FOR .  289) (IDENTIFIER .  288) (TYPE .  294) (GENERIC .  2) (PROTECTED 
.  291) (TASK .  293) (PACKAGE .  290))
+      ((default . error) (DO . (subtype_indication . 1)) (LOOP . 
(subtype_indication . 1)) (COLON_EQUAL . (subtype_indication . 1)) (SEMICOLON . 
(subtype_indication . 1)) (OF . (subtype_indication . 1)) (AND . 
(subtype_indication . 1)) (WITH . (subtype_indication . 1)) (EQUAL_GREATER . 
(subtype_indication . 1)) (COMMA . (subtype_indication . 1)) (RIGHT_PAREN . 
(subtype_indication . 1)) (DOT .  87) (TICK .  88) (RANGE .  833) (LEFT_PAREN . 
 803))
       ((default . error) (LOOP . (constraint . 0)) (EQUAL_GREATER . 
(constraint . 0)) (DO . (constraint . 0)) (OF . (constraint . 0)) (AND . 
(constraint . 0)) (SEMICOLON . (constraint . 0)) (WITH . (constraint . 0)) 
(COLON_EQUAL . (constraint . 0)) (RIGHT_PAREN . (constraint . 0)) (COMMA . 
(constraint . 0)))
       ((default . error) (USE . (subtype_declaration . 0)) (TYPE . 
(subtype_declaration . 0)) (TASK . (subtype_declaration . 0)) (SUBTYPE . 
(subtype_declaration . 0)) (PROTECTED . (subtype_declaration . 0)) (PROCEDURE . 
(subtype_declaration . 0)) (PRAGMA . (subtype_declaration . 0)) (PACKAGE . 
(subtype_declaration . 0)) (OVERRIDING . (subtype_declaration . 0)) (NOT . 
(subtype_declaration . 0)) (GENERIC . (subtype_declaration . 0)) (FUNCTION . 
(subtype_declaration . 0)) (FOR . (subtype_de [...]
       ((default . error) (BEGIN . (single_protected_declaration . 1)) 
(IDENTIFIER . (single_protected_declaration . 1)) (ENTRY . 
(single_protected_declaration . 1)) (FOR . (single_protected_declaration . 1)) 
(FUNCTION . (single_protected_declaration . 1)) (GENERIC . 
(single_protected_declaration . 1)) (NOT . (single_protected_declaration . 1)) 
(OVERRIDING . (single_protected_declaration . 1)) (PACKAGE . 
(single_protected_declaration . 1)) (PRAGMA . (single_protected_declaration . 
1)) (PR [...]
-      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
691))
-      ((default . error) (END . (declarative_part_opt . 0)) (USE .  11) 
(SUBTYPE .  291) (PRAGMA .  7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(ENTRY . (overriding_indicator_opt . 2)) (FOR .  288) (IDENTIFIER .  287) (TYPE 
.  293) (GENERIC .  2) (PROTECTED .  290) (TASK .  292) (PACKAGE .  289))
-      ((default . error) (AND .  1047) (WITH .  1076))
-      ((default . error) (SEMICOLON .  1075))
-      ((default . error) (NEW .  1073) (END . (declarative_part_opt . 0)) 
(PRIVATE . (declarative_part_opt . 0)) (USE .  11) (SUBTYPE .  291) (PRAGMA .  
7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . (overriding_indicator_opt . 2)) 
(PROCEDURE . (overriding_indicator_opt . 2)) (ENTRY . (overriding_indicator_opt 
. 2)) (FOR .  288) (IDENTIFIER .  287) (TYPE .  293) (GENERIC .  2) (PROTECTED 
.  290) (TASK .  292) (PACKAGE .  289))
-      ((default . error) (SEMICOLON .  1072))
+      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
695))
+      ((default . error) (END . (declarative_part_opt . 0)) (USE .  11) 
(SUBTYPE .  292) (PRAGMA .  7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(ENTRY . (overriding_indicator_opt . 2)) (FOR .  289) (IDENTIFIER .  288) (TYPE 
.  294) (GENERIC .  2) (PROTECTED .  291) (TASK .  293) (PACKAGE .  290))
+      ((default . error) (AND .  1061) (WITH .  1090))
+      ((default . error) (SEMICOLON .  1089))
+      ((default . error) (NEW .  1087) (END . (declarative_part_opt . 0)) 
(PRIVATE . (declarative_part_opt . 0)) (USE .  11) (SUBTYPE .  292) (PRAGMA .  
7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . (overriding_indicator_opt . 2)) 
(PROCEDURE . (overriding_indicator_opt . 2)) (ENTRY . (overriding_indicator_opt 
. 2)) (FOR .  289) (IDENTIFIER .  288) (TYPE .  294) (GENERIC .  2) (PROTECTED 
.  291) (TASK .  293) (PACKAGE .  290))
+      ((default . error) (SEMICOLON .  1086))
       ((default . error) (WHEN . (at_clause . 0)) (BEGIN . (at_clause . 0)) 
(IDENTIFIER . (at_clause . 0)) (ENTRY . (at_clause . 0)) (FOR . (at_clause . 
0)) (FUNCTION . (at_clause . 0)) (GENERIC . (at_clause . 0)) (NOT . (at_clause 
. 0)) (OVERRIDING . (at_clause . 0)) (PACKAGE . (at_clause . 0)) (PRAGMA . 
(at_clause . 0)) (PROCEDURE . (at_clause . 0)) (PROTECTED . (at_clause . 0)) 
(SUBTYPE . (at_clause . 0)) (TASK . (at_clause . 0)) (TYPE . (at_clause . 0)) 
(USE . (at_clause . 0)) (CASE  [...]
-      ((default . error) (AT .  1071))
+      ((default . error) (AT .  1085))
       ((default . error) (END . (component_clause_list . 0)) (IDENTIFIER . 
(component_clause_list . 0)))
-      ((default . error) (END .  1069) (IDENTIFIER .  1031))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (DOT .  86) (TICK .  87) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  107) (LEFT_PAREN .  105))
-      ((default . error) (SEMICOLON .  1066))
-      ((default . error) (SEMICOLON .  1065))
-      ((default . error) (ALIASED .  1060) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (ACCESS . (null_exclusion_opt 
. 0)) (NOT .  856))
+      ((default . error) (END .  1083) (IDENTIFIER .  1045))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (DOT .  87) (TICK .  88) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  108) (LEFT_PAREN .  106))
+      ((default . error) (SEMICOLON .  1080))
+      ((default . error) (SEMICOLON .  1079))
+      ((default . error) (ALIASED .  1074) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (ACCESS . (null_exclusion_opt 
. 0)) (NOT .  862))
       ((default . error) (RIGHT_PAREN . (discrete_subtype_definition_list . 
1)) (COMMA . (discrete_subtype_definition_list . 1)))
-      ((default . error) (ALIASED .  1060) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (ACCESS . (null_exclusion_opt 
. 0)) (NOT .  856))
+      ((default . error) (ALIASED .  1074) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (ACCESS . (null_exclusion_opt 
. 0)) (NOT .  862))
       ((default . error) (RIGHT_PAREN . (index_subtype_definition_list . 1)) 
(COMMA . (index_subtype_definition_list . 1)))
-      ((default . error) (DOT .  86) (RANGE .  1059) (TICK .  87) (LEFT_PAREN 
.  105))
+      ((default . error) (DOT .  87) (RANGE .  1073) (TICK .  88) (LEFT_PAREN 
.  106))
       ((default . error) (COMMA . (index_subtype_definition . 0)) (RIGHT_PAREN 
. (index_subtype_definition . 0)))
-      ((default . error) (NULL .  1058) (NEW .  147) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (COMMA .  803) (RIGHT_PAREN .  1057))
-      ((default . error) (COMMA . (discrete_subtype_definition . 1)) (BAR . 
(discrete_choice . 2)) (EQUAL_GREATER . (discrete_choice . 2)) (RIGHT_PAREN . 
((discrete_subtype_definition . 1)  259)))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
+      ((default . error) (NULL .  1072) (NEW .  148) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (COMMA .  809) (RIGHT_PAREN .  1071))
+      ((default . error) (COMMA . (discrete_subtype_definition . 1)) (BAR . 
(discrete_choice . 2)) (EQUAL_GREATER . (discrete_choice . 2)) (RIGHT_PAREN . 
((discrete_subtype_definition . 1)  260)))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
       ((default . error) (SEMICOLON . (formal_derived_type_definition . 1)) 
(WITH . (formal_derived_type_definition . 1)))
-      ((default . error) (SEMICOLON . (formal_derived_type_definition . 2)) 
(AND .  1047) (WITH . ((formal_derived_type_definition . 2)  1055)))
+      ((default . error) (SEMICOLON . (formal_derived_type_definition . 2)) 
(AND .  1061) (WITH . ((formal_derived_type_definition . 2)  1069)))
       ((default . error) (WITH . (formal_package_actual_part . 0)) (SEMICOLON 
. (formal_package_actual_part . 0)))
       ((default . error) (PACKAGE . (formal_package_declaration . 0)) 
(PROCEDURE . (formal_package_declaration . 0)) (FUNCTION . 
(formal_package_declaration . 0)) (IDENTIFIER . (formal_package_declaration . 
0)) (PRAGMA . (formal_package_declaration . 0)) (TYPE . 
(formal_package_declaration . 0)) (WITH . (formal_package_declaration . 0)))
       ((default . error) (PACKAGE . (formal_object_declaration . 0)) 
(PROCEDURE . (formal_object_declaration . 0)) (FUNCTION . 
(formal_object_declaration . 0)) (IDENTIFIER . (formal_object_declaration . 0)) 
(PRAGMA . (formal_object_declaration . 0)) (TYPE . (formal_object_declaration . 
0)) (WITH . (formal_object_declaration . 0)))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (RIGHT_PAREN . (parameter_specification . 0)) 
(SEMICOLON . (parameter_specification . 0)))
-      ((default . error) (PRIVATE .  1218))
-      ((default . error) (DOT .  86) (TICK .  87) (WITH . (interface_list . 
1)) (SEMICOLON . (interface_list . 1)) (AND . (interface_list . 1)) (LEFT_PAREN 
.  105))
+      ((default . error) (PRIVATE .  1232))
+      ((default . error) (DOT .  87) (TICK .  88) (WITH . (interface_list . 
1)) (SEMICOLON . (interface_list . 1)) (AND . (interface_list . 1)) (LEFT_PAREN 
.  106))
       ((default . error) (LOOP . (index_constraint . 0)) (DO . 
(index_constraint . 0)) (EQUAL_GREATER . (index_constraint . 0)) (COMMA . 
(index_constraint . 0)) (RIGHT_PAREN . (index_constraint . 0)) (COLON_EQUAL . 
(index_constraint . 0)) (WITH . (index_constraint . 0)) (SEMICOLON . 
(index_constraint . 0)) (AND . (index_constraint . 0)) (OF . (index_constraint 
. 0)))
-      ((default . error) (PLUS . (primary . 0)) (MINUS . (primary . 0)) 
(AMPERSAND . (primary . 0)) (DOT_DOT . (primary . 0)) (SLASH . (primary . 0)) 
(STAR . (primary . 0)) (MOD . (primary . 0)) (REM . (primary . 0)) (XOR . 
(primary . 0)) (OR . (primary . 0)) (AND . (primary . 0)) (EQUAL_GREATER . 
(primary . 0)) (BAR . (primary . 0)) (IN . (primary . 0)) (NOT . (primary . 0)) 
(EQUAL . (primary . 0)) (GREATER . (primary . 0)) (GREATER_EQUAL . (primary . 
0)) (LESS . (primary . 0)) (LESS_EQ [...]
-      ((default . error) (BOX .  1043))
-      ((default . error) (ACCESS . (null_exclusion_opt . 0)) (NOT .  856) 
(IDENTIFIER .  47) (CHARACTER_LITERAL .  49) (STRING_LITERAL .  48))
+      ((default . error) (PLUS . (primary . 0)) (MINUS . (primary . 0)) 
(AMPERSAND . (primary . 0)) (DOT_DOT . (primary . 0)) (SLASH . (primary . 0)) 
(STAR . (primary . 0)) (MOD . (primary . 0)) (REM . (primary . 0)) (XOR . 
(primary . 0)) (OR . (primary . 0)) (AND . (primary . 0)) (EQUAL_GREATER . 
(primary . 0)) (BAR . (primary . 0)) (IN . (primary . 0)) (NOT . (primary . 0)) 
(EQUAL . (primary . 0)) (GREATER . (primary . 0)) (GREATER_EQUAL . (primary . 
0)) (LESS . (primary . 0)) (LESS_EQ [...]
+      ((default . error) (BOX .  1057))
+      ((default . error) (ACCESS . (null_exclusion_opt . 0)) (NOT .  862) 
(IDENTIFIER .  48) (CHARACTER_LITERAL .  50) (STRING_LITERAL .  49))
       ((default . error) (WITH . (component_definition . 3)) (SEMICOLON . 
(component_definition . 3)) (COLON_EQUAL . (component_definition . 3)))
       ((default . error) (WITH . (array_type_definition . 0)) (SEMICOLON . 
(array_type_definition . 0)) (COLON_EQUAL . (array_type_definition . 0)))
       ((default . error) (WITH . (component_definition . 1)) (SEMICOLON . 
(component_definition . 1)) (COLON_EQUAL . (component_definition . 1)))
       ((default . error) (WITH . (array_type_definition . 1)) (SEMICOLON . 
(array_type_definition . 1)) (COLON_EQUAL . (array_type_definition . 1)))
       ((default . error) (END . (object_renaming_declaration . 2)) (PRIVATE . 
(object_renaming_declaration . 2)) (USE . (object_renaming_declaration . 2)) 
(TYPE . (object_renaming_declaration . 2)) (TASK . (object_renaming_declaration 
. 2)) (SUBTYPE . (object_renaming_declaration . 2)) (PROTECTED . 
(object_renaming_declaration . 2)) (PROCEDURE . (object_renaming_declaration . 
2)) (PRAGMA . (object_renaming_declaration . 2)) (PACKAGE . 
(object_renaming_declaration . 2)) (OVERRIDING . (obj [...]
       ((default . error) (END . (object_renaming_declaration . 1)) (PRIVATE . 
(object_renaming_declaration . 1)) (USE . (object_renaming_declaration . 1)) 
(TYPE . (object_renaming_declaration . 1)) (TASK . (object_renaming_declaration 
. 1)) (SUBTYPE . (object_renaming_declaration . 1)) (PROTECTED . 
(object_renaming_declaration . 1)) (PROCEDURE . (object_renaming_declaration . 
1)) (PRAGMA . (object_renaming_declaration . 1)) (PACKAGE . 
(object_renaming_declaration . 1)) (OVERRIDING . (obj [...]
-      ((default . error) (SEMICOLON .  1214))
-      ((default . error) (SEMICOLON .  1213))
-      ((default . error) (RECORD .  1212))
+      ((default . error) (SEMICOLON .  1228))
+      ((default . error) (SEMICOLON .  1227))
+      ((default . error) (RECORD .  1226))
       ((default . error) (IDENTIFIER . (component_clause_list . 1)) (END . 
(component_clause_list . 1)))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (PRIVATE . (package_body_stub . 0)) (END . 
(package_body_stub . 0)) (BEGIN . (package_body_stub . 0)) (IDENTIFIER . 
(package_body_stub . 0)) (ENTRY . (package_body_stub . 0)) (FOR . 
(package_body_stub . 0)) (FUNCTION . (package_body_stub . 0)) (GENERIC . 
(package_body_stub . 0)) (NOT . (package_body_stub . 0)) (OVERRIDING . 
(package_body_stub . 0)) (PACKAGE . (package_body_stub . 0)) (PRAGMA . 
(package_body_stub . 0)) (PROCEDURE . (package_body_stub . 0)) (PROTEC [...]
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (SEMICOLON .  1209))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (SEMICOLON .  1223))
       ((default . error) (PRIVATE . (protected_body_stub . 0)) (END . 
(protected_body_stub . 0)) (BEGIN . (protected_body_stub . 0)) (IDENTIFIER . 
(protected_body_stub . 0)) (ENTRY . (protected_body_stub . 0)) (FOR . 
(protected_body_stub . 0)) (FUNCTION . (protected_body_stub . 0)) (GENERIC . 
(protected_body_stub . 0)) (NOT . (protected_body_stub . 0)) (OVERRIDING . 
(protected_body_stub . 0)) (PACKAGE . (protected_body_stub . 0)) (PRAGMA . 
(protected_body_stub . 0)) (PROCEDURE . (protect [...]
-      ((default . error) (END . (declarative_part_opt . 0)) (PRIVATE . 
(declarative_part_opt . 0)) (USE .  11) (SUBTYPE .  291) (PRAGMA .  7) (NOT .  
4) (OVERRIDING .  5) (FUNCTION . (overriding_indicator_opt . 2)) (PROCEDURE . 
(overriding_indicator_opt . 2)) (ENTRY . (overriding_indicator_opt . 2)) (FOR . 
 288) (IDENTIFIER .  287) (TYPE .  293) (GENERIC .  2) (PROTECTED .  290) (TASK 
.  292) (PACKAGE .  289))
-      ((default . error) (END .  1207))
+      ((default . error) (END . (declarative_part_opt . 0)) (PRIVATE . 
(declarative_part_opt . 0)) (USE .  11) (SUBTYPE .  292) (PRAGMA .  7) (NOT .  
4) (OVERRIDING .  5) (FUNCTION . (overriding_indicator_opt . 2)) (PROCEDURE . 
(overriding_indicator_opt . 2)) (ENTRY . (overriding_indicator_opt . 2)) (FOR . 
 289) (IDENTIFIER .  288) (TYPE .  294) (GENERIC .  2) (PROTECTED .  291) (TASK 
.  293) (PACKAGE .  290))
+      ((default . error) (END .  1221))
       ((default . error) (SEMICOLON . (protected_definition . 1)))
       ((default . error) (LOOP . (subtype_indication . 0)) (DO . 
(subtype_indication . 0)) (RIGHT_PAREN . (subtype_indication . 0)) (COMMA . 
(subtype_indication . 0)) (EQUAL_GREATER . (subtype_indication . 0)) (WITH . 
(subtype_indication . 0)) (AND . (subtype_indication . 0)) (OF . 
(subtype_indication . 0)) (SEMICOLON . (subtype_indication . 0)) (COLON_EQUAL . 
(subtype_indication . 0)))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (SEMICOLON .  1205))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (SEMICOLON .  1219))
       ((default . error) (PRIVATE . (task_body_stub . 0)) (END . 
(task_body_stub . 0)) (BEGIN . (task_body_stub . 0)) (IDENTIFIER . 
(task_body_stub . 0)) (ENTRY . (task_body_stub . 0)) (FOR . (task_body_stub . 
0)) (FUNCTION . (task_body_stub . 0)) (GENERIC . (task_body_stub . 0)) (NOT . 
(task_body_stub . 0)) (OVERRIDING . (task_body_stub . 0)) (PACKAGE . 
(task_body_stub . 0)) (PRAGMA . (task_body_stub . 0)) (PROCEDURE . 
(task_body_stub . 0)) (PROTECTED . (task_body_stub . 0)) (SUBTYPE .  [...]
-      ((default . error) (END . (declarative_part_opt . 0)) (PRIVATE . 
(declarative_part_opt . 0)) (USE .  11) (SUBTYPE .  291) (PRAGMA .  7) (NOT .  
4) (OVERRIDING .  5) (FUNCTION . (overriding_indicator_opt . 2)) (PROCEDURE . 
(overriding_indicator_opt . 2)) (ENTRY . (overriding_indicator_opt . 2)) (FOR . 
 288) (IDENTIFIER .  287) (TYPE .  293) (GENERIC .  2) (PROTECTED .  290) (TASK 
.  292) (PACKAGE .  289))
-      ((default . error) (END .  1203))
+      ((default . error) (END . (declarative_part_opt . 0)) (PRIVATE . 
(declarative_part_opt . 0)) (USE .  11) (SUBTYPE .  292) (PRAGMA .  7) (NOT .  
4) (OVERRIDING .  5) (FUNCTION . (overriding_indicator_opt . 2)) (PROCEDURE . 
(overriding_indicator_opt . 2)) (ENTRY . (overriding_indicator_opt . 2)) (FOR . 
 289) (IDENTIFIER .  288) (TYPE .  294) (GENERIC .  2) (PROTECTED .  291) (TASK 
.  293) (PACKAGE .  290))
+      ((default . error) (END .  1217))
       ((default . error) (SEMICOLON . (task_definition . 1)))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (WITH . (type_definition . 4)) (SEMICOLON . 
(type_definition . 4)))
       ((default . error) (WITH . (type_definition . 3)) (SEMICOLON . 
(type_definition . 3)))
-      ((default . error) (IDENTIFIER .  1006) (CHARACTER_LITERAL .  1007))
+      ((default . error) (IDENTIFIER .  1020) (CHARACTER_LITERAL .  1021))
       ((default . error) (SEMICOLON . (enumeration_type_definition . 0)) (WITH 
. (enumeration_type_definition . 0)))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (ALIASED .  1060) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (ACCESS . (null_exclusion_opt 
. 0)) (NOT .  856))
-      ((default . error) (RECORD .  1197))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (ALIASED .  1074) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (ACCESS . (null_exclusion_opt 
. 0)) (NOT .  862))
+      ((default . error) (RECORD .  1211))
       ((default . error) (WHEN . (component_list . 1)) (FOR . (component_list 
. 1)) (IDENTIFIER . (component_list . 1)) (CASE . (component_list . 1)) (END . 
(component_list . 1)))
       ((default . error) (WHEN . (component_list . 2)) (FOR . (component_list 
. 2)) (IDENTIFIER . (component_list . 2)) (CASE . (component_list . 2)) (END . 
(component_list . 2)))
       ((default . error) (WHEN . (component_list . 4)) (FOR . (component_list 
. 4)) (IDENTIFIER . (component_list . 4)) (CASE . (component_list . 4)) (END . 
(component_list . 4)))
       ((default . error) (IS . (direct_name . 0)))
       ((default . error) (IS . (direct_name . 1)))
-      ((default . error) (IS .  1196))
-      ((default . error) (WITH . (and_interface_list_opt . 0)) (AND .  1191))
-      ((default . error) (DOT .  86) (TICK .  87) (AND .  1191) (WITH . 
((and_interface_list_opt . 0) (constraint_opt . 0))) (SEMICOLON . 
(constraint_opt . 0)) (RANGE .  827) (LEFT_PAREN .  797))
-      ((default . error) (SEMICOLON .  1190))
+      ((default . error) (IS .  1210))
+      ((default . error) (WITH . (and_interface_list_opt . 0)) (AND .  1205))
+      ((default . error) (DOT .  87) (TICK .  88) (AND .  1205) (WITH . 
((and_interface_list_opt . 0) (constraint_opt . 0))) (SEMICOLON . 
(constraint_opt . 0)) (RANGE .  833) (LEFT_PAREN .  803))
+      ((default . error) (SEMICOLON .  1204))
       ((default . error) (END . (full_type_declaration . 0)) (PRIVATE . 
(full_type_declaration . 0)) (USE . (full_type_declaration . 0)) (TYPE . 
(full_type_declaration . 0)) (TASK . (full_type_declaration . 0)) (SUBTYPE . 
(full_type_declaration . 0)) (PROTECTED . (full_type_declaration . 0)) 
(PROCEDURE . (full_type_declaration . 0)) (PRAGMA . (full_type_declaration . 
0)) (PACKAGE . (full_type_declaration . 0)) (OVERRIDING . 
(full_type_declaration . 0)) (NOT . (full_type_declaration . 0)) [...]
       ((default . error) (PRIVATE . (object_declaration . 3)) (END . 
(object_declaration . 3)) (BEGIN . (object_declaration . 3)) (IDENTIFIER . 
(object_declaration . 3)) (ENTRY . (object_declaration . 3)) (FOR . 
(object_declaration . 3)) (FUNCTION . (object_declaration . 3)) (GENERIC . 
(object_declaration . 3)) (NOT . (object_declaration . 3)) (OVERRIDING . 
(object_declaration . 3)) (PACKAGE . (object_declaration . 3)) (PRAGMA . 
(object_declaration . 3)) (PROCEDURE . (object_declaration  [...]
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
       ((default . error) (PRIVATE . (object_declaration . 5)) (END . 
(object_declaration . 5)) (BEGIN . (object_declaration . 5)) (IDENTIFIER . 
(object_declaration . 5)) (ENTRY . (object_declaration . 5)) (FOR . 
(object_declaration . 5)) (FUNCTION . (object_declaration . 5)) (GENERIC . 
(object_declaration . 5)) (NOT . (object_declaration . 5)) (OVERRIDING . 
(object_declaration . 5)) (PACKAGE . (object_declaration . 5)) (PRAGMA . 
(object_declaration . 5)) (PROCEDURE . (object_declaration  [...]
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
       ((default . error) (PRIVATE . (object_declaration . 1)) (END . 
(object_declaration . 1)) (BEGIN . (object_declaration . 1)) (IDENTIFIER . 
(object_declaration . 1)) (ENTRY . (object_declaration . 1)) (FOR . 
(object_declaration . 1)) (FUNCTION . (object_declaration . 1)) (GENERIC . 
(object_declaration . 1)) (NOT . (object_declaration . 1)) (OVERRIDING . 
(object_declaration . 1)) (PACKAGE . (object_declaration . 1)) (PRAGMA . 
(object_declaration . 1)) (PROCEDURE . (object_declaration  [...]
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
       ((default . error) (END . (package_body . 0)) (BEGIN . (package_body . 
0)) (IDENTIFIER . (package_body . 0)) (ENTRY . (package_body . 0)) (FOR . 
(package_body . 0)) (PROTECTED . (package_body . 0)) (SUBTYPE . (package_body . 
0)) (TASK . (package_body . 0)) (TYPE . (package_body . 0)) (WITH . 
(package_body . 0)) (USE . (package_body . 0)) (SEPARATE . (package_body . 0)) 
(PROCEDURE . (package_body . 0)) (PRIVATE . (package_body . 0)) (PRAGMA . 
(package_body . 0)) (PACKAGE . (package_ [...]
       ((default . error) (COMMA . (case_expression_alternative . 0)) 
(RIGHT_PAREN . (case_expression_alternative . 0)))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (DOT .  86) (TICK .  87) (LOOP . 
(iterator_specification . 3)) (EQUAL_GREATER . (iterator_specification . 3)) 
(LEFT_PAREN .  105))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (DOT .  87) (TICK .  88) (LOOP . 
(iterator_specification . 3)) (EQUAL_GREATER . (iterator_specification . 3)) 
(LEFT_PAREN .  106))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (RIGHT_PAREN . (if_expression . 0)))
-      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
691))
+      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
695))
       ((default . error) (PROCEDURE . (protected_operation_item_list . 1)) 
(OVERRIDING . (protected_operation_item_list . 1)) (NOT . 
(protected_operation_item_list . 1)) (FUNCTION . (protected_operation_item_list 
. 1)) (FOR . (protected_operation_item_list . 1)) (ENTRY . 
(protected_operation_item_list . 1)) (END . (protected_operation_item_list . 
1)))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (IS . 
(aspect_specification_opt . 0)) (WITH .  107))
-      ((default . error) (WHEN . (parameter_profile_opt . 0)) (LEFT_PAREN .  
1180))
-      ((default . error) (END . (sequence_of_statements_opt . 0)) (EXCEPTION . 
(sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . (label_opt . 0)) (ABORT 
. (label_opt . 0)) (DELAY . (label_opt .  [...]
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (IS . 
(aspect_specification_opt . 0)) (WITH .  108))
+      ((default . error) (WHEN . (parameter_profile_opt . 0)) (LEFT_PAREN .  
1194))
+      ((default . error) (END . (sequence_of_statements_opt . 0)) (EXCEPTION . 
(sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . (label_opt . 0)) (ABORT 
. (label_opt . 0)) (DELAY . (label_opt .  [...]
       ((default . error) (THEN . (accept_statement . 1)) (WHEN . 
(accept_statement . 1)) (EXCEPTION . (accept_statement . 1)) (ELSIF . 
(accept_statement . 1)) (ELSE . (accept_statement . 1)) (OR . (accept_statement 
. 1)) (END . (accept_statement . 1)) (LESS_LESS . (accept_statement . 1)) 
(IDENTIFIER . (accept_statement . 1)) (STRING_LITERAL . (accept_statement . 1)) 
(CHARACTER_LITERAL . (accept_statement . 1)) (ACCEPT . (accept_statement . 1)) 
(ABORT . (accept_statement . 1)) (BEGIN . (a [...]
-      ((default . error) (END . (sequence_of_statements_opt . 0)) (EXCEPTION . 
(sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . (label_opt . 0)) (ABORT 
. (label_opt . 0)) (DELAY . (label_opt .  [...]
+      ((default . error) (END . (sequence_of_statements_opt . 0)) (EXCEPTION . 
(sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . (label_opt . 0)) (ABORT 
. (label_opt . 0)) (DELAY . (label_opt .  [...]
       ((default . error) (OR . (block_statement . 1)) (THEN . (block_statement 
. 1)) (WHEN . (block_statement . 1)) (EXCEPTION . (block_statement . 1)) (END . 
(block_statement . 1)) (LESS_LESS . (block_statement . 1)) (IDENTIFIER . 
(block_statement . 1)) (STRING_LITERAL . (block_statement . 1)) 
(CHARACTER_LITERAL . (block_statement . 1)) (ACCEPT . (block_statement . 1)) 
(ABORT . (block_statement . 1)) (BEGIN . (block_statement . 1)) (CASE . 
(block_statement . 1)) (DECLARE . (block_statem [...]
-      ((default . error) (CASE .  1177))
-      ((default . error) (WHEN . (case_statement_alternative_list . 2)) (END . 
(case_statement_alternative_list . 2)))
-      ((default . error) (BAR .  274) (EQUAL_GREATER .  1176))
-      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
691))
+      ((default . error) (CASE .  1191))
+      ((default . error) (WHEN . (case_statement_alternative_list . 1)) (END . 
(case_statement_alternative_list . 1)))
+      ((default . error) (BAR .  275) (EQUAL_GREATER .  1190))
+      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
695))
       ((default . error) (OR . (exit_statement . 0)) (THEN . (exit_statement . 
0)) (WHEN . (exit_statement . 0)) (EXCEPTION . (exit_statement . 0)) (END . 
(exit_statement . 0)) (LESS_LESS . (exit_statement . 0)) (IDENTIFIER . 
(exit_statement . 0)) (STRING_LITERAL . (exit_statement . 0)) 
(CHARACTER_LITERAL . (exit_statement . 0)) (ACCEPT . (exit_statement . 0)) 
(ABORT . (exit_statement . 0)) (BEGIN . (exit_statement . 0)) (CASE . 
(exit_statement . 0)) (DECLARE . (exit_statement . 0)) (DEL [...]
-      ((default . error) (END . (sequence_of_statements_opt . 0)) (ACCEPT . 
(label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . 
(label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) (LOOP . 
(label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . 
(label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . 
(label_opt . 0)) (ABORT . (label_opt . 0)) (DELAY . (label_opt . 0)) (EXIT . 
(label_opt . 0)) (GOTO . (label_opt [...]
-      ((default . error) (THEN . (expression_opt . 0)) (PLUS .  143) (MINUS .  
142) (ABS .  145) (NOT .  148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (IF .  1172))
+      ((default . error) (END . (sequence_of_statements_opt . 0)) (ACCEPT . 
(label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . 
(label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) (LOOP . 
(label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . 
(label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . 
(label_opt . 0)) (ABORT . (label_opt . 0)) (DELAY . (label_opt . 0)) (EXIT . 
(label_opt . 0)) (GOTO . (label_opt [...]
+      ((default . error) (THEN . (expression_opt . 0)) (PLUS .  144) (MINUS .  
143) (ABS .  146) (NOT .  149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (IF .  1186))
       ((default . error) (END . (elsif_statement_list . 0)) (ELSE . 
(elsif_statement_list . 0)) (ELSIF . (elsif_statement_list . 0)))
-      ((default . error) (END .  1170) (ELSE .  1169) (ELSIF .  1132))
-      ((default . error) (SEMICOLON .  1168))
+      ((default . error) (END .  1184) (ELSE .  1183) (ELSIF .  1146))
+      ((default . error) (SEMICOLON .  1182))
       ((default . error) (OR . (raise_statement . 1)) (THEN . (raise_statement 
. 1)) (WHEN . (raise_statement . 1)) (EXCEPTION . (raise_statement . 1)) (END . 
(raise_statement . 1)) (LESS_LESS . (raise_statement . 1)) (IDENTIFIER . 
(raise_statement . 1)) (STRING_LITERAL . (raise_statement . 1)) 
(CHARACTER_LITERAL . (raise_statement . 1)) (ACCEPT . (raise_statement . 1)) 
(ABORT . (raise_statement . 1)) (BEGIN . (raise_statement . 1)) (CASE . 
(raise_statement . 1)) (DECLARE . (raise_statem [...]
       ((default . error) (OR . (requeue_statement . 0)) (THEN . 
(requeue_statement . 0)) (WHEN . (requeue_statement . 0)) (EXCEPTION . 
(requeue_statement . 0)) (END . (requeue_statement . 0)) (LESS_LESS . 
(requeue_statement . 0)) (IDENTIFIER . (requeue_statement . 0)) (STRING_LITERAL 
. (requeue_statement . 0)) (CHARACTER_LITERAL . (requeue_statement . 0)) 
(ACCEPT . (requeue_statement . 0)) (ABORT . (requeue_statement . 0)) (BEGIN . 
(requeue_statement . 0)) (CASE . (requeue_statement . 0) [...]
-      ((default . error) (RETURN .  1167))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (ACCESS . (null_exclusion_opt . 0)) (NOT .  856))
-      ((default . error) (END .  1163))
-      ((default . error) (SELECT .  1162))
+      ((default . error) (RETURN .  1181))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (ACCESS . (null_exclusion_opt . 0)) (NOT .  862))
+      ((default . error) (END .  1177))
+      ((default . error) (SELECT .  1176))
       ((default . error) (OR . (selective_accept . 1)) (THEN . 
(selective_accept . 1)) (WHEN . (selective_accept . 1)) (EXCEPTION . 
(selective_accept . 1)) (END . (selective_accept . 1)) (LESS_LESS . 
(selective_accept . 1)) (IDENTIFIER . (selective_accept . 1)) (STRING_LITERAL . 
(selective_accept . 1)) (CHARACTER_LITERAL . (selective_accept . 1)) (ACCEPT . 
(selective_accept . 1)) (ABORT . (selective_accept . 1)) (BEGIN . 
(selective_accept . 1)) (CASE . (selective_accept . 1)) (DECLARE .  [...]
-      ((default . error) (SELECT .  1161))
+      ((default . error) (SELECT .  1175))
       ((default . error) (END . (delay_alternative . 0)) (OR . 
(delay_alternative . 0)) (ELSE . (delay_alternative . 0)))
-      ((default . error) (SELECT .  1160))
-      ((default . error) (SEMICOLON .  1159))
-      ((default . error) (ELSE . (sequence_of_statements_opt . 0)) (OR . 
(sequence_of_statements_opt . 0)) (END . (sequence_of_statements_opt . 0)) 
(ACCEPT . (label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) 
(DECLARE . (label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) 
(LOOP . (label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) 
(WHILE . (label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL 
. (label_opt . 0)) (ABORT . (lab [...]
+      ((default . error) (SELECT .  1174))
+      ((default . error) (SEMICOLON .  1173))
+      ((default . error) (ELSE . (sequence_of_statements_opt . 0)) (OR . 
(sequence_of_statements_opt . 0)) (END . (sequence_of_statements_opt . 0)) 
(ACCEPT . (label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) 
(DECLARE . (label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) 
(LOOP . (label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) 
(WHILE . (label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL 
. (label_opt . 0)) (ABORT . (lab [...]
       ((default . error) (END . (select_alternative . 2)) (OR . 
(select_alternative . 2)) (ELSE . (select_alternative . 2)))
-      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
691))
-      ((default . error) (OTHERS .  926) (IDENTIFIER .  47) (CHARACTER_LITERAL 
.  49) (STRING_LITERAL .  48))
-      ((default . error) (WHEN . (sequence_of_statements_opt . 0)) (END . 
(sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . (label_opt . 0)) (ABORT 
. (label_opt . 0)) (DELAY . (label_opt . 0)) ( [...]
-      ((default . error) (OTHERS .  926) (IDENTIFIER .  47) (CHARACTER_LITERAL 
.  49) (STRING_LITERAL .  48))
-      ((default . error) (BAR .  1151) (EQUAL_GREATER .  1260))
+      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
695))
+      ((default . error) (OTHERS .  936) (IDENTIFIER .  48) (CHARACTER_LITERAL 
.  50) (STRING_LITERAL .  49))
+      ((default . error) (WHEN . (sequence_of_statements_opt . 0)) (END . 
(sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . (label_opt . 0)) (ABORT 
. (label_opt . 0)) (DELAY . (label_opt . 0)) ( [...]
+      ((default . error) (OTHERS .  936) (IDENTIFIER .  48) (CHARACTER_LITERAL 
.  50) (STRING_LITERAL .  49))
+      ((default . error) (BAR .  1165) (EQUAL_GREATER .  1274))
       ((default . error) (WHEN . (exception_handler . 1)) (END . 
(exception_handler . 1)))
       ((default . error) (EQUAL_GREATER . (exception_choice_list . 1)) (BAR . 
(exception_choice_list . 1)))
-      ((default . error) (SEMICOLON .  1259))
+      ((default . error) (SEMICOLON .  1273))
       ((default . error) (ELSE . (select_alternative . 0)) (OR . 
(select_alternative . 0)) (END . (select_alternative . 0)))
       ((default . error) (ELSE . (select_alternative . 4)) (OR . 
(select_alternative . 4)) (END . (select_alternative . 4)))
-      ((default . error) (SEMICOLON .  1258))
-      ((default . error) (SEMICOLON .  1257))
-      ((default . error) (SEMICOLON .  1256))
-      ((default . error) (SELECT .  1255))
+      ((default . error) (SEMICOLON .  1272))
+      ((default . error) (SEMICOLON .  1271))
+      ((default . error) (SEMICOLON .  1270))
+      ((default . error) (SELECT .  1269))
       ((default . error) (DO . (return_subtype_indication . 1)) (SEMICOLON . 
(return_subtype_indication . 1)) (COLON_EQUAL . (return_subtype_indication . 
1)))
-      ((default . error) (DO . (extended_return_object_declaration . 1)) 
(SEMICOLON . (extended_return_object_declaration . 1)) (COLON_EQUAL .  1254))
+      ((default . error) (DO . (extended_return_object_declaration . 1)) 
(SEMICOLON . (extended_return_object_declaration . 1)) (COLON_EQUAL .  1268))
       ((default . error) (DO . (return_subtype_indication . 0)) (SEMICOLON . 
(return_subtype_indication . 0)) (COLON_EQUAL . (return_subtype_indication . 
0)))
-      ((default . error) (SEMICOLON .  1253))
+      ((default . error) (SEMICOLON .  1267))
       ((default . error) (WHEN . (loop_statement . 1)) (THEN . (loop_statement 
. 1)) (OR . (loop_statement . 1)) (ELSIF . (loop_statement . 1)) (ELSE . 
(loop_statement . 1)) (WHILE . (loop_statement . 1)) (SELECT . (loop_statement 
. 1)) (RETURN . (loop_statement . 1)) (REQUEUE . (loop_statement . 1)) (RAISE . 
(loop_statement . 1)) (PRAGMA . (loop_statement . 1)) (NULL . (loop_statement . 
1)) (LOOP . (loop_statement . 1)) (IF . (loop_statement . 1)) (GOTO . 
(loop_statement . 1)) (FOR . (l [...]
-      ((default . error) (END . (sequence_of_statements_opt . 0)) (ACCEPT . 
(label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . 
(label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) (LOOP . 
(label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . 
(label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . 
(label_opt . 0)) (ABORT . (label_opt . 0)) (DELAY . (label_opt . 0)) (EXIT . 
(label_opt . 0)) (GOTO . (label_opt [...]
-      ((default . error) (IF .  1251))
+      ((default . error) (END . (sequence_of_statements_opt . 0)) (ACCEPT . 
(label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . 
(label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) (LOOP . 
(label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . 
(label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . 
(label_opt . 0)) (ABORT . (label_opt . 0)) (DELAY . (label_opt . 0)) (EXIT . 
(label_opt . 0)) (GOTO . (label_opt [...]
+      ((default . error) (IF .  1265))
       ((default . error) (ELSIF . (elsif_statement_list . 1)) (ELSE . 
(elsif_statement_list . 1)) (END . (elsif_statement_list . 1)))
-      ((default . error) (SEMICOLON .  1250))
-      ((default . error) (THEN .  1249))
-      ((default . error) (END .  1248))
-      ((default . error) (SEMICOLON .  1247))
-      ((default . error) (END . (sequence_of_statements_opt . 0)) (WHEN . 
(sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . (label_opt . 0)) (ABORT 
. (label_opt . 0)) (DELAY . (label_opt . 0)) ( [...]
-      ((default . error) (SEMICOLON .  1245))
-      ((default . error) (END .  1244))
-      ((default . error) (END .  1243))
-      ((default . error) (FOR .  1242) (IDENTIFIER .  71))
-      ((default . error) (WHEN .  1241))
+      ((default . error) (SEMICOLON .  1264))
+      ((default . error) (THEN .  1263))
+      ((default . error) (END .  1262))
+      ((default . error) (SEMICOLON .  1261))
+      ((default . error) (END . (sequence_of_statements_opt . 0)) (WHEN . 
(sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . (label_opt . 0)) (ABORT 
. (label_opt . 0)) (DELAY . (label_opt . 0)) ( [...]
+      ((default . error) (SEMICOLON .  1259))
+      ((default . error) (END .  1258))
+      ((default . error) (END .  1257))
+      ((default . error) (FOR .  1256) (IDENTIFIER .  72))
+      ((default . error) (WHEN .  1255))
       ((default . error) (WHEN . (entry_body_formal_part . 1)))
-      ((default . error) (SEMICOLON .  1240))
+      ((default . error) (SEMICOLON .  1254))
       ((default . error) (ELSE . (elsif_expression_item . 0)) (ELSIF . 
(elsif_expression_item . 0)) (RIGHT_PAREN . (elsif_expression_item . 0)))
-      ((default . error) (DOT .  86) (TICK .  87) (LOOP . 
(iterator_specification . 2)) (EQUAL_GREATER . (iterator_specification . 2)) 
(LEFT_PAREN .  105))
-      ((default . error) (SEMICOLON .  1239))
-      ((default . error) (SEMICOLON .  1238))
-      ((default . error) (SEMICOLON .  1237))
-      ((default . error) (SEMICOLON .  1236))
+      ((default . error) (DOT .  87) (TICK .  88) (LOOP . 
(iterator_specification . 2)) (EQUAL_GREATER . (iterator_specification . 2)) 
(LEFT_PAREN .  106))
+      ((default . error) (SEMICOLON .  1253))
+      ((default . error) (SEMICOLON .  1252))
+      ((default . error) (SEMICOLON .  1251))
+      ((default . error) (SEMICOLON .  1250))
       ((default . error) (BEGIN . (private_type_declaration . 0)) (IDENTIFIER 
. (private_type_declaration . 0)) (ENTRY . (private_type_declaration . 0)) (FOR 
. (private_type_declaration . 0)) (FUNCTION . (private_type_declaration . 0)) 
(GENERIC . (private_type_declaration . 0)) (NOT . (private_type_declaration . 
0)) (OVERRIDING . (private_type_declaration . 0)) (PACKAGE . 
(private_type_declaration . 0)) (PRAGMA . (private_type_declaration . 0)) 
(PROCEDURE . (private_type_declaration . 0) [...]
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48))
-      ((default . error) (WITH .  1234))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49))
+      ((default . error) (WITH .  1248))
       ((default . error) (WITH . (constraint_opt . 1)) (SEMICOLON . 
(constraint_opt . 1)))
       ((default . error) (WITH . (derived_type_definition . 1)) (SEMICOLON . 
(derived_type_definition . 1)))
-      ((default . error) (WITH .  1233))
-      ((default . error) (WHEN .  1230))
+      ((default . error) (WITH .  1247))
+      ((default . error) (WHEN .  1244))
       ((default . error) (SEMICOLON . (record_definition . 0)) (WITH . 
(record_definition . 0)))
-      ((default . error) (COLON_EQUAL .  1228) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  107))
+      ((default . error) (COLON_EQUAL .  1242) (SEMICOLON . 
(aspect_specification_opt . 0)) (WITH .  108))
       ((default . error) (SEMICOLON . (type_definition . 1)) (WITH . 
(type_definition . 1)))
       ((default . error) (RIGHT_PAREN . (enumeration_literal_list . 1)) (COMMA 
. (enumeration_literal_list . 1)))
-      ((default . error) (DOT_DOT .  1227))
-      ((default . error) (WITH . (real_range_specification_opt . 0)) 
(SEMICOLON . (real_range_specification_opt . 0)) (RANGE .  1087))
-      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
691))
-      ((default . error) (SEMICOLON .  1224))
+      ((default . error) (DOT_DOT .  1241))
+      ((default . error) (WITH . (real_range_specification_opt . 0)) 
(SEMICOLON . (real_range_specification_opt . 0)) (RANGE .  1101))
+      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
695))
+      ((default . error) (SEMICOLON .  1238))
       ((default . error) (USE . (task_type_declaration . 1)) (TYPE . 
(task_type_declaration . 1)) (TASK . (task_type_declaration . 1)) (SUBTYPE . 
(task_type_declaration . 1)) (PROTECTED . (task_type_declaration . 1)) 
(PROCEDURE . (task_type_declaration . 1)) (PRAGMA . (task_type_declaration . 
1)) (PACKAGE . (task_type_declaration . 1)) (OVERRIDING . 
(task_type_declaration . 1)) (NOT . (task_type_declaration . 1)) (GENERIC . 
(task_type_declaration . 1)) (FUNCTION . (task_type_declaration  [...]
-      ((default . error) (AND .  1047) (WITH .  1223))
-      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
691))
-      ((default . error) (SEMICOLON .  1221))
+      ((default . error) (AND .  1061) (WITH .  1237))
+      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
695))
+      ((default . error) (SEMICOLON .  1235))
       ((default . error) (USE . (protected_type_declaration . 1)) (TYPE . 
(protected_type_declaration . 1)) (TASK . (protected_type_declaration . 1)) 
(SUBTYPE . (protected_type_declaration . 1)) (PROTECTED . 
(protected_type_declaration . 1)) (PROCEDURE . (protected_type_declaration . 
1)) (PRAGMA . (protected_type_declaration . 1)) (PACKAGE . 
(protected_type_declaration . 1)) (OVERRIDING . (protected_type_declaration . 
1)) (NOT . (protected_type_declaration . 1)) (GENERIC . (protected_typ [...]
-      ((default . error) (AND .  1047) (WITH .  1220))
-      ((default . error) (RANGE .  1219))
+      ((default . error) (AND .  1061) (WITH .  1234))
+      ((default . error) (RANGE .  1233))
       ((default . error) (SEMICOLON . (record_rep . 0)))
       ((default . error) (IDENTIFIER . (mod_clause_opt . 1)))
       ((default . error) (BEGIN . (object_renaming_declaration . 0)) 
(IDENTIFIER . (object_renaming_declaration . 0)) (ENTRY . 
(object_renaming_declaration . 0)) (FOR . (object_renaming_declaration . 0)) 
(FUNCTION . (object_renaming_declaration . 0)) (GENERIC . 
(object_renaming_declaration . 0)) (NOT . (object_renaming_declaration . 0)) 
(OVERRIDING . (object_renaming_declaration . 0)) (PACKAGE . 
(object_renaming_declaration . 0)) (PRAGMA . (object_renaming_declaration . 0)) 
(PROCEDURE .  [...]
       ((default . error) (COLON_EQUAL . (component_definition . 2)) (SEMICOLON 
. (component_definition . 2)) (WITH . (component_definition . 2)))
       ((default . error) (COLON_EQUAL . (component_definition . 0)) (SEMICOLON 
. (component_definition . 0)) (WITH . (component_definition . 0)))
-      ((default . error) (RIGHT_PAREN . (subtype_indication . 1)) (COMMA . 
(subtype_indication . 1)) (DOT .  86) (TICK .  87) (BAR . (discrete_choice . 
1)) (EQUAL_GREATER . (discrete_choice . 1)) (RANGE .  827) (LEFT_PAREN .  797))
+      ((default . error) (RIGHT_PAREN . (subtype_indication . 1)) (COMMA . 
(subtype_indication . 1)) (DOT .  87) (TICK .  88) (BAR . (discrete_choice . 
1)) (EQUAL_GREATER . (discrete_choice . 1)) (RANGE .  833) (LEFT_PAREN .  803))
       ((default . error) (SEMICOLON . (formal_derived_type_definition . 0)) 
(WITH . (formal_derived_type_definition . 0)))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (END . (declarative_part_opt . 0)) (PRIVATE . 
(declarative_part_opt . 0)) (USE .  11) (SUBTYPE .  291) (PRAGMA .  7) (NOT .  
4) (OVERRIDING .  5) (FUNCTION . (overriding_indicator_opt . 2)) (PROCEDURE . 
(overriding_indicator_opt . 2)) (ENTRY . (overriding_indicator_opt . 2)) (FOR . 
 288) (IDENTIFIER .  287) (TYPE .  293) (GENERIC .  2) (PROTECTED .  290) (TASK 
.  292) (PACKAGE .  289))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (END . (declarative_part_opt . 0)) (PRIVATE . 
(declarative_part_opt . 0)) (USE .  11) (SUBTYPE .  292) (PRAGMA .  7) (NOT .  
4) (OVERRIDING .  5) (FUNCTION . (overriding_indicator_opt . 2)) (PROCEDURE . 
(overriding_indicator_opt . 2)) (ENTRY . (overriding_indicator_opt . 2)) (FOR . 
 289) (IDENTIFIER .  288) (TYPE .  294) (GENERIC .  2) (PROTECTED .  291) (TASK 
.  293) (PACKAGE .  290))
       ((default . error) (END . (single_protected_declaration . 0)) (PRIVATE . 
(single_protected_declaration . 0)) (USE . (single_protected_declaration . 0)) 
(TYPE . (single_protected_declaration . 0)) (TASK . 
(single_protected_declaration . 0)) (SUBTYPE . (single_protected_declaration . 
0)) (PROTECTED . (single_protected_declaration . 0)) (PROCEDURE . 
(single_protected_declaration . 0)) (PRAGMA . (single_protected_declaration . 
0)) (PACKAGE . (single_protected_declaration . 0)) (OVERRID [...]
       ((default . error) (SEMICOLON . (protected_definition . 0)))
-      ((default . error) (END . (declarative_part_opt . 0)) (PRIVATE . 
(declarative_part_opt . 0)) (USE .  11) (SUBTYPE .  291) (PRAGMA .  7) (NOT .  
4) (OVERRIDING .  5) (FUNCTION . (overriding_indicator_opt . 2)) (PROCEDURE . 
(overriding_indicator_opt . 2)) (ENTRY . (overriding_indicator_opt . 2)) (FOR . 
 288) (IDENTIFIER .  287) (TYPE .  293) (GENERIC .  2) (PROTECTED .  290) (TASK 
.  292) (PACKAGE .  289))
+      ((default . error) (END . (declarative_part_opt . 0)) (PRIVATE . 
(declarative_part_opt . 0)) (USE .  11) (SUBTYPE .  292) (PRAGMA .  7) (NOT .  
4) (OVERRIDING .  5) (FUNCTION . (overriding_indicator_opt . 2)) (PROCEDURE . 
(overriding_indicator_opt . 2)) (ENTRY . (overriding_indicator_opt . 2)) (FOR . 
 289) (IDENTIFIER .  288) (TYPE .  294) (GENERIC .  2) (PROTECTED .  291) (TASK 
.  293) (PACKAGE .  290))
       ((default . error) (END . (single_task_declaration . 0)) (PRIVATE . 
(single_task_declaration . 0)) (USE . (single_task_declaration . 0)) (TYPE . 
(single_task_declaration . 0)) (TASK . (single_task_declaration . 0)) (SUBTYPE 
. (single_task_declaration . 0)) (PROTECTED . (single_task_declaration . 0)) 
(PROCEDURE . (single_task_declaration . 0)) (PRAGMA . (single_task_declaration 
. 0)) (PACKAGE . (single_task_declaration . 0)) (OVERRIDING . 
(single_task_declaration . 0)) (NOT . (singl [...]
       ((default . error) (SEMICOLON . (task_definition . 0)))
       ((default . error) (WITH . (type_definition . 5)) (SEMICOLON . 
(type_definition . 5)))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (SEMICOLON .  1277))
-      ((default . error) (EQUAL_GREATER . (discrete_choice_list . 0)) (BAR . 
(discrete_choice_list . 0)) (OTHERS .  171) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (PLUS .  143) (MINUS .  142) 
(ABS .  145) (NOT .  170) (NULL .  149) (NEW .  147) (LEFT_PAREN .  146))
-      ((default . error) (END .  1274) (WHEN .  1230))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (SEMICOLON .  1291))
+      ((default . error) (EQUAL_GREATER . (discrete_choice_list . 0)) (BAR . 
(discrete_choice_list . 0)) (OTHERS .  172) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (PLUS .  144) (MINUS .  143) 
(ABS .  146) (NOT .  171) (NULL .  150) (NEW .  148) (LEFT_PAREN .  147))
+      ((default . error) (END .  1288) (WHEN .  1244))
       ((default . error) (END . (variant_list . 0)) (WHEN . (variant_list . 
0)))
-      ((default . error) (PRIVATE .  1273))
-      ((default . error) (RECORD .  842) (NULL .  840))
-      ((default . error) (AND .  1047) (WITH . (and_interface_list_opt . 1)))
+      ((default . error) (PRIVATE .  1287))
+      ((default . error) (RECORD .  848) (NULL .  846))
+      ((default . error) (AND .  1061) (WITH . (and_interface_list_opt . 1)))
       ((default . error) (PRIVATE . (object_declaration . 2)) (END . 
(object_declaration . 2)) (BEGIN . (object_declaration . 2)) (IDENTIFIER . 
(object_declaration . 2)) (ENTRY . (object_declaration . 2)) (FOR . 
(object_declaration . 2)) (FUNCTION . (object_declaration . 2)) (GENERIC . 
(object_declaration . 2)) (NOT . (object_declaration . 2)) (OVERRIDING . 
(object_declaration . 2)) (PACKAGE . (object_declaration . 2)) (PRAGMA . 
(object_declaration . 2)) (PROCEDURE . (object_declaration  [...]
       ((default . error) (PRIVATE . (object_declaration . 4)) (END . 
(object_declaration . 4)) (BEGIN . (object_declaration . 4)) (IDENTIFIER . 
(object_declaration . 4)) (ENTRY . (object_declaration . 4)) (FOR . 
(object_declaration . 4)) (FUNCTION . (object_declaration . 4)) (GENERIC . 
(object_declaration . 4)) (NOT . (object_declaration . 4)) (OVERRIDING . 
(object_declaration . 4)) (PACKAGE . (object_declaration . 4)) (PRAGMA . 
(object_declaration . 4)) (PROCEDURE . (object_declaration  [...]
       ((default . error) (PRIVATE . (object_declaration . 0)) (END . 
(object_declaration . 0)) (BEGIN . (object_declaration . 0)) (IDENTIFIER . 
(object_declaration . 0)) (ENTRY . (object_declaration . 0)) (FOR . 
(object_declaration . 0)) (FUNCTION . (object_declaration . 0)) (GENERIC . 
(object_declaration . 0)) (NOT . (object_declaration . 0)) (OVERRIDING . 
(object_declaration . 0)) (PACKAGE . (object_declaration . 0)) (PRAGMA . 
(object_declaration . 0)) (PROCEDURE . (object_declaration  [...]
       ((default . error) (PRIVATE . (entry_declaration . 0)) (END . 
(entry_declaration . 0)) (BEGIN . (entry_declaration . 0)) (IDENTIFIER . 
(entry_declaration . 0)) (ENTRY . (entry_declaration . 0)) (FOR . 
(entry_declaration . 0)) (FUNCTION . (entry_declaration . 0)) (GENERIC . 
(entry_declaration . 0)) (NOT . (entry_declaration . 0)) (OVERRIDING . 
(entry_declaration . 0)) (PACKAGE . (entry_declaration . 0)) (PRAGMA . 
(entry_declaration . 0)) (PROCEDURE . (entry_declaration . 0)) (PROTEC [...]
       ((default . error) (PRIVATE . (protected_body . 0)) (END . 
(protected_body . 0)) (BEGIN . (protected_body . 0)) (IDENTIFIER . 
(protected_body . 0)) (ENTRY . (protected_body . 0)) (FOR . (protected_body . 
0)) (FUNCTION . (protected_body . 0)) (GENERIC . (protected_body . 0)) (NOT . 
(protected_body . 0)) (OVERRIDING . (protected_body . 0)) (PACKAGE . 
(protected_body . 0)) (PRAGMA . (protected_body . 0)) (PROCEDURE . 
(protected_body . 0)) (PROTECTED . (protected_body . 0)) (SUBTYPE .  [...]
-      ((default . error) (IS . (expression_opt . 0)) (PLUS .  143) (MINUS .  
142) (ABS .  145) (NOT .  148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) 
(CHARACTER_LITERAL .  49) (STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (IDENTIFIER .  1270))
-      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
691))
-      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
691))
+      ((default . error) (IS . (expression_opt . 0)) (PLUS .  144) (MINUS .  
143) (ABS .  146) (NOT .  149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) 
(CHARACTER_LITERAL .  50) (STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (IDENTIFIER .  1284))
+      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
695))
+      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
695))
       ((default . error) (OR . (case_statement . 0)) (THEN . (case_statement . 
0)) (WHEN . (case_statement . 0)) (EXCEPTION . (case_statement . 0)) (END . 
(case_statement . 0)) (LESS_LESS . (case_statement . 0)) (IDENTIFIER . 
(case_statement . 0)) (STRING_LITERAL . (case_statement . 0)) 
(CHARACTER_LITERAL . (case_statement . 0)) (ACCEPT . (case_statement . 0)) 
(ABORT . (case_statement . 0)) (BEGIN . (case_statement . 0)) (CASE . 
(case_statement . 0)) (DECLARE . (case_statement . 0)) (DEL [...]
       ((default . error) (END . (case_statement_alternative . 0)) (WHEN . 
(case_statement_alternative . 0)))
       ((default . error) (OR . (block_statement . 0)) (THEN . (block_statement 
. 0)) (WHEN . (block_statement . 0)) (EXCEPTION . (block_statement . 0)) (END . 
(block_statement . 0)) (LESS_LESS . (block_statement . 0)) (IDENTIFIER . 
(block_statement . 0)) (STRING_LITERAL . (block_statement . 0)) 
(CHARACTER_LITERAL . (block_statement . 0)) (ACCEPT . (block_statement . 0)) 
(ABORT . (block_statement . 0)) (BEGIN . (block_statement . 0)) (CASE . 
(block_statement . 0)) (DECLARE . (block_statem [...]
-      ((default . error) (IF .  1267))
-      ((default . error) (ELSE . (sequence_of_statements_opt . 0)) (ELSIF . 
(sequence_of_statements_opt . 0)) (END . (sequence_of_statements_opt . 0)) 
(ACCEPT . (label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) 
(DECLARE . (label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) 
(LOOP . (label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) 
(WHILE . (label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL 
. (label_opt . 0)) (ABORT . ( [...]
+      ((default . error) (IF .  1281))
+      ((default . error) (ELSE . (sequence_of_statements_opt . 0)) (ELSIF . 
(sequence_of_statements_opt . 0)) (END . (sequence_of_statements_opt . 0)) 
(ACCEPT . (label_opt . 0)) (BEGIN . (label_opt . 0)) (CASE . (label_opt . 0)) 
(DECLARE . (label_opt . 0)) (FOR . (label_opt . 0)) (IF . (label_opt . 0)) 
(LOOP . (label_opt . 0)) (RETURN . (label_opt . 0)) (SELECT . (label_opt . 0)) 
(WHILE . (label_opt . 0)) (STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL 
. (label_opt . 0)) (ABORT . ( [...]
       ((default . error) (OR . (if_statement . 3)) (THEN . (if_statement . 3)) 
(WHEN . (if_statement . 3)) (EXCEPTION . (if_statement . 3)) (END . 
(if_statement . 3)) (LESS_LESS . (if_statement . 3)) (IDENTIFIER . 
(if_statement . 3)) (STRING_LITERAL . (if_statement . 3)) (CHARACTER_LITERAL . 
(if_statement . 3)) (ACCEPT . (if_statement . 3)) (ABORT . (if_statement . 3)) 
(BEGIN . (if_statement . 3)) (CASE . (if_statement . 3)) (DECLARE . 
(if_statement . 3)) (DELAY . (if_statement . 3)) (EX [...]
-      ((default . error) (SEMICOLON .  1265))
-      ((default . error) (END .  1264))
+      ((default . error) (SEMICOLON .  1279))
+      ((default . error) (END .  1278))
       ((default . error) (OR . (extended_return_statement . 0)) (THEN . 
(extended_return_statement . 0)) (WHEN . (extended_return_statement . 0)) 
(EXCEPTION . (extended_return_statement . 0)) (END . (extended_return_statement 
. 0)) (LESS_LESS . (extended_return_statement . 0)) (IDENTIFIER . 
(extended_return_statement . 0)) (STRING_LITERAL . (extended_return_statement . 
0)) (CHARACTER_LITERAL . (extended_return_statement . 0)) (ACCEPT . 
(extended_return_statement . 0)) (ABORT . (extended_ [...]
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
-      ((default . error) (SEMICOLON .  1262))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
+      ((default . error) (SEMICOLON .  1276))
       ((default . error) (OR . (selective_accept . 0)) (THEN . 
(selective_accept . 0)) (WHEN . (selective_accept . 0)) (EXCEPTION . 
(selective_accept . 0)) (END . (selective_accept . 0)) (LESS_LESS . 
(selective_accept . 0)) (IDENTIFIER . (selective_accept . 0)) (STRING_LITERAL . 
(selective_accept . 0)) (CHARACTER_LITERAL . (selective_accept . 0)) (ACCEPT . 
(selective_accept . 0)) (ABORT . (selective_accept . 0)) (BEGIN . 
(selective_accept . 0)) (CASE . (selective_accept . 0)) (DECLARE .  [...]
       ((default . error) (OR . (conditional_entry_call . 0)) (THEN . 
(conditional_entry_call . 0)) (WHEN . (conditional_entry_call . 0)) (EXCEPTION 
. (conditional_entry_call . 0)) (END . (conditional_entry_call . 0)) (LESS_LESS 
. (conditional_entry_call . 0)) (IDENTIFIER . (conditional_entry_call . 0)) 
(STRING_LITERAL . (conditional_entry_call . 0)) (CHARACTER_LITERAL . 
(conditional_entry_call . 0)) (ACCEPT . (conditional_entry_call . 0)) (ABORT . 
(conditional_entry_call . 0)) (BEGIN . ( [...]
       ((default . error) (OR . (timed_entry_call . 0)) (THEN . 
(timed_entry_call . 0)) (WHEN . (timed_entry_call . 0)) (EXCEPTION . 
(timed_entry_call . 0)) (END . (timed_entry_call . 0)) (LESS_LESS . 
(timed_entry_call . 0)) (IDENTIFIER . (timed_entry_call . 0)) (STRING_LITERAL . 
(timed_entry_call . 0)) (CHARACTER_LITERAL . (timed_entry_call . 0)) (ACCEPT . 
(timed_entry_call . 0)) (ABORT . (timed_entry_call . 0)) (BEGIN . 
(timed_entry_call . 0)) (CASE . (timed_entry_call . 0)) (DECLARE .  [...]
       ((default . error) (OR . (loop_statement . 0)) (THEN . (loop_statement . 
0)) (WHEN . (loop_statement . 0)) (EXCEPTION . (loop_statement . 0)) (END . 
(loop_statement . 0)) (LESS_LESS . (loop_statement . 0)) (IDENTIFIER . 
(loop_statement . 0)) (STRING_LITERAL . (loop_statement . 0)) 
(CHARACTER_LITERAL . (loop_statement . 0)) (ACCEPT . (loop_statement . 0)) 
(ABORT . (loop_statement . 0)) (BEGIN . (loop_statement . 0)) (CASE . 
(loop_statement . 0)) (DECLARE . (loop_statement . 0)) (DEL [...]
-      ((default . error) (WHEN . (sequence_of_statements_opt . 0)) (END . 
(sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . (label_opt . 0)) (ABORT 
. (label_opt . 0)) (DELAY . (label_opt . 0)) ( [...]
+      ((default . error) (WHEN . (sequence_of_statements_opt . 0)) (END . 
(sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . (label_opt . 0)) (ABORT 
. (label_opt . 0)) (DELAY . (label_opt . 0)) ( [...]
       ((default . error) (WHEN . (exception_handler . 0)) (END . 
(exception_handler . 0)))
       ((default . error) (WHEN . (asynchronous_select . 0)) (THEN . 
(asynchronous_select . 0)) (OR . (asynchronous_select . 0)) (ELSIF . 
(asynchronous_select . 0)) (ELSE . (asynchronous_select . 0)) (WHILE . 
(asynchronous_select . 0)) (SELECT . (asynchronous_select . 0)) (RETURN . 
(asynchronous_select . 0)) (REQUEUE . (asynchronous_select . 0)) (RAISE . 
(asynchronous_select . 0)) (PRAGMA . (asynchronous_select . 0)) (NULL . 
(asynchronous_select . 0)) (LOOP . (asynchronous_select . 0)) (I [...]
       ((default . error) (DO . (extended_return_object_declaration . 0)) 
(SEMICOLON . (extended_return_object_declaration . 0)))
-      ((default . error) (IF .  1295))
+      ((default . error) (IF .  1309))
       ((default . error) (WHEN . (if_statement . 1)) (THEN . (if_statement . 
1)) (OR . (if_statement . 1)) (ELSIF . (if_statement . 1)) (ELSE . 
(if_statement . 1)) (WHILE . (if_statement . 1)) (SELECT . (if_statement . 1)) 
(RETURN . (if_statement . 1)) (REQUEUE . (if_statement . 1)) (RAISE . 
(if_statement . 1)) (PRAGMA . (if_statement . 1)) (NULL . (if_statement . 1)) 
(LOOP . (if_statement . 1)) (IF . (if_statement . 1)) (GOTO . (if_statement . 
1)) (FOR . (if_statement . 1)) (EXIT . (if_ [...]
       ((default . error) (ELSE . (elsif_statement_item . 0)) (ELSIF . 
(elsif_statement_item . 0)) (END . (elsif_statement_item . 0)))
-      ((default . error) (SEMICOLON .  1294))
-      ((default . error) (SEMICOLON .  1293))
-      ((default . error) (SEMICOLON .  1292))
-      ((default . error) (IN .  1291))
-      ((default . error) (IS .  1290))
+      ((default . error) (SEMICOLON .  1308))
+      ((default . error) (SEMICOLON .  1307))
+      ((default . error) (SEMICOLON .  1306))
+      ((default . error) (IN .  1305))
+      ((default . error) (IS .  1304))
       ((default . error) (WITH . (derived_type_definition . 0)) (SEMICOLON . 
(derived_type_definition . 0)))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
-      ((default . error) (CASE .  1288))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
+      ((default . error) (CASE .  1302))
       ((default . error) (WHEN . (variant_list . 1)) (END . (variant_list . 
1)))
-      ((default . error) (BAR .  274) (EQUAL_GREATER .  1287))
+      ((default . error) (BAR .  275) (EQUAL_GREATER .  1301))
       ((default . error) (WHEN . (component_declaration . 1)) (END . 
(component_declaration . 1)) (CASE . (component_declaration . 1)) (IDENTIFIER . 
(component_declaration . 1)) (FOR . (component_declaration . 1)))
-      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
107))
+      ((default . error) (SEMICOLON . (aspect_specification_opt . 0)) (WITH .  
108))
       ((default . error) (SEMICOLON . (real_range_specification_opt . 1)) 
(WITH . (real_range_specification_opt . 1)))
-      ((default . error) (SEMICOLON .  1285))
-      ((default . error) (SEMICOLON .  1284))
-      ((default . error) (DOT_DOT .  1283))
-      ((default . error) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  
148) (NULL .  149) (NEW .  147) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (LEFT_PAREN .  146))
+      ((default . error) (SEMICOLON .  1299))
+      ((default . error) (SEMICOLON .  1298))
+      ((default . error) (DOT_DOT .  1297))
+      ((default . error) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  
149) (NULL .  150) (NEW .  148) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (LEFT_PAREN .  147))
       ((default . error) (PRIVATE . (protected_type_declaration . 0)) (END . 
(protected_type_declaration . 0)) (BEGIN . (protected_type_declaration . 0)) 
(IDENTIFIER . (protected_type_declaration . 0)) (ENTRY . 
(protected_type_declaration . 0)) (FOR . (protected_type_declaration . 0)) 
(FUNCTION . (protected_type_declaration . 0)) (GENERIC . 
(protected_type_declaration . 0)) (NOT . (protected_type_declaration . 0)) 
(OVERRIDING . (protected_type_declaration . 0)) (PACKAGE . (protected_type [...]
       ((default . error) (PRIVATE . (task_type_declaration . 0)) (END . 
(task_type_declaration . 0)) (BEGIN . (task_type_declaration . 0)) (IDENTIFIER 
. (task_type_declaration . 0)) (ENTRY . (task_type_declaration . 0)) (FOR . 
(task_type_declaration . 0)) (FUNCTION . (task_type_declaration . 0)) (GENERIC 
. (task_type_declaration . 0)) (NOT . (task_type_declaration . 0)) (OVERRIDING 
. (task_type_declaration . 0)) (PACKAGE . (task_type_declaration . 0)) (PRAGMA 
. (task_type_declaration . 0 [...]
-      ((default . error) (SEMICOLON .  1302))
-      ((default . error) (NULL .  995) (CASE .  994) (IDENTIFIER .  71) (FOR . 
 288))
-      ((default . error) (SEMICOLON .  1300))
-      ((default . error) (SEMICOLON .  1299))
-      ((default . error) (BEGIN . (declarative_part_opt . 0)) (USE .  11) 
(SUBTYPE .  291) (PRAGMA .  7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(ENTRY . (overriding_indicator_opt . 2)) (FOR .  288) (IDENTIFIER .  287) (TYPE 
.  293) (GENERIC .  2) (PROTECTED .  290) (TASK .  292) (PACKAGE .  289))
-      ((default . error) (IDENTIFIER .  47) (CHARACTER_LITERAL .  49) 
(STRING_LITERAL .  48) (PLUS .  143) (MINUS .  142) (ABS .  145) (NOT .  752) 
(NULL .  149) (NEW .  147) (LEFT_PAREN .  146))
+      ((default . error) (SEMICOLON .  1316))
+      ((default . error) (NULL .  1009) (CASE .  1008) (IDENTIFIER .  72) (FOR 
.  289))
+      ((default . error) (SEMICOLON .  1314))
+      ((default . error) (SEMICOLON .  1313))
+      ((default . error) (BEGIN . (declarative_part_opt . 0)) (USE .  11) 
(SUBTYPE .  292) (PRAGMA .  7) (NOT .  4) (OVERRIDING .  5) (FUNCTION . 
(overriding_indicator_opt . 2)) (PROCEDURE . (overriding_indicator_opt . 2)) 
(ENTRY . (overriding_indicator_opt . 2)) (FOR .  289) (IDENTIFIER .  288) (TYPE 
.  294) (GENERIC .  2) (PROTECTED .  291) (TASK .  293) (PACKAGE .  290))
+      ((default . error) (IDENTIFIER .  48) (CHARACTER_LITERAL .  50) 
(STRING_LITERAL .  49) (PLUS .  144) (MINUS .  143) (ABS .  146) (NOT .  758) 
(NULL .  150) (NEW .  148) (LEFT_PAREN .  147))
       ((default . error) (PRIVATE . (task_body . 0)) (END . (task_body . 0)) 
(BEGIN . (task_body . 0)) (IDENTIFIER . (task_body . 0)) (ENTRY . (task_body . 
0)) (FOR . (task_body . 0)) (FUNCTION . (task_body . 0)) (GENERIC . (task_body 
. 0)) (NOT . (task_body . 0)) (OVERRIDING . (task_body . 0)) (PACKAGE . 
(task_body . 0)) (PRAGMA . (task_body . 0)) (PROCEDURE . (task_body . 0)) 
(PROTECTED . (task_body . 0)) (SUBTYPE . (task_body . 0)) (TASK . (task_body . 
0)) (TYPE . (task_body . 0)) (US [...]
       ((default . error) (THEN . (accept_statement . 0)) (WHEN . 
(accept_statement . 0)) (EXCEPTION . (accept_statement . 0)) (ELSIF . 
(accept_statement . 0)) (ELSE . (accept_statement . 0)) (OR . (accept_statement 
. 0)) (END . (accept_statement . 0)) (LESS_LESS . (accept_statement . 0)) 
(IDENTIFIER . (accept_statement . 0)) (STRING_LITERAL . (accept_statement . 0)) 
(CHARACTER_LITERAL . (accept_statement . 0)) (ACCEPT . (accept_statement . 0)) 
(ABORT . (accept_statement . 0)) (BEGIN . (a [...]
       ((default . error) (OR . (if_statement . 2)) (THEN . (if_statement . 2)) 
(WHEN . (if_statement . 2)) (EXCEPTION . (if_statement . 2)) (END . 
(if_statement . 2)) (LESS_LESS . (if_statement . 2)) (IDENTIFIER . 
(if_statement . 2)) (STRING_LITERAL . (if_statement . 2)) (CHARACTER_LITERAL . 
(if_statement . 2)) (ACCEPT . (if_statement . 2)) (ABORT . (if_statement . 2)) 
(BEGIN . (if_statement . 2)) (CASE . (if_statement . 2)) (DECLARE . 
(if_statement . 2)) (DELAY . (if_statement . 2)) (EX [...]
-      ((default . error) (SEMICOLON .  1296))
+      ((default . error) (SEMICOLON .  1310))
       ((default . error) (WHEN . (if_statement . 0)) (THEN . (if_statement . 
0)) (OR . (if_statement . 0)) (ELSIF . (if_statement . 0)) (ELSE . 
(if_statement . 0)) (WHILE . (if_statement . 0)) (SELECT . (if_statement . 0)) 
(RETURN . (if_statement . 0)) (REQUEUE . (if_statement . 0)) (RAISE . 
(if_statement . 0)) (PRAGMA . (if_statement . 0)) (NULL . (if_statement . 0)) 
(LOOP . (if_statement . 0)) (IF . (if_statement . 0)) (GOTO . (if_statement . 
0)) (FOR . (if_statement . 0)) (EXIT . (if_ [...]
-      ((default . error) (RIGHT_PAREN .  1306))
-      ((default . error) (BEGIN .  1305))
+      ((default . error) (RIGHT_PAREN .  1320))
+      ((default . error) (BEGIN .  1319))
       ((default . error) (BEGIN . (private_extension_declaration . 0)) 
(IDENTIFIER . (private_extension_declaration . 0)) (ENTRY . 
(private_extension_declaration . 0)) (FOR . (private_extension_declaration . 
0)) (FUNCTION . (private_extension_declaration . 0)) (GENERIC . 
(private_extension_declaration . 0)) (NOT . (private_extension_declaration . 
0)) (OVERRIDING . (private_extension_declaration . 0)) (PACKAGE . 
(private_extension_declaration . 0)) (PRAGMA . (private_extension_declaration 
[...]
       ((default . error) (WHEN . (variant_part . 0)) (END . (variant_part . 
0)) (CASE . (variant_part . 0)) (IDENTIFIER . (variant_part . 0)) (FOR . 
(variant_part . 0)))
-      ((default . error) (END . (variant . 0)) (WHEN . (variant . 0)) (CASE .  
994) (IDENTIFIER .  71) (FOR .  288))
+      ((default . error) (END . (variant . 0)) (WHEN . (variant . 0)) (CASE .  
1008) (IDENTIFIER .  72) (FOR .  289))
       ((default . error) (WHEN . (component_declaration . 0)) (END . 
(component_declaration . 0)) (CASE . (component_declaration . 0)) (IDENTIFIER . 
(component_declaration . 0)) (FOR . (component_declaration . 0)))
-      ((default . error) (SEMICOLON .  1304))
+      ((default . error) (SEMICOLON .  1318))
       ((default . error) (END . (component_clause . 0)) (IDENTIFIER . 
(component_clause . 0)))
-      ((default . error) (END . (sequence_of_statements_opt . 0)) (EXCEPTION . 
(sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . (label_opt . 0)) (ABORT 
. (label_opt . 0)) (DELAY . (label_opt .  [...]
-      ((default . error) (WHEN . (parameter_profile_opt . 0)) (LEFT_PAREN .  
776))
+      ((default . error) (END . (sequence_of_statements_opt . 0)) (EXCEPTION . 
(sequence_of_statements_opt . 0)) (ACCEPT . (label_opt . 0)) (BEGIN . 
(label_opt . 0)) (CASE . (label_opt . 0)) (DECLARE . (label_opt . 0)) (FOR . 
(label_opt . 0)) (IF . (label_opt . 0)) (LOOP . (label_opt . 0)) (RETURN . 
(label_opt . 0)) (SELECT . (label_opt . 0)) (WHILE . (label_opt . 0)) 
(STRING_LITERAL . (label_opt . 0)) (CHARACTER_LITERAL . (label_opt . 0)) (ABORT 
. (label_opt . 0)) (DELAY . (label_opt .  [...]
+      ((default . error) (WHEN . (parameter_profile_opt . 0)) (LEFT_PAREN .  
782))
       ((default . error) (WHEN . (entry_body_formal_part . 0)))
-      ((default . error) (END .  1309))
-      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
691))
-      ((default . error) (SEMICOLON .  1311))
+      ((default . error) (END .  1323))
+      ((default . error) (SEMICOLON . (identifier_opt . 0)) (IDENTIFIER .  
695))
+      ((default . error) (SEMICOLON .  1325))
       ((default . error) (PROCEDURE . (entry_body . 0)) (OVERRIDING . 
(entry_body . 0)) (NOT . (entry_body . 0)) (FUNCTION . (entry_body . 0)) (FOR . 
(entry_body . 0)) (ENTRY . (entry_body . 0)) (END . (entry_body . 0)))]
-     [((compilation_unit . 13)(compilation_unit_list . 14)(context_item . 
15)(generic_declaration . 16)(generic_formal_part . 17)(generic_instantiation . 
18)(generic_package_declaration . 19)(generic_renaming_declaration . 
20)(generic_subprogram_declaration . 21)(library_item . 
22)(library_unit_declaration . 23)(library_unit_renaming_declaration . 
24)(overriding_indicator_opt . 25)(package_body . 26)(package_declaration . 
27)(package_renaming_declaration . 28)(package_specification . 29) [...]
-      ((attribute_reference . 50)(name . 85)(qualified_expression . 
53)(selected_component . 54))
-      ((formal_object_declaration . 77)(formal_subprogram_declaration . 
78)(formal_type_declaration . 79)(formal_package_declaration . 
80)(generic_formal_parameter_declarations . 
81)(generic_formal_parameter_declaration . 82)(identifier_list . 83)(pragma . 
84))
+     [((compilation_unit . 13)(compilation_unit_list . 14)(context_item . 
15)(function_specification . 16)(generic_declaration . 17)(generic_formal_part 
. 18)(generic_instantiation . 19)(generic_package_declaration . 
20)(generic_renaming_declaration . 21)(generic_subprogram_declaration . 
22)(library_item . 23)(library_unit_declaration . 
24)(library_unit_renaming_declaration . 25)(overriding_indicator_opt . 
26)(package_body . 27)(package_declaration . 28)(package_renaming_declaration . 
29 [...]
+      ((attribute_reference . 51)(name . 86)(qualified_expression . 
54)(selected_component . 55))
+      ((formal_object_declaration . 78)(formal_subprogram_declaration . 
79)(formal_type_declaration . 80)(formal_package_declaration . 
81)(generic_formal_parameter_declarations . 
82)(generic_formal_parameter_declaration . 83)(identifier_list . 84)(pragma . 
85))
       nil
       nil
       nil
-      ((attribute_reference . 50)(name . 67)(qualified_expression . 
53)(selected_component . 54))
+      ((attribute_reference . 51)(name . 68)(qualified_expression . 
54)(selected_component . 55))
       nil
-      ((generic_declaration . 16)(generic_formal_part . 
17)(generic_instantiation . 18)(generic_package_declaration . 
19)(generic_subprogram_declaration . 21)(library_unit_declaration . 
63)(overriding_indicator_opt . 64)(package_declaration . 
27)(package_specification . 29)(procedure_specification . 
31)(subprogram_declaration . 33))
-      ((attribute_reference . 50)(name . 59)(qualified_expression . 
53)(selected_component . 54))
+      ((function_specification . 16)(generic_declaration . 
17)(generic_formal_part . 18)(generic_instantiation . 
19)(generic_package_declaration . 20)(generic_subprogram_declaration . 
22)(library_unit_declaration . 64)(overriding_indicator_opt . 
65)(package_declaration . 28)(package_specification . 
30)(procedure_specification . 32)(subprogram_declaration . 34))
+      ((attribute_reference . 51)(name . 60)(qualified_expression . 
54)(selected_component . 55))
       nil
-      ((attribute_reference . 50)(name_list . 57)(name . 
52)(qualified_expression . 53)(selected_component . 54))
-      ((attribute_reference . 50)(name_list . 51)(name . 
52)(qualified_expression . 53)(selected_component . 54))
+      ((attribute_reference . 51)(name_list . 58)(name . 
53)(qualified_expression . 54)(selected_component . 55))
+      ((attribute_reference . 51)(name_list . 52)(name . 
53)(qualified_expression . 54)(selected_component . 55))
       nil
-      ((compilation_unit . 46)(context_item . 15)(generic_declaration . 
16)(generic_formal_part . 17)(generic_instantiation . 
18)(generic_package_declaration . 19)(generic_renaming_declaration . 
20)(generic_subprogram_declaration . 21)(library_item . 
22)(library_unit_declaration . 23)(library_unit_renaming_declaration . 
24)(overriding_indicator_opt . 25)(package_body . 26)(package_declaration . 
27)(package_renaming_declaration . 28)(package_specification . 29)(pragma . 
30)(procedure_spec [...]
+      ((compilation_unit . 47)(context_item . 15)(function_specification . 
16)(generic_declaration . 17)(generic_formal_part . 18)(generic_instantiation . 
19)(generic_package_declaration . 20)(generic_renaming_declaration . 
21)(generic_subprogram_declaration . 22)(library_item . 
23)(library_unit_declaration . 24)(library_unit_renaming_declaration . 
25)(overriding_indicator_opt . 26)(package_body . 27)(package_declaration . 
28)(package_renaming_declaration . 29)(package_specification . 30 [...]
       nil
       nil
-      ((package_specification . 43)(procedure_specification . 
31)(subprogram_specification . 44))
       nil
+      ((function_specification . 16)(package_specification . 
44)(procedure_specification . 32)(subprogram_specification . 45))
       nil
       nil
       nil
       nil
       nil
       nil
-      ((procedure_specification . 31)(subprogram_specification . 41))
       nil
+      ((function_specification . 16)(procedure_specification . 
32)(subprogram_specification . 42))
       nil
       nil
       nil
@@ -3012,122 +3049,122 @@
       nil
       nil
       nil
-      ((attribute_reference . 50)(name . 129)(qualified_expression . 
53)(selected_component . 54))
-      ((attribute_reference . 50)(name . 128)(qualified_expression . 
53)(selected_component . 54))
-      ((aspect_specification_opt . 127))
-      ((attribute_reference . 50)(name . 125)(qualified_expression . 
53)(selected_component . 54))
       nil
-      ((aspect_specification_opt . 123))
+      ((attribute_reference . 51)(name . 130)(qualified_expression . 
54)(selected_component . 55))
+      ((attribute_reference . 51)(name . 129)(qualified_expression . 
54)(selected_component . 55))
+      ((aspect_specification_opt . 128))
+      ((attribute_reference . 51)(name . 126)(qualified_expression . 
54)(selected_component . 55))
       nil
+      ((aspect_specification_opt . 124))
       nil
       nil
       nil
       nil
       nil
       nil
-      ((actual_parameter_part . 90))
       nil
+      ((actual_parameter_part . 91))
       nil
       nil
-      ((attribute_reference . 50)(name_list . 120)(name . 
52)(qualified_expression . 53)(selected_component . 54))
       nil
-      ((attribute_reference . 50)(name . 117)(qualified_expression . 
53)(selected_component . 54))
-      ((actual_parameter_part . 90)(formal_part . 115)(parameter_profile_opt . 
116))
-      ((formal_object_declaration . 77)(formal_subprogram_declaration . 
78)(formal_type_declaration . 79)(formal_package_declaration . 
80)(generic_formal_parameter_declarations . 
81)(generic_formal_parameter_declaration . 82)(identifier_list . 83)(pragma . 
84))
-      ((attribute_reference . 50)(name . 114)(qualified_expression . 
53)(selected_component . 54))
-      ((attribute_reference . 50)(name_list . 113)(name . 
52)(qualified_expression . 53)(selected_component . 54))
+      ((attribute_reference . 51)(name_list . 121)(name . 
53)(qualified_expression . 54)(selected_component . 55))
       nil
-      ((procedure_specification . 31)(subprogram_specification . 112))
+      ((attribute_reference . 51)(name . 118)(qualified_expression . 
54)(selected_component . 55))
+      ((actual_parameter_part . 91)(formal_part . 116)(parameter_profile_opt . 
117))
+      ((formal_object_declaration . 78)(formal_subprogram_declaration . 
79)(formal_type_declaration . 80)(formal_package_declaration . 
81)(generic_formal_parameter_declarations . 
82)(generic_formal_parameter_declaration . 83)(identifier_list . 84)(pragma . 
85))
+      ((attribute_reference . 51)(name . 115)(qualified_expression . 
54)(selected_component . 55))
+      ((attribute_reference . 51)(name_list . 114)(name . 
53)(qualified_expression . 54)(selected_component . 55))
       nil
-      ((attribute_reference . 50)(name . 109)(qualified_expression . 
53)(selected_component . 54))
-      ((actual_parameter_part . 90)(aspect_specification_opt . 108))
+      ((function_specification . 16)(procedure_specification . 
32)(subprogram_specification . 113))
       nil
+      ((attribute_reference . 51)(name . 110)(qualified_expression . 
54)(selected_component . 55))
+      ((actual_parameter_part . 91)(aspect_specification_opt . 109))
       nil
-      ((attribute_reference . 50)(name_list . 102)(name . 
52)(qualified_expression . 53)(selected_component . 54))
       nil
-      ((attribute_reference . 50)(name . 101)(qualified_expression . 
53)(selected_component . 54))
-      ((attribute_reference . 50)(name . 100)(qualified_expression . 
53)(selected_component . 54))
-      ((attribute_reference . 50)(name . 99)(qualified_expression . 
53)(selected_component . 54))
+      ((attribute_reference . 51)(name_list . 103)(name . 
53)(qualified_expression . 54)(selected_component . 55))
       nil
-      ((procedure_specification . 31)(subprogram_specification . 97))
+      ((attribute_reference . 51)(name . 102)(qualified_expression . 
54)(selected_component . 55))
+      ((attribute_reference . 51)(name . 101)(qualified_expression . 
54)(selected_component . 55))
+      ((attribute_reference . 51)(name . 100)(qualified_expression . 
54)(selected_component . 55))
       nil
+      ((function_specification . 16)(procedure_specification . 
32)(subprogram_specification . 98))
       nil
       nil
       nil
-      ((formal_object_declaration . 77)(formal_subprogram_declaration . 
78)(formal_type_declaration . 79)(formal_package_declaration . 
80)(generic_formal_parameter_declaration . 95)(identifier_list . 83)(pragma . 
84))
       nil
+      ((formal_object_declaration . 78)(formal_subprogram_declaration . 
79)(formal_type_declaration . 80)(formal_package_declaration . 
81)(generic_formal_parameter_declaration . 96)(identifier_list . 84)(pragma . 
85))
       nil
       nil
-      ((actual_parameter_part . 90)(formal_part . 
91)(parameter_and_result_profile . 92))
       nil
-      ((aggregate . 221)(attribute_reference . 50)(attribute_designator . 
222)(name . 223)(qualified_expression . 53)(selected_component . 54))
-      ((aggregate . 150)(association_opt . 172)(association_list . 
189)(attribute_reference . 50)(choice_expression . 
174)(choice_relation_and_list . 175)(choice_relation_or_list . 
176)(choice_relation_xor_list . 177)(choice_relation_and_then_list . 
178)(choice_relation_or_else_list . 179)(choice_relation . 180)(discrete_choice 
. 181)(discrete_choice_list . 182)(expression . 183)(expression_opt . 
184)(factor . 152)(identifier_list . 213)(name . 185)(parameter_specification . 
214)(paramet [...]
-      ((access_definition . 208)(attribute_reference . 50)(name . 
209)(name_opt . 210)(null_exclusion_opt . 211)(qualified_expression . 
53)(selected_component . 54))
+      ((actual_parameter_part . 91)(formal_part . 
92)(parameter_and_result_profile . 93))
       nil
+      ((aggregate . 222)(attribute_reference . 51)(attribute_designator . 
223)(name . 224)(qualified_expression . 54)(selected_component . 55))
+      ((aggregate . 151)(association_opt . 173)(association_list . 
190)(attribute_reference . 51)(choice_expression . 
175)(choice_relation_and_list . 176)(choice_relation_or_list . 
177)(choice_relation_xor_list . 178)(choice_relation_and_then_list . 
179)(choice_relation_or_else_list . 180)(choice_relation . 181)(discrete_choice 
. 182)(discrete_choice_list . 183)(expression . 184)(expression_opt . 
185)(factor . 153)(identifier_list . 214)(name . 186)(parameter_specification . 
215)(paramet [...]
+      ((access_definition . 209)(attribute_reference . 51)(name . 
210)(name_opt . 211)(null_exclusion_opt . 212)(qualified_expression . 
54)(selected_component . 55))
       nil
       nil
-      ((mode_opt . 205))
       nil
+      ((mode_opt . 206))
       nil
-      ((attribute_reference . 50)(name . 201)(qualified_expression . 
53)(selected_component . 54))
-      ((aspect_specification_opt . 200))
-      ((discriminant_part_opt . 198))
-      ((actual_parameter_part . 90))
-      ((actual_parameter_part . 90))
-      ((actual_parameter_part . 90))
       nil
-      ((attribute_reference . 50)(name_list . 192)(name . 
52)(qualified_expression . 53)(selected_component . 54))
+      ((attribute_reference . 51)(name . 202)(qualified_expression . 
54)(selected_component . 55))
+      ((aspect_specification_opt . 201))
+      ((discriminant_part_opt . 199))
+      ((actual_parameter_part . 91))
+      ((actual_parameter_part . 91))
+      ((actual_parameter_part . 91))
       nil
-      ((aggregate . 150)(association_opt . 172)(association_list . 
189)(attribute_reference . 50)(choice_expression . 
174)(choice_relation_and_list . 175)(choice_relation_or_list . 
176)(choice_relation_xor_list . 177)(choice_relation_and_then_list . 
178)(choice_relation_or_else_list . 179)(choice_relation . 180)(discrete_choice 
. 181)(discrete_choice_list . 182)(expression . 183)(expression_opt . 
184)(factor . 152)(name . 185)(primary . 156)(qualified_expression . 53)(range 
. 190)(relati [...]
-      ((attribute_reference . 50)(name . 188)(qualified_expression . 
53)(selected_component . 54))
-      ((aggregate . 150)(association_opt . 172)(association_list . 
173)(attribute_reference . 50)(choice_expression . 
174)(choice_relation_and_list . 175)(choice_relation_or_list . 
176)(choice_relation_xor_list . 177)(choice_relation_and_then_list . 
178)(choice_relation_or_else_list . 179)(choice_relation . 180)(discrete_choice 
. 181)(discrete_choice_list . 182)(expression . 183)(expression_opt . 
184)(factor . 152)(name . 185)(primary . 156)(qualified_expression . 53)(range 
. 186)(relati [...]
+      ((attribute_reference . 51)(name_list . 193)(name . 
53)(qualified_expression . 54)(selected_component . 55))
       nil
-      ((actual_parameter_part . 90)(aspect_specification_opt . 167))
+      ((aggregate . 151)(association_opt . 173)(association_list . 
190)(attribute_reference . 51)(choice_expression . 
175)(choice_relation_and_list . 176)(choice_relation_or_list . 
177)(choice_relation_xor_list . 178)(choice_relation_and_then_list . 
179)(choice_relation_or_else_list . 180)(choice_relation . 181)(discrete_choice 
. 182)(discrete_choice_list . 183)(expression . 184)(expression_opt . 
185)(factor . 153)(name . 186)(primary . 157)(qualified_expression . 54)(range 
. 191)(relati [...]
+      ((attribute_reference . 51)(name . 189)(qualified_expression . 
54)(selected_component . 55))
+      ((aggregate . 151)(association_opt . 173)(association_list . 
174)(attribute_reference . 51)(choice_expression . 
175)(choice_relation_and_list . 176)(choice_relation_or_list . 
177)(choice_relation_xor_list . 178)(choice_relation_and_then_list . 
179)(choice_relation_or_else_list . 180)(choice_relation . 181)(discrete_choice 
. 182)(discrete_choice_list . 183)(expression . 184)(expression_opt . 
185)(factor . 153)(name . 186)(primary . 157)(qualified_expression . 54)(range 
. 187)(relati [...]
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 151)(factor . 
152)(name . 153)(pragma_argument_association . 
154)(pragma_argument_association_list . 155)(primary . 
156)(qualified_expression . 53)(relation_and_list . 157)(relation_and_then_list 
. 158)(relation_or_list . 159)(relation_or_else_list . 160)(relation_xor_list . 
161)(relation . 162)(selected_component . 54)(simple_expression . 163)(term . 
164)(term_list . 165)(unary_adding_operator . 166))
-      ((aspect_specification_opt . 141))
+      ((actual_parameter_part . 91)(aspect_specification_opt . 168))
       nil
-      ((actual_parameter_part . 90)(aspect_specification_opt . 108))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 152)(factor . 
153)(name . 154)(pragma_argument_association . 
155)(pragma_argument_association_list . 156)(primary . 
157)(qualified_expression . 54)(relation_and_list . 158)(relation_and_then_list 
. 159)(relation_or_list . 160)(relation_or_else_list . 161)(relation_xor_list . 
162)(relation . 163)(selected_component . 55)(simple_expression . 164)(term . 
165)(term_list . 166)(unary_adding_operator . 167))
+      ((aspect_specification_opt . 142))
       nil
+      ((actual_parameter_part . 91)(aspect_specification_opt . 109))
       nil
-      ((actual_parameter_part . 90))
-      ((attribute_reference . 50)(name . 138)(qualified_expression . 
53)(selected_component . 54))
       nil
+      ((actual_parameter_part . 91))
+      ((attribute_reference . 51)(name . 139)(qualified_expression . 
54)(selected_component . 55))
       nil
-      ((attribute_reference . 50)(name_list . 136)(name . 
52)(qualified_expression . 53)(selected_component . 54))
       nil
+      ((attribute_reference . 51)(name_list . 137)(name . 
53)(qualified_expression . 54)(selected_component . 55))
       nil
       nil
-      ((actual_parameter_part . 90)(aspect_specification_opt . 108))
-      ((attribute_reference . 50)(name . 134)(qualified_expression . 
53)(selected_component . 54))
       nil
-      ((actual_parameter_part . 90)(formal_part . 115)(parameter_profile_opt . 
116))
-      ((actual_parameter_part . 90)(formal_part . 
91)(parameter_and_result_profile . 92))
+      ((actual_parameter_part . 91)(aspect_specification_opt . 109))
+      ((attribute_reference . 51)(name . 135)(qualified_expression . 
54)(selected_component . 55))
       nil
+      ((actual_parameter_part . 91)(formal_part . 116)(parameter_profile_opt . 
117))
+      ((actual_parameter_part . 91)(formal_part . 
92)(parameter_and_result_profile . 93))
       nil
       nil
-      ((abstract_subprogram_declaration . 294)(aspect_clause . 295)(at_clause 
. 296)(body . 297)(body_stub . 298)(declaration . 299)(declarations . 
300)(declarative_part_opt . 380)(entry_declaration . 
302)(enumeration_representation_clause . 303)(exception_declaration . 
304)(full_type_declaration . 305)(generic_declaration . 
306)(generic_formal_part . 17)(generic_instantiation . 
307)(generic_package_declaration . 19)(generic_renaming_declaration . 
308)(generic_subprogram_declaration . 21 [...]
-      ((actual_parameter_part . 90)(aspect_specification_opt . 379))
       nil
+      ((abstract_subprogram_declaration . 295)(aspect_clause . 296)(at_clause 
. 297)(body . 298)(body_stub . 299)(declaration . 300)(declarations . 
301)(declarative_part_opt . 382)(entry_declaration . 
303)(enumeration_representation_clause . 304)(exception_declaration . 
305)(expression_function_declaration . 306)(full_type_declaration . 
307)(function_specification . 16)(generic_declaration . 
308)(generic_formal_part . 18)(generic_instantiation . 
309)(generic_package_declaration . 20)(gen [...]
+      ((actual_parameter_part . 91)(aspect_specification_opt . 381))
       nil
       nil
-      ((actual_parameter_part . 90))
-      ((overriding_indicator_opt . 376)(package_body . 
315)(procedure_specification . 31)(proper_body . 377)(protected_body . 
323)(subprogram_body . 330)(task_body . 335))
       nil
+      ((actual_parameter_part . 91))
+      ((function_specification . 16)(overriding_indicator_opt . 
378)(package_body . 317)(procedure_specification . 32)(proper_body . 
379)(protected_body . 325)(subprogram_body . 332)(task_body . 337))
       nil
       nil
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(name . 153)(primary . 
370)(qualified_expression . 53)(selected_component . 54))
-      ((aggregate . 150)(association_opt . 172)(association_list . 
229)(attribute_reference . 50)(case_expression . 367)(choice_expression . 
174)(choice_relation_and_list . 175)(choice_relation_or_list . 
176)(choice_relation_xor_list . 177)(choice_relation_and_then_list . 
178)(choice_relation_or_else_list . 179)(choice_relation . 180)(discrete_choice 
. 181)(discrete_choice_list . 182)(expression . 230)(expression_opt . 
184)(factor . 152)(if_expression . 368)(name . 185)(primary . 156)(qu [...]
-      ((attribute_reference . 50)(name . 363)(qualified_expression . 
53)(selected_component . 54))
-      ((aggregate . 150)(attribute_reference . 50)(name . 153)(primary . 
285)(qualified_expression . 53)(selected_component . 54))
       nil
+      ((aggregate . 151)(attribute_reference . 51)(name . 154)(primary . 
372)(qualified_expression . 54)(selected_component . 55))
+      ((aggregate . 151)(association_opt . 173)(association_list . 
230)(attribute_reference . 51)(case_expression . 369)(choice_expression . 
175)(choice_relation_and_list . 176)(choice_relation_or_list . 
177)(choice_relation_xor_list . 178)(choice_relation_and_then_list . 
179)(choice_relation_or_else_list . 180)(choice_relation . 181)(discrete_choice 
. 182)(discrete_choice_list . 183)(expression . 231)(expression_opt . 
185)(factor . 153)(if_expression . 370)(name . 186)(primary . 157)(qu [...]
+      ((attribute_reference . 51)(name . 365)(qualified_expression . 
54)(selected_component . 55))
+      ((aggregate . 151)(attribute_reference . 51)(name . 154)(primary . 
286)(qualified_expression . 54)(selected_component . 55))
       nil
       nil
       nil
-      ((actual_parameter_part . 90))
       nil
+      ((actual_parameter_part . 91))
       nil
       nil
       nil
@@ -3136,15 +3173,15 @@
       nil
       nil
       nil
-      ((relational_operator . 351))
-      ((multiplying_operator . 350))
-      ((binary_adding_operator . 345))
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(selected_component . 54)(term . 
164)(term_list . 341))
       nil
-      ((abstract_subprogram_declaration . 294)(aspect_clause . 295)(at_clause 
. 296)(body . 297)(body_stub . 298)(declaration . 299)(declarations . 
300)(declarative_part_opt . 301)(entry_declaration . 
302)(enumeration_representation_clause . 303)(exception_declaration . 
304)(full_type_declaration . 305)(generic_declaration . 
306)(generic_formal_part . 17)(generic_instantiation . 
307)(generic_package_declaration . 19)(generic_renaming_declaration . 
308)(generic_subprogram_declaration . 21 [...]
+      ((relational_operator . 353))
+      ((multiplying_operator . 352))
+      ((binary_adding_operator . 347))
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(selected_component . 55)(term . 
165)(term_list . 343))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(name . 153)(primary . 
285)(qualified_expression . 53)(selected_component . 54))
+      ((abstract_subprogram_declaration . 295)(aspect_clause . 296)(at_clause 
. 297)(body . 298)(body_stub . 299)(declaration . 300)(declarations . 
301)(declarative_part_opt . 302)(entry_declaration . 
303)(enumeration_representation_clause . 304)(exception_declaration . 
305)(expression_function_declaration . 306)(full_type_declaration . 
307)(function_specification . 16)(generic_declaration . 
308)(generic_formal_part . 18)(generic_instantiation . 
309)(generic_package_declaration . 20)(gen [...]
       nil
+      ((aggregate . 151)(attribute_reference . 51)(name . 154)(primary . 
286)(qualified_expression . 54)(selected_component . 55))
       nil
       nil
       nil
@@ -3158,32 +3195,32 @@
       nil
       nil
       nil
-      ((actual_parameter_part . 90))
       nil
-      ((relational_operator . 272))
-      ((actual_parameter_part . 90)(aspect_specification_opt . 262))
+      ((actual_parameter_part . 91))
       nil
+      ((relational_operator . 273))
+      ((actual_parameter_part . 91)(aspect_specification_opt . 263))
       nil
-      ((attribute_reference . 50)(name . 258)(qualified_expression . 
53)(selected_component . 54))
       nil
+      ((attribute_reference . 51)(name . 259)(qualified_expression . 
54)(selected_component . 55))
       nil
-      ((attribute_reference . 50)(name . 256)(qualified_expression . 
53)(selected_component . 54))
-      ((attribute_reference . 50)(name . 255)(qualified_expression . 
53)(selected_component . 54))
-      ((attribute_reference . 50)(name . 254)(qualified_expression . 
53)(selected_component . 54))
-      ((discriminant_specification_opt . 251)(discriminant_specification_list 
. 252)(identifier_list . 253))
-      ((aspect_specification_opt . 249))
-      ((attribute_reference . 50)(name . 246)(qualified_expression . 
53)(selected_component . 54)(subprogram_default . 247))
       nil
-      ((actual_parameter_part . 90))
+      ((attribute_reference . 51)(name . 257)(qualified_expression . 
54)(selected_component . 55))
+      ((attribute_reference . 51)(name . 256)(qualified_expression . 
54)(selected_component . 55))
+      ((attribute_reference . 51)(name . 255)(qualified_expression . 
54)(selected_component . 55))
+      ((discriminant_specification_opt . 252)(discriminant_specification_list 
. 253)(identifier_list . 254))
+      ((aspect_specification_opt . 250))
+      ((attribute_reference . 51)(name . 247)(qualified_expression . 
54)(selected_component . 55)(subprogram_default . 248))
       nil
+      ((actual_parameter_part . 91))
       nil
       nil
-      ((access_definition . 238)(null_exclusion_opt . 239))
-      ((access_definition . 236)(null_exclusion_opt . 237))
       nil
+      ((access_definition . 239)(null_exclusion_opt . 240))
+      ((access_definition . 237)(null_exclusion_opt . 238))
       nil
-      ((actual_parameter_part . 90))
       nil
+      ((actual_parameter_part . 91))
       nil
       nil
       nil
@@ -3192,78 +3229,78 @@
       nil
       nil
       nil
-      ((aggregate . 150)(association_opt . 172)(association_list . 
229)(attribute_reference . 50)(choice_expression . 
174)(choice_relation_and_list . 175)(choice_relation_or_list . 
176)(choice_relation_xor_list . 177)(choice_relation_and_then_list . 
178)(choice_relation_or_else_list . 179)(choice_relation . 180)(discrete_choice 
. 181)(discrete_choice_list . 182)(expression . 230)(expression_opt . 
184)(factor . 152)(name . 185)(primary . 156)(qualified_expression . 53)(range 
. 186)(relati [...]
       nil
+      ((aggregate . 151)(association_opt . 173)(association_list . 
230)(attribute_reference . 51)(choice_expression . 
175)(choice_relation_and_list . 176)(choice_relation_or_list . 
177)(choice_relation_xor_list . 178)(choice_relation_and_then_list . 
179)(choice_relation_or_else_list . 180)(choice_relation . 181)(discrete_choice 
. 182)(discrete_choice_list . 183)(expression . 231)(expression_opt . 
185)(factor . 153)(name . 186)(primary . 157)(qualified_expression . 54)(range 
. 187)(relati [...]
       nil
       nil
-      ((actual_parameter_part . 90))
       nil
+      ((actual_parameter_part . 91))
       nil
       nil
       nil
       nil
       nil
       nil
-      ((identifier_list . 213)(parameter_specification . 512))
       nil
-      ((access_definition . 510)(aliased_opt . 511)(null_exclusion_opt . 211))
-      ((general_access_modifier_opt . 507)(protected_opt . 508))
+      ((identifier_list . 214)(parameter_specification . 515))
       nil
+      ((access_definition . 513)(aliased_opt . 514)(null_exclusion_opt . 212))
+      ((general_access_modifier_opt . 510)(protected_opt . 511))
       nil
-      ((attribute_reference . 50)(name . 209)(name_opt . 
503)(qualified_expression . 53)(selected_component . 54))
-      ((aspect_specification_opt . 502))
-      ((attribute_reference . 50)(name . 500)(qualified_expression . 
53)(selected_component . 54))
       nil
+      ((attribute_reference . 51)(name . 210)(name_opt . 
506)(qualified_expression . 54)(selected_component . 55))
+      ((aspect_specification_opt . 505))
+      ((attribute_reference . 51)(name . 503)(qualified_expression . 
54)(selected_component . 55))
       nil
       nil
       nil
-      ((aspect_specification_opt . 497)(attribute_reference . 50)(name . 
246)(qualified_expression . 53)(selected_component . 54)(subprogram_default . 
498))
       nil
-      ((actual_parameter_part . 90))
-      ((aspect_specification_opt . 496))
-      ((abstract_limited_synchronized_opt . 489)(abstract_tagged_limited_opt . 
490)(access_definition . 491)(array_type_definition . 
492)(formal_type_definition . 493)(formal_derived_type_definition . 
494)(interface_type_definition . 495)(null_exclusion_opt . 211))
+      ((aspect_specification_opt . 500)(attribute_reference . 51)(name . 
247)(qualified_expression . 54)(selected_component . 55)(subprogram_default . 
501))
       nil
+      ((actual_parameter_part . 91))
+      ((aspect_specification_opt . 499))
+      ((abstract_limited_synchronized_opt . 492)(abstract_tagged_limited_opt . 
493)(access_definition . 494)(array_type_definition . 
495)(formal_type_definition . 496)(formal_derived_type_definition . 
497)(interface_type_definition . 498)(null_exclusion_opt . 212))
       nil
       nil
       nil
       nil
-      ((actual_parameter_part . 90)(aspect_specification_opt . 470))
-      ((actual_parameter_part . 90)(aspect_specification_opt . 469))
-      ((actual_parameter_part . 90)(aspect_specification_opt . 468))
       nil
-      ((actual_parameter_part . 90)(aspect_specification_opt . 467))
+      ((actual_parameter_part . 91)(aspect_specification_opt . 473))
+      ((actual_parameter_part . 91)(aspect_specification_opt . 472))
+      ((actual_parameter_part . 91)(aspect_specification_opt . 471))
       nil
-      ((aggregate . 150)(association_opt . 466)(attribute_reference . 
50)(choice_expression . 174)(choice_relation_and_list . 
175)(choice_relation_or_list . 176)(choice_relation_xor_list . 
177)(choice_relation_and_then_list . 178)(choice_relation_or_else_list . 
179)(choice_relation . 180)(discrete_choice . 181)(discrete_choice_list . 
182)(expression . 183)(expression_opt . 184)(factor . 152)(name . 185)(primary 
. 156)(qualified_expression . 53)(range . 186)(relation_and_list . 157)(relat 
[...]
+      ((actual_parameter_part . 91)(aspect_specification_opt . 470))
       nil
+      ((aggregate . 151)(association_opt . 469)(attribute_reference . 
51)(choice_expression . 175)(choice_relation_and_list . 
176)(choice_relation_or_list . 177)(choice_relation_xor_list . 
178)(choice_relation_and_then_list . 179)(choice_relation_or_else_list . 
180)(choice_relation . 181)(discrete_choice . 182)(discrete_choice_list . 
183)(expression . 184)(expression_opt . 185)(factor . 153)(name . 186)(primary 
. 157)(qualified_expression . 54)(range . 187)(relation_and_list . 158)(relat 
[...]
       nil
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(selected_component . 
54)(simple_expression . 464)(term . 164)(term_list . 165)(unary_adding_operator 
. 166))
       nil
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(selected_component . 
55)(simple_expression . 467)(term . 165)(term_list . 166)(unary_adding_operator 
. 167))
       nil
       nil
       nil
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(factor . 
152)(membership_choice_list . 460)(membership_choice . 461)(name . 185)(primary 
. 156)(qualified_expression . 53)(range . 462)(selected_component . 
54)(simple_expression . 463)(term . 164)(term_list . 165)(unary_adding_operator 
. 166))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(selected_component . 
54)(simple_expression . 458)(term . 164)(term_list . 165)(unary_adding_operator 
. 166))
-      ((aggregate . 221)(attribute_reference . 50)(attribute_designator . 
222)(name . 223)(qualified_expression . 53)(selected_component . 54))
-      ((aggregate . 150)(attribute_reference . 50)(choice_expression . 
174)(choice_relation_and_list . 175)(choice_relation_or_list . 
176)(choice_relation_xor_list . 177)(choice_relation_and_then_list . 
178)(choice_relation_or_else_list . 179)(choice_relation . 180)(discrete_choice 
. 455)(factor . 152)(name . 185)(primary . 156)(qualified_expression . 
53)(range . 186)(selected_component . 54)(simple_expression . 456)(term . 
164)(term_list . 165)(unary_adding_operator . 166))
-      ((aggregate . 150)(attribute_reference . 50)(expression . 454)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((aggregate . 150)(attribute_reference . 50)(choice_relation . 
452)(factor . 152)(name . 153)(primary . 156)(qualified_expression . 
53)(selected_component . 54)(simple_expression . 443)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((aggregate . 150)(attribute_reference . 50)(choice_relation . 
450)(factor . 152)(name . 153)(primary . 156)(qualified_expression . 
53)(selected_component . 54)(simple_expression . 443)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((aggregate . 150)(attribute_reference . 50)(choice_relation . 
448)(factor . 152)(name . 153)(primary . 156)(qualified_expression . 
53)(selected_component . 54)(simple_expression . 443)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
+      ((aggregate . 151)(attribute_reference . 51)(factor . 
153)(membership_choice_list . 463)(membership_choice . 464)(name . 186)(primary 
. 157)(qualified_expression . 54)(range . 465)(selected_component . 
55)(simple_expression . 466)(term . 165)(term_list . 166)(unary_adding_operator 
. 167))
       nil
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(selected_component . 
55)(simple_expression . 461)(term . 165)(term_list . 166)(unary_adding_operator 
. 167))
+      ((aggregate . 222)(attribute_reference . 51)(attribute_designator . 
223)(name . 224)(qualified_expression . 54)(selected_component . 55))
+      ((aggregate . 151)(attribute_reference . 51)(choice_expression . 
175)(choice_relation_and_list . 176)(choice_relation_or_list . 
177)(choice_relation_xor_list . 178)(choice_relation_and_then_list . 
179)(choice_relation_or_else_list . 180)(choice_relation . 181)(discrete_choice 
. 458)(factor . 153)(name . 186)(primary . 157)(qualified_expression . 
54)(range . 187)(selected_component . 55)(simple_expression . 459)(term . 
165)(term_list . 166)(unary_adding_operator . 167))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 457)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((aggregate . 151)(attribute_reference . 51)(choice_relation . 
455)(factor . 153)(name . 154)(primary . 157)(qualified_expression . 
54)(selected_component . 55)(simple_expression . 446)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((aggregate . 151)(attribute_reference . 51)(choice_relation . 
453)(factor . 153)(name . 154)(primary . 157)(qualified_expression . 
54)(selected_component . 55)(simple_expression . 446)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((aggregate . 151)(attribute_reference . 51)(choice_relation . 
451)(factor . 153)(name . 154)(primary . 157)(qualified_expression . 
54)(selected_component . 55)(simple_expression . 446)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(choice_relation . 
445)(factor . 152)(name . 153)(primary . 156)(qualified_expression . 
53)(selected_component . 54)(simple_expression . 443)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((aggregate . 150)(attribute_reference . 50)(choice_relation . 
444)(factor . 152)(name . 153)(primary . 156)(qualified_expression . 
53)(selected_component . 54)(simple_expression . 443)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((aggregate . 150)(attribute_reference . 50)(choice_relation . 
442)(factor . 152)(name . 153)(primary . 156)(qualified_expression . 
53)(selected_component . 54)(simple_expression . 443)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((attribute_reference . 50)(name . 441)(qualified_expression . 
53)(selected_component . 54))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 440)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
+      ((aggregate . 151)(attribute_reference . 51)(choice_relation . 
448)(factor . 153)(name . 154)(primary . 157)(qualified_expression . 
54)(selected_component . 55)(simple_expression . 446)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((aggregate . 151)(attribute_reference . 51)(choice_relation . 
447)(factor . 153)(name . 154)(primary . 157)(qualified_expression . 
54)(selected_component . 55)(simple_expression . 446)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((aggregate . 151)(attribute_reference . 51)(choice_relation . 
445)(factor . 153)(name . 154)(primary . 157)(qualified_expression . 
54)(selected_component . 55)(simple_expression . 446)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((attribute_reference . 51)(name . 444)(qualified_expression . 
54)(selected_component . 55))
       nil
-      ((attribute_reference . 435)(direct_name . 436)(name . 
437)(qualified_expression . 53)(selected_component . 54))
-      ((attribute_reference . 50)(name . 67)(qualified_expression . 
53)(selected_component . 54))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 443)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
+      ((attribute_reference . 438)(direct_name . 439)(name . 
440)(qualified_expression . 54)(selected_component . 55))
+      ((attribute_reference . 51)(name . 68)(qualified_expression . 
54)(selected_component . 55))
       nil
       nil
       nil
@@ -3273,8 +3310,8 @@
       nil
       nil
       nil
-      ((abstract_subprogram_declaration . 294)(aspect_clause . 295)(at_clause 
. 296)(body . 297)(body_stub . 298)(declaration . 423)(entry_declaration . 
302)(enumeration_representation_clause . 303)(exception_declaration . 
304)(full_type_declaration . 305)(generic_declaration . 
306)(generic_formal_part . 17)(generic_instantiation . 
307)(generic_package_declaration . 19)(generic_renaming_declaration . 
308)(generic_subprogram_declaration . 21)(identifier_list . 
309)(incomplete_type_declara [...]
       nil
+      ((abstract_subprogram_declaration . 295)(aspect_clause . 296)(at_clause 
. 297)(body . 298)(body_stub . 299)(declaration . 426)(entry_declaration . 
303)(enumeration_representation_clause . 304)(exception_declaration . 
305)(expression_function_declaration . 306)(full_type_declaration . 
307)(function_specification . 16)(generic_declaration . 
308)(generic_formal_part . 18)(generic_instantiation . 
309)(generic_package_declaration . 20)(generic_renaming_declaration . 
310)(generic_subprog [...]
       nil
       nil
       nil
@@ -3287,9 +3324,9 @@
       nil
       nil
       nil
-      ((procedure_specification . 418)(subprogram_specification . 419))
       nil
       nil
+      ((function_specification . 420)(procedure_specification . 
421)(subprogram_specification . 422))
       nil
       nil
       nil
@@ -3313,56 +3350,56 @@
       nil
       nil
       nil
-      ((abstract_subprogram_declaration . 294)(aspect_clause . 295)(at_clause 
. 296)(body . 297)(body_stub . 298)(declaration . 299)(declarations . 
300)(declarative_part_opt . 416)(entry_declaration . 
302)(enumeration_representation_clause . 303)(exception_declaration . 
304)(full_type_declaration . 305)(generic_declaration . 
306)(generic_formal_part . 17)(generic_instantiation . 
307)(generic_package_declaration . 19)(generic_renaming_declaration . 
308)(generic_subprogram_declaration . 21 [...]
-      ((binary_adding_operator . 345))
       nil
       nil
+      ((abstract_subprogram_declaration . 295)(aspect_clause . 296)(at_clause 
. 297)(body . 298)(body_stub . 299)(declaration . 300)(declarations . 
301)(declarative_part_opt . 418)(entry_declaration . 
303)(enumeration_representation_clause . 304)(exception_declaration . 
305)(expression_function_declaration . 306)(full_type_declaration . 
307)(function_specification . 16)(generic_declaration . 
308)(generic_formal_part . 18)(generic_instantiation . 
309)(generic_package_declaration . 20)(gen [...]
+      ((binary_adding_operator . 347))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(selected_component . 54)(term . 
415))
       nil
       nil
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(selected_component . 55)(term . 
417))
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(factor . 414)(name . 
153)(primary . 156)(qualified_expression . 53)(selected_component . 54))
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(selected_component . 
54)(simple_expression . 413)(term . 164)(term_list . 165)(unary_adding_operator 
. 166))
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(relation . 
412)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(relation . 
410)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(relation . 
408)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(relation . 
407)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(relation . 
405)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(relation . 
403)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((aggregate . 150)(attribute_reference . 50)(name . 153)(primary . 
402)(qualified_expression . 53)(selected_component . 54))
-      ((aggregate . 150)(attribute_reference . 50)(expression . 151)(factor . 
152)(name . 153)(pragma_argument_association . 401)(primary . 
156)(qualified_expression . 53)(relation_and_list . 157)(relation_and_then_list 
. 158)(relation_or_list . 159)(relation_or_else_list . 160)(relation_xor_list . 
161)(relation . 162)(selected_component . 54)(simple_expression . 163)(term . 
164)(term_list . 165)(unary_adding_operator . 166))
+      ((aggregate . 151)(attribute_reference . 51)(factor . 416)(name . 
154)(primary . 157)(qualified_expression . 54)(selected_component . 55))
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(selected_component . 
55)(simple_expression . 415)(term . 165)(term_list . 166)(unary_adding_operator 
. 167))
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(relation . 
414)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(relation . 
412)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(relation . 
410)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(relation . 
409)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
-      ((actual_parameter_part . 90))
-      ((aggregate . 150)(attribute_reference . 50)(expression . 399)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((quantifier . 398))
-      ((aggregate . 150)(attribute_reference . 50)(expression . 395)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(relation . 
407)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(relation . 
405)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((aggregate . 151)(attribute_reference . 51)(name . 154)(primary . 
404)(qualified_expression . 54)(selected_component . 55))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 152)(factor . 
153)(name . 154)(pragma_argument_association . 403)(primary . 
157)(qualified_expression . 54)(relation_and_list . 158)(relation_and_then_list 
. 159)(relation_or_list . 160)(relation_or_else_list . 161)(relation_xor_list . 
162)(relation . 163)(selected_component . 55)(simple_expression . 164)(term . 
165)(term_list . 166)(unary_adding_operator . 167))
       nil
+      ((actual_parameter_part . 91))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 401)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((quantifier . 400))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 397)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 391)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
       nil
       nil
+      ((aggregate . 151)(attribute_reference . 51)(expression . 393)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
       nil
-      ((procedure_specification . 31)(subprogram_specification . 387))
       nil
       nil
+      ((function_specification . 16)(procedure_specification . 
32)(subprogram_specification . 389))
       nil
       nil
-      ((attribute_reference . 50)(name . 384)(qualified_expression . 
53)(selected_component . 54))
-      ((attribute_reference . 50)(name . 383)(qualified_expression . 
53)(selected_component . 54))
-      ((actual_parameter_part . 90)(aspect_specification_opt . 653))
-      ((actual_parameter_part . 90)(aspect_specification_opt . 652))
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 
634)(handled_sequence_of_statements . 635)(if_statement . 636)(iteration_scheme 
. 637)(label_opt . 638)(loop_statement . 639)(name . 640)(pragma . 
641)(procedure_call_statement . 642)(qualified_expression . 53)(raise_statement 
. 64 [...]
       nil
-      ((aspect_specification_opt . 606))
       nil
+      ((attribute_reference . 51)(name . 386)(qualified_expression . 
54)(selected_component . 55))
+      ((attribute_reference . 51)(name . 385)(qualified_expression . 
54)(selected_component . 55))
+      ((actual_parameter_part . 91)(aspect_specification_opt . 657))
+      ((actual_parameter_part . 91)(aspect_specification_opt . 656))
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 
638)(handled_sequence_of_statements . 639)(if_statement . 640)(iteration_scheme 
. 641)(label_opt . 642)(loop_statement . 643)(name . 644)(pragma . 
645)(procedure_call_statement . 646)(qualified_expression . 54)(raise_statement 
. 64 [...]
       nil
+      ((aspect_specification_opt . 610))
       nil
       nil
       nil
@@ -3371,71 +3408,71 @@
       nil
       nil
       nil
-      ((iterator_specification . 601))
       nil
       nil
+      ((iterator_specification . 605))
       nil
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(relation . 
598)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(relation . 
597)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
       nil
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(relation . 
602)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(relation . 
596)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(relation . 
601)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(relation . 
595)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
       nil
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(relation . 
600)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(relation . 
599)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
-      ((multiplying_operator . 350))
       nil
       nil
+      ((multiplying_operator . 352))
       nil
-      ((aspect_specification_opt . 127))
-      ((aliased_opt . 589))
-      ((attribute_reference . 50)(name . 586)(qualified_expression . 
53)(selected_component . 54))
-      ((abstract_subprogram_declaration . 294)(aspect_clause . 295)(at_clause 
. 296)(body . 297)(body_stub . 298)(declaration . 299)(declarations . 
300)(declarative_part_opt . 585)(entry_declaration . 
302)(enumeration_representation_clause . 303)(exception_declaration . 
304)(full_type_declaration . 305)(generic_declaration . 
306)(generic_formal_part . 17)(generic_instantiation . 
307)(generic_package_declaration . 19)(generic_renaming_declaration . 
308)(generic_subprogram_declaration . 21 [...]
       nil
-      ((discriminant_part_opt . 584))
-      ((aspect_specification_opt . 582))
       nil
       nil
+      ((aspect_specification_opt . 128))
+      ((aliased_opt . 592))
+      ((attribute_reference . 51)(name . 589)(qualified_expression . 
54)(selected_component . 55))
+      ((abstract_subprogram_declaration . 295)(aspect_clause . 296)(at_clause 
. 297)(body . 298)(body_stub . 299)(declaration . 300)(declarations . 
301)(declarative_part_opt . 588)(entry_declaration . 
303)(enumeration_representation_clause . 304)(exception_declaration . 
305)(expression_function_declaration . 306)(full_type_declaration . 
307)(function_specification . 16)(generic_declaration . 
308)(generic_formal_part . 18)(generic_instantiation . 
309)(generic_package_declaration . 20)(gen [...]
       nil
-      ((aspect_specification_opt . 578))
+      ((discriminant_part_opt . 587))
+      ((aspect_specification_opt . 585))
       nil
       nil
-      ((attribute_reference . 50)(name . 575)(qualified_expression . 
53)(selected_component . 54))
       nil
+      ((aspect_specification_opt . 581))
       nil
       nil
+      ((attribute_reference . 51)(name . 578)(qualified_expression . 
54)(selected_component . 55))
       nil
-      ((actual_parameter_part . 90))
-      ((access_definition . 570)(null_exclusion_opt . 571))
       nil
       nil
-      ((actual_parameter_part . 90))
       nil
-      ((relational_operator . 564))
+      ((actual_parameter_part . 91))
+      ((access_definition . 573)(null_exclusion_opt . 574))
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(choice_relation . 
568)(factor . 152)(name . 153)(primary . 156)(qualified_expression . 
53)(selected_component . 54)(simple_expression . 443)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((aggregate . 150)(attribute_reference . 50)(choice_relation . 
567)(factor . 152)(name . 153)(primary . 156)(qualified_expression . 
53)(selected_component . 54)(simple_expression . 443)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
+      ((actual_parameter_part . 91))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(choice_relation . 
566)(factor . 152)(name . 153)(primary . 156)(qualified_expression . 
53)(selected_component . 54)(simple_expression . 443)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
+      ((relational_operator . 567))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(choice_relation . 
565)(factor . 152)(name . 153)(primary . 156)(qualified_expression . 
53)(selected_component . 54)(simple_expression . 443)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
       nil
+      ((aggregate . 151)(attribute_reference . 51)(choice_relation . 
571)(factor . 153)(name . 154)(primary . 157)(qualified_expression . 
54)(selected_component . 55)(simple_expression . 446)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((aggregate . 151)(attribute_reference . 51)(choice_relation . 
570)(factor . 153)(name . 154)(primary . 157)(qualified_expression . 
54)(selected_component . 55)(simple_expression . 446)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
+      ((aggregate . 151)(attribute_reference . 51)(choice_relation . 
569)(factor . 153)(name . 154)(primary . 157)(qualified_expression . 
54)(selected_component . 55)(simple_expression . 446)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
+      ((aggregate . 151)(attribute_reference . 51)(choice_relation . 
568)(factor . 153)(name . 154)(primary . 157)(qualified_expression . 
54)(selected_component . 55)(simple_expression . 446)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
-      ((relational_operator . 564))
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(factor . 
152)(membership_choice_list . 562)(membership_choice . 461)(name . 185)(primary 
. 156)(qualified_expression . 53)(range . 462)(selected_component . 
54)(simple_expression . 463)(term . 164)(term_list . 165)(unary_adding_operator 
. 166))
       nil
+      ((relational_operator . 567))
       nil
       nil
+      ((aggregate . 151)(attribute_reference . 51)(factor . 
153)(membership_choice_list . 565)(membership_choice . 464)(name . 186)(primary 
. 157)(qualified_expression . 54)(range . 465)(selected_component . 
55)(simple_expression . 466)(term . 165)(term_list . 166)(unary_adding_operator 
. 167))
       nil
       nil
       nil
@@ -3444,11 +3481,11 @@
       nil
       nil
       nil
-      ((access_definition . 553)(attribute_reference . 50)(name . 
554)(null_exclusion_opt . 211)(null_exclusion_opt_name . 
555)(qualified_expression . 53)(selected_component . 556))
-      ((discriminant_specification_opt . 550)(identifier_list . 253))
       nil
       nil
       nil
+      ((access_definition . 556)(attribute_reference . 51)(name . 
557)(null_exclusion_opt . 212)(null_exclusion_opt_name . 
558)(qualified_expression . 54)(selected_component . 559))
+      ((discriminant_specification_opt . 553)(identifier_list . 254))
       nil
       nil
       nil
@@ -3460,55 +3497,57 @@
       nil
       nil
       nil
-      ((aspect_specification_opt . 537))
       nil
       nil
       nil
+      ((aspect_specification_opt . 540))
+      nil
       nil
       nil
-      ((aspect_specification_opt . 532))
       nil
       nil
+      ((aspect_specification_opt . 535))
       nil
       nil
-      ((aspect_specification_opt . 529))
-      ((attribute_reference . 50)(name . 528)(qualified_expression . 
53)(selected_component . 54))
-      ((actual_parameter_part . 90)(aspect_specification_opt . 527))
-      ((aggregate . 150)(attribute_reference . 50)(expression . 525)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
       nil
       nil
+      ((aspect_specification_opt . 532))
+      ((attribute_reference . 51)(name . 531)(qualified_expression . 
54)(selected_component . 55))
+      ((actual_parameter_part . 91)(aspect_specification_opt . 530))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 528)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      nil
       nil
       nil
       nil
-      ((attribute_reference . 50)(name . 523)(qualified_expression . 
53)(selected_component . 54))
       nil
+      ((attribute_reference . 51)(name . 526)(qualified_expression . 
54)(selected_component . 55))
       nil
       nil
-      ((mode_opt . 519))
       nil
-      ((aggregate . 150)(association_opt . 172)(association_list . 
518)(attribute_reference . 50)(choice_expression . 
174)(choice_relation_and_list . 175)(choice_relation_or_list . 
176)(choice_relation_xor_list . 177)(choice_relation_and_then_list . 
178)(choice_relation_or_else_list . 179)(choice_relation . 180)(discrete_choice 
. 181)(discrete_choice_list . 182)(expression . 183)(expression_opt . 
184)(factor . 152)(name . 185)(primary . 156)(qualified_expression . 53)(range 
. 186)(relati [...]
+      ((mode_opt . 522))
       nil
+      ((aggregate . 151)(association_opt . 173)(association_list . 
521)(attribute_reference . 51)(choice_expression . 
175)(choice_relation_and_list . 176)(choice_relation_or_list . 
177)(choice_relation_xor_list . 178)(choice_relation_and_then_list . 
179)(choice_relation_or_else_list . 180)(choice_relation . 181)(discrete_choice 
. 182)(discrete_choice_list . 183)(expression . 184)(expression_opt . 
185)(factor . 153)(name . 186)(primary . 157)(qualified_expression . 54)(range 
. 187)(relati [...]
       nil
       nil
       nil
       nil
-      ((null_exclusion_opt . 780))
-      ((aggregate . 150)(attribute_reference . 50)(expression . 779)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((formal_part . 91)(parameter_and_result_profile . 778))
-      ((formal_part . 115)(parameter_profile_opt . 777))
-      ((actual_parameter_part . 90))
       nil
-      ((aspect_specification_opt . 775))
-      ((aggregate . 150)(attribute_reference . 50)(expression . 774)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
+      ((null_exclusion_opt . 786))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 785)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((formal_part . 92)(parameter_and_result_profile . 784))
+      ((formal_part . 116)(parameter_profile_opt . 783))
+      ((actual_parameter_part . 91))
       nil
-      ((actual_parameter_part . 90)(formal_package_actual_part . 772))
+      ((aspect_specification_opt . 781))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 780)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
+      ((actual_parameter_part . 91)(formal_package_actual_part . 778))
       nil
       nil
       nil
       nil
-      ((attribute_reference . 50)(name . 768)(qualified_expression . 
53)(selected_component . 54))
       nil
+      ((attribute_reference . 51)(name . 774)(qualified_expression . 
54)(selected_component . 55))
       nil
       nil
       nil
@@ -3519,135 +3558,147 @@
       nil
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(discrete_subtype_definition 
. 753)(discrete_subtype_definition_list . 754)(factor . 
152)(index_subtype_definition . 755)(index_subtype_definition_list . 756)(name 
. 757)(primary . 156)(qualified_expression . 53)(range . 
758)(selected_component . 54)(simple_expression . 759)(subtype_indication . 
760)(term . 164)(term_list . 165)(unary_adding_operator . 166))
       nil
+      ((aggregate . 151)(attribute_reference . 51)(discrete_subtype_definition 
. 759)(discrete_subtype_definition_list . 760)(factor . 
153)(index_subtype_definition . 761)(index_subtype_definition_list . 762)(name 
. 763)(primary . 157)(qualified_expression . 54)(range . 
764)(selected_component . 55)(simple_expression . 765)(subtype_indication . 
766)(term . 165)(term_list . 166)(unary_adding_operator . 167))
       nil
       nil
       nil
       nil
       nil
       nil
-      ((actual_parameter_part . 90))
       nil
+      ((actual_parameter_part . 91))
       nil
       nil
       nil
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(factor . 
152)(membership_choice . 747)(name . 185)(primary . 156)(qualified_expression . 
53)(range . 462)(selected_component . 54)(simple_expression . 463)(term . 
164)(term_list . 165)(unary_adding_operator . 166))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 746)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(selected_component . 
54)(simple_expression . 745)(term . 164)(term_list . 165)(unary_adding_operator 
. 166))
+      ((aggregate . 151)(attribute_reference . 51)(factor . 
153)(membership_choice . 753)(name . 186)(primary . 157)(qualified_expression . 
54)(range . 465)(selected_component . 55)(simple_expression . 466)(term . 
165)(term_list . 166)(unary_adding_operator . 167))
       nil
+      ((aggregate . 151)(attribute_reference . 51)(expression . 752)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(selected_component . 
55)(simple_expression . 751)(term . 165)(term_list . 166)(unary_adding_operator 
. 167))
       nil
       nil
       nil
       nil
       nil
-      ((attribute_reference . 50)(name . 742)(qualified_expression . 
53)(selected_component . 54))
-      ((aggregate . 740)(record_rep . 741))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 737)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((actual_parameter_part . 90)(aspect_specification_opt . 167))
+      ((attribute_reference . 51)(name . 748)(qualified_expression . 
54)(selected_component . 55))
+      ((aggregate . 746)(record_rep . 747))
+      nil
+      ((aggregate . 151)(attribute_reference . 51)(expression . 743)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((actual_parameter_part . 91)(aspect_specification_opt . 168))
+      ((discriminant_part_opt . 741))
+      ((aspect_specification_opt . 707))
+      nil
+      ((attribute_reference . 51)(name . 737)(qualified_expression . 
54)(selected_component . 55)(subtype_indication . 738))
       ((discriminant_part_opt . 735))
-      ((aspect_specification_opt . 703))
+      ((aspect_specification_opt . 706))
+      nil
+      nil
+      nil
+      nil
+      ((actual_parameter_part . 91))
+      nil
+      nil
+      ((constant_opt . 727))
+      nil
       nil
-      ((attribute_reference . 50)(name . 731)(qualified_expression . 
53)(selected_component . 54)(subtype_indication . 732))
-      ((discriminant_part_opt . 729))
-      ((aspect_specification_opt . 702))
+      ((paren_expression . 722))
+      ((formal_part . 116)(parameter_profile_opt . 720))
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 
638)(handled_sequence_of_statements . 718)(if_statement . 640)(iteration_scheme 
. 641)(label_opt . 642)(loop_statement . 643)(name . 644)(pragma . 
645)(procedure_call_statement . 646)(qualified_expression . 54)(raise_statement 
. 64 [...]
+      ((attribute_reference . 51)(name . 210)(name_opt . 
717)(qualified_expression . 54)(selected_component . 55))
       nil
       nil
       nil
       nil
-      ((actual_parameter_part . 90))
+      ((case_expression_alternative . 715)(case_expression_alternative_list . 
716))
       nil
       nil
-      ((constant_opt . 721))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 709)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 708)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((aspect_specification_opt . 707))
+      ((aspect_specification_opt . 706))
       nil
       nil
-      ((formal_part . 115)(parameter_profile_opt . 716))
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 
634)(handled_sequence_of_statements . 714)(if_statement . 636)(iteration_scheme 
. 637)(label_opt . 638)(loop_statement . 639)(name . 640)(pragma . 
641)(procedure_call_statement . 642)(qualified_expression . 53)(raise_statement 
. 64 [...]
-      ((attribute_reference . 50)(name . 209)(name_opt . 
713)(qualified_expression . 53)(selected_component . 54))
       nil
       nil
+      ((attribute_reference . 51)(name . 702)(qualified_expression . 
54)(selected_component . 55))
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 
638)(handled_sequence_of_statements . 701)(if_statement . 640)(iteration_scheme 
. 641)(label_opt . 642)(loop_statement . 643)(name . 644)(pragma . 
645)(procedure_call_statement . 646)(qualified_expression . 54)(raise_statement 
. 64 [...]
+      ((aggregate . 151)(attribute_reference . 51)(expression . 
184)(expression_opt . 700)(factor . 153)(name . 154)(primary . 
157)(qualified_expression . 54)(relation_and_list . 158)(relation_and_then_list 
. 159)(relation_or_list . 160)(relation_or_else_list . 161)(relation_xor_list . 
162)(relation . 163)(selected_component . 55)(simple_expression . 164)(term . 
165)(term_list . 166)(unary_adding_operator . 167))
+      ((abstract_subprogram_declaration . 295)(aspect_clause . 296)(at_clause 
. 297)(body . 298)(body_stub . 299)(declaration . 300)(declarations . 
301)(declarative_part_opt . 699)(entry_declaration . 
303)(enumeration_representation_clause . 304)(exception_declaration . 
305)(expression_function_declaration . 306)(full_type_declaration . 
307)(function_specification . 16)(generic_declaration . 
308)(generic_formal_part . 18)(generic_instantiation . 
309)(generic_package_declaration . 20)(gen [...]
+      ((aggregate . 151)(attribute_reference . 51)(expression . 698)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((identifier_opt . 696))
+      ((iterator_specification . 693)(iterator_specification_opt . 694))
       nil
+      ((aggregate . 151)(attribute_reference . 51)(expression . 
184)(expression_opt . 691)(factor . 153)(name . 154)(primary . 
157)(qualified_expression . 54)(relation_and_list . 158)(relation_and_then_list 
. 159)(relation_or_list . 160)(relation_or_else_list . 161)(relation_xor_list . 
162)(relation . 163)(selected_component . 55)(simple_expression . 164)(term . 
165)(term_list . 166)(unary_adding_operator . 167))
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 638)(if_statement . 
640)(iteration_scheme . 641)(label_opt . 642)(loop_statement . 643)(name . 
644)(pragma . 645)(procedure_call_statement . 646)(qualified_expression . 
54)(raise_statement . 647)(requeue_statement . 648)(selected_c [...]
       nil
-      ((case_expression_alternative . 711)(case_expression_alternative_list . 
712))
+      ((attribute_reference . 51)(name . 688)(qualified_expression . 
54)(selected_component . 55))
+      ((attribute_reference . 51)(name . 686)(qualified_expression . 
54)(selected_component . 55))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 
683)(extended_return_object_declaration . 
684)(extended_return_object_declaration_opt . 685)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((accept_statement . 671)(attribute_reference . 51)(delay_alternative . 
672)(delay_statement . 673)(entry_call_alternative . 674)(name . 
675)(procedure_call_statement . 676)(qualified_expression . 
54)(selected_component . 55)(select_alternative . 677)(select_alternative_list 
. 678)(select_alternative_list_opt . 679)(triggering_alternative . 680))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 
184)(expression_opt . 668)(factor . 153)(name . 154)(primary . 
157)(qualified_expression . 54)(relation_and_list . 158)(relation_and_then_list 
. 159)(relation_or_list . 160)(relation_or_else_list . 161)(relation_xor_list . 
162)(relation . 163)(selected_component . 55)(simple_expression . 164)(term . 
165)(term_list . 166)(unary_adding_operator . 167))
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 705)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((aggregate . 150)(attribute_reference . 50)(expression . 704)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((aspect_specification_opt . 703))
-      ((aspect_specification_opt . 702))
       nil
       nil
       nil
       nil
-      ((attribute_reference . 50)(name . 698)(qualified_expression . 
53)(selected_component . 54))
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 
634)(handled_sequence_of_statements . 697)(if_statement . 636)(iteration_scheme 
. 637)(label_opt . 638)(loop_statement . 639)(name . 640)(pragma . 
641)(procedure_call_statement . 642)(qualified_expression . 53)(raise_statement 
. 64 [...]
-      ((aggregate . 150)(attribute_reference . 50)(expression . 696)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((abstract_subprogram_declaration . 294)(aspect_clause . 295)(at_clause 
. 296)(body . 297)(body_stub . 298)(declaration . 299)(declarations . 
300)(declarative_part_opt . 695)(entry_declaration . 
302)(enumeration_representation_clause . 303)(exception_declaration . 
304)(full_type_declaration . 305)(generic_declaration . 
306)(generic_formal_part . 17)(generic_instantiation . 
307)(generic_package_declaration . 19)(generic_renaming_declaration . 
308)(generic_subprogram_declaration . 21 [...]
-      ((aggregate . 150)(attribute_reference . 50)(expression . 694)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((identifier_opt . 692))
-      ((iterator_specification . 689)(iterator_specification_opt . 690))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 
183)(expression_opt . 687)(factor . 152)(name . 153)(primary . 
156)(qualified_expression . 53)(relation_and_list . 157)(relation_and_then_list 
. 158)(relation_or_list . 159)(relation_or_else_list . 160)(relation_xor_list . 
161)(relation . 162)(selected_component . 54)(simple_expression . 163)(term . 
164)(term_list . 165)(unary_adding_operator . 166))
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 634)(if_statement . 
636)(iteration_scheme . 637)(label_opt . 638)(loop_statement . 639)(name . 
640)(pragma . 641)(procedure_call_statement . 642)(qualified_expression . 
53)(raise_statement . 643)(requeue_statement . 644)(selected_c [...]
       nil
-      ((attribute_reference . 50)(name . 684)(qualified_expression . 
53)(selected_component . 54))
-      ((attribute_reference . 50)(name . 682)(qualified_expression . 
53)(selected_component . 54))
-      ((aggregate . 150)(attribute_reference . 50)(expression . 
679)(extended_return_object_declaration . 
680)(extended_return_object_declaration_opt . 681)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((accept_statement . 667)(attribute_reference . 50)(delay_alternative . 
668)(delay_statement . 669)(entry_call_alternative . 670)(name . 
671)(procedure_call_statement . 672)(qualified_expression . 
53)(selected_component . 54)(select_alternative . 673)(select_alternative_list 
. 674)(select_alternative_list_opt . 675)(triggering_alternative . 676))
-      ((aggregate . 150)(attribute_reference . 50)(expression . 
183)(expression_opt . 664)(factor . 152)(name . 153)(primary . 
156)(qualified_expression . 53)(relation_and_list . 157)(relation_and_then_list 
. 158)(relation_or_list . 159)(relation_or_else_list . 160)(relation_xor_list . 
161)(relation . 162)(selected_component . 54)(simple_expression . 163)(term . 
164)(term_list . 165)(unary_adding_operator . 166))
       nil
       nil
       nil
       nil
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(compound_statement . 664)(conditional_entry_call . 
635)(delay_statement . 636)(exit_statement . 637)(extended_return_statement . 
638)(if_statement . 640)(iteration_scheme . 641)(loop_statement . 643)(name . 
644)(pragma . 645)(procedure_call_statement . 646)(qualified_expression . 
54)(raise_statement . 647)(requeue_statement . 648)(s [...]
       nil
+      ((actual_parameter_part . 91))
       nil
       nil
       nil
       nil
       nil
       nil
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 638)(if_statement . 
640)(iteration_scheme . 641)(label_opt . 642)(loop_statement . 643)(name . 
644)(pragma . 645)(procedure_call_statement . 646)(qualified_expression . 
54)(raise_statement . 647)(requeue_statement . 648)(selected_c [...]
       nil
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(compound_statement . 660)(conditional_entry_call . 
631)(delay_statement . 632)(exit_statement . 633)(extended_return_statement . 
634)(if_statement . 636)(iteration_scheme . 637)(loop_statement . 639)(name . 
640)(pragma . 641)(procedure_call_statement . 642)(qualified_expression . 
53)(raise_statement . 643)(requeue_statement . 644)(s [...]
       nil
-      ((actual_parameter_part . 90))
       nil
       nil
       nil
       nil
       nil
       nil
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 634)(if_statement . 
636)(iteration_scheme . 637)(label_opt . 638)(loop_statement . 639)(name . 
640)(pragma . 641)(procedure_call_statement . 642)(qualified_expression . 
53)(raise_statement . 643)(requeue_statement . 644)(selected_c [...]
+      ((exception_handler . 931)(exception_handler_list . 
932)(exception_handler_list_opt . 933))
       nil
+      ((aggregate . 151)(attribute_reference . 51)(expression . 929)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
       nil
       nil
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 638)(if_statement . 
640)(iteration_scheme . 641)(label_opt . 642)(loop_statement . 643)(name . 
644)(pragma . 645)(procedure_call_statement . 646)(qualified_expression . 
54)(raise_statement . 647)(requeue_statement . 648)(selected_c [...]
+      ((attribute_reference . 51)(name . 210)(name_opt . 
927)(qualified_expression . 54)(selected_component . 55))
       nil
       nil
+      ((aggregate . 151)(attribute_reference . 51)(expression . 925)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 638)(if_statement . 
640)(iteration_scheme . 641)(label_opt . 642)(loop_statement . 643)(name . 
644)(pragma . 645)(procedure_call_statement . 646)(qualified_expression . 
54)(raise_statement . 647)(requeue_statement . 648)(selected_c [...]
       nil
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 638)(if_statement . 
640)(iteration_scheme . 641)(label_opt . 642)(loop_statement . 643)(name . 
644)(pragma . 645)(procedure_call_statement . 646)(qualified_expression . 
54)(raise_statement . 647)(requeue_statement . 648)(selected_c [...]
       nil
-      ((exception_handler . 921)(exception_handler_list . 
922)(exception_handler_list_opt . 923))
+      ((accept_statement . 630)(actual_parameter_part . 
91)(assignment_statement . 631)(asynchronous_select . 632)(attribute_reference 
. 51)(block_statement . 633)(case_statement . 634)(conditional_entry_call . 
635)(delay_statement . 636)(exit_statement . 637)(extended_return_statement . 
638)(if_statement . 640)(iteration_scheme . 641)(label_opt . 
642)(loop_statement . 643)(name . 644)(pragma . 645)(procedure_call_statement . 
646)(qualified_expression . 54)(raise_statement . 647)(requeue [...]
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 638)(if_statement . 
640)(iteration_scheme . 641)(label_opt . 642)(loop_statement . 643)(name . 
644)(pragma . 645)(procedure_call_statement . 646)(qualified_expression . 
54)(raise_statement . 647)(requeue_statement . 648)(selected_c [...]
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 919)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
       nil
       nil
       nil
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 634)(if_statement . 
636)(iteration_scheme . 637)(label_opt . 638)(loop_statement . 639)(name . 
640)(pragma . 641)(procedure_call_statement . 642)(qualified_expression . 
53)(raise_statement . 643)(requeue_statement . 644)(selected_c [...]
-      ((attribute_reference . 50)(name . 209)(name_opt . 
917)(qualified_expression . 53)(selected_component . 54))
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 915)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 634)(if_statement . 
636)(iteration_scheme . 637)(label_opt . 638)(loop_statement . 639)(name . 
640)(pragma . 641)(procedure_call_statement . 642)(qualified_expression . 
53)(raise_statement . 643)(requeue_statement . 644)(selected_c [...]
       nil
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 634)(if_statement . 
636)(iteration_scheme . 637)(label_opt . 638)(loop_statement . 639)(name . 
640)(pragma . 641)(procedure_call_statement . 642)(qualified_expression . 
53)(raise_statement . 643)(requeue_statement . 644)(selected_c [...]
       nil
-      ((accept_statement . 626)(actual_parameter_part . 
90)(assignment_statement . 627)(asynchronous_select . 628)(attribute_reference 
. 50)(block_statement . 629)(case_statement . 630)(conditional_entry_call . 
631)(delay_statement . 632)(exit_statement . 633)(extended_return_statement . 
634)(if_statement . 636)(iteration_scheme . 637)(label_opt . 
638)(loop_statement . 639)(name . 640)(pragma . 641)(procedure_call_statement . 
642)(qualified_expression . 53)(raise_statement . 643)(requeue [...]
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 634)(if_statement . 
636)(iteration_scheme . 637)(label_opt . 638)(loop_statement . 639)(name . 
640)(pragma . 641)(procedure_call_statement . 642)(qualified_expression . 
53)(raise_statement . 643)(requeue_statement . 644)(selected_c [...]
       nil
+      ((actual_parameter_part . 91))
       nil
+      ((actual_parameter_part . 91))
       nil
       nil
       nil
@@ -3655,324 +3706,324 @@
       nil
       nil
       nil
-      ((actual_parameter_part . 90))
       nil
-      ((actual_parameter_part . 90))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 901)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
       nil
       nil
       nil
+      ((actual_parameter_part . 91))
+      ((actual_parameter_part . 894)(actual_parameter_part_opt . 895))
       nil
       nil
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 891)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
       nil
+      ((elsif_expression_item . 888)(elsif_expression_list . 889))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 885)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((attribute_reference . 51)(name . 737)(qualified_expression . 
54)(selected_component . 55)(subtype_indication . 884))
+      ((aggregate . 151)(attribute_reference . 51)(discrete_subtype_definition 
. 883)(factor . 153)(name . 875)(primary . 157)(qualified_expression . 
54)(range . 764)(selected_component . 55)(simple_expression . 
765)(subtype_indication . 766)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((attribute_reference . 51)(name . 881)(qualified_expression . 
54)(selected_component . 55))
+      ((aggregate . 151)(attribute_reference . 51)(choice_expression . 
175)(choice_relation_and_list . 176)(choice_relation_or_list . 
177)(choice_relation_xor_list . 178)(choice_relation_and_then_list . 
179)(choice_relation_or_else_list . 180)(choice_relation . 181)(discrete_choice 
. 182)(discrete_choice_list . 879)(factor . 153)(name . 186)(primary . 
157)(qualified_expression . 54)(range . 187)(selected_component . 
55)(simple_expression . 459)(term . 165)(term_list . 166)(unary_adding_o [...]
       nil
       nil
       nil
-      ((actual_parameter_part . 90))
-      ((actual_parameter_part . 884)(actual_parameter_part_opt . 885))
       nil
+      ((aggregate . 151)(attribute_reference . 51)(discrete_subtype_definition 
. 874)(factor . 153)(identifier_list . 214)(name . 875)(parameter_specification 
. 215)(parameter_specification_list . 216)(primary . 157)(qualified_expression 
. 54)(range . 764)(selected_component . 55)(simple_expression . 
765)(subtype_indication . 766)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((aspect_specification_opt . 873))
+      ((aggregate . 151)(attribute_reference . 51)(case_expression . 
870)(expression . 871)(factor . 153)(if_expression . 872)(name . 154)(primary . 
157)(qualified_expression . 54)(relation_and_list . 158)(relation_and_then_list 
. 159)(relation_or_list . 160)(relation_or_else_list . 161)(relation_xor_list . 
162)(relation . 163)(selected_component . 55)(simple_expression . 164)(term . 
165)(term_list . 166)(unary_adding_operator . 167))
+      ((aspect_specification_opt . 869))
+      ((aspect_specification_opt . 868))
+      ((aspect_specification_opt . 867))
+      ((aspect_specification_opt . 866))
       nil
+      ((access_definition . 863)(array_type_definition . 
864)(attribute_reference . 51)(name . 737)(null_exclusion_opt . 
212)(qualified_expression . 54)(selected_component . 55)(subtype_indication . 
865))
       nil
+      ((aggregate . 151)(attribute_reference . 51)(expression . 861)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((attribute_reference . 51)(name . 210)(name_opt . 
860)(qualified_expression . 54)(selected_component . 55))
+      ((abstract_limited_synchronized_opt . 850)(abstract_limited_opt . 
851)(abstract_tagged_limited_opt . 852)(access_definition . 
853)(array_type_definition . 854)(derived_type_definition . 
855)(enumeration_type_definition . 856)(interface_type_definition . 
857)(null_exclusion_opt . 212)(record_type_definition . 858)(type_definition . 
859))
       nil
+      ((abstract_subprogram_declaration . 295)(aspect_clause . 296)(at_clause 
. 297)(body . 298)(body_stub . 299)(declaration . 300)(declarations . 
301)(declarative_part_opt . 838)(entry_declaration . 
303)(enumeration_representation_clause . 304)(exception_declaration . 
305)(expression_function_declaration . 306)(full_type_declaration . 
307)(function_specification . 16)(generic_declaration . 
308)(generic_formal_part . 18)(generic_instantiation . 
309)(generic_package_declaration . 20)(gen [...]
       nil
-      ((elsif_expression_item . 878)(elsif_expression_list . 879))
-      ((aggregate . 150)(attribute_reference . 50)(expression . 875)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((attribute_reference . 50)(name . 731)(qualified_expression . 
53)(selected_component . 54)(subtype_indication . 874))
-      ((aggregate . 150)(attribute_reference . 50)(discrete_subtype_definition 
. 873)(factor . 152)(name . 865)(primary . 156)(qualified_expression . 
53)(range . 758)(selected_component . 54)(simple_expression . 
759)(subtype_indication . 760)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((attribute_reference . 50)(name . 871)(qualified_expression . 
53)(selected_component . 54))
-      ((aggregate . 150)(attribute_reference . 50)(choice_expression . 
174)(choice_relation_and_list . 175)(choice_relation_or_list . 
176)(choice_relation_xor_list . 177)(choice_relation_and_then_list . 
178)(choice_relation_or_else_list . 179)(choice_relation . 180)(discrete_choice 
. 181)(discrete_choice_list . 869)(factor . 152)(name . 185)(primary . 
156)(qualified_expression . 53)(range . 186)(selected_component . 
54)(simple_expression . 456)(term . 164)(term_list . 165)(unary_adding_o [...]
+      ((aspect_specification_opt . 835))
       nil
+      ((actual_parameter_part . 91)(constraint . 805)(index_constraint . 806))
+      ((aspect_specification_opt . 832))
+      ((abstract_subprogram_declaration . 295)(aspect_clause . 296)(at_clause 
. 297)(body . 298)(body_stub . 299)(declaration . 300)(declarations . 
301)(declarative_part_opt . 830)(entry_declaration . 
303)(enumeration_representation_clause . 304)(exception_declaration . 
305)(expression_function_declaration . 306)(full_type_declaration . 
307)(function_specification . 16)(generic_declaration . 
308)(generic_formal_part . 18)(generic_instantiation . 
309)(generic_package_declaration . 20)(gen [...]
       nil
+      ((aspect_specification_opt . 827))
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(discrete_subtype_definition 
. 864)(factor . 152)(identifier_list . 213)(name . 865)(parameter_specification 
. 214)(parameter_specification_list . 215)(primary . 156)(qualified_expression 
. 53)(range . 758)(selected_component . 54)(simple_expression . 
759)(subtype_indication . 760)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((aspect_specification_opt . 863))
-      ((aspect_specification_opt . 862))
-      ((aspect_specification_opt . 861))
-      ((aspect_specification_opt . 860))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 824)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((mod_clause_opt . 823))
       nil
-      ((access_definition . 857)(array_type_definition . 
858)(attribute_reference . 50)(name . 731)(null_exclusion_opt . 
211)(qualified_expression . 53)(selected_component . 54)(subtype_indication . 
859))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 855)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((attribute_reference . 50)(name . 209)(name_opt . 
854)(qualified_expression . 53)(selected_component . 54))
-      ((abstract_limited_synchronized_opt . 844)(abstract_limited_opt . 
845)(abstract_tagged_limited_opt . 846)(access_definition . 
847)(array_type_definition . 848)(derived_type_definition . 
849)(enumeration_type_definition . 850)(interface_type_definition . 
851)(null_exclusion_opt . 211)(record_type_definition . 852)(type_definition . 
853))
+      ((actual_parameter_part . 91))
+      ((attribute_reference . 51)(name . 818)(qualified_expression . 
54)(selected_component . 55))
+      ((attribute_reference . 51)(name . 817)(qualified_expression . 
54)(selected_component . 55))
       nil
-      ((abstract_subprogram_declaration . 294)(aspect_clause . 295)(at_clause 
. 296)(body . 297)(body_stub . 298)(declaration . 299)(declarations . 
300)(declarative_part_opt . 832)(entry_declaration . 
302)(enumeration_representation_clause . 303)(exception_declaration . 
304)(full_type_declaration . 305)(generic_declaration . 
306)(generic_formal_part . 17)(generic_instantiation . 
307)(generic_package_declaration . 19)(generic_renaming_declaration . 
308)(generic_subprogram_declaration . 21 [...]
       nil
-      ((aspect_specification_opt . 829))
       nil
-      ((actual_parameter_part . 90)(constraint . 799)(index_constraint . 800))
-      ((aspect_specification_opt . 826))
-      ((abstract_subprogram_declaration . 294)(aspect_clause . 295)(at_clause 
. 296)(body . 297)(body_stub . 298)(declaration . 299)(declarations . 
300)(declarative_part_opt . 824)(entry_declaration . 
302)(enumeration_representation_clause . 303)(exception_declaration . 
304)(full_type_declaration . 305)(generic_declaration . 
306)(generic_formal_part . 17)(generic_instantiation . 
307)(generic_package_declaration . 19)(generic_renaming_declaration . 
308)(generic_subprogram_declaration . 21 [...]
+      ((aggregate . 151)(attribute_reference . 51)(expression . 815)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 814)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((attribute_reference . 51)(name . 557)(qualified_expression . 
54)(selected_component . 813))
       nil
-      ((aspect_specification_opt . 821))
+      ((aggregate . 151)(attribute_reference . 51)(name . 154)(primary . 
286)(qualified_expression . 54)(selected_component . 55))
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 818)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((mod_clause_opt . 817))
       nil
       nil
-      ((actual_parameter_part . 90))
-      ((attribute_reference . 50)(name . 812)(qualified_expression . 
53)(selected_component . 54))
-      ((attribute_reference . 50)(name . 811)(qualified_expression . 
53)(selected_component . 54))
+      ((actual_parameter_part . 91)(constraint . 805)(index_constraint . 806))
       nil
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 809)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((aggregate . 150)(attribute_reference . 50)(expression . 808)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((attribute_reference . 50)(name . 554)(qualified_expression . 
53)(selected_component . 807))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(name . 153)(primary . 
285)(qualified_expression . 53)(selected_component . 54))
       nil
+      ((attribute_reference . 51)(interface_list . 801)(name . 
798)(qualified_expression . 54)(selected_component . 55))
+      ((attribute_reference . 51)(interface_list . 800)(name . 
798)(qualified_expression . 54)(selected_component . 55))
+      ((attribute_reference . 51)(interface_list . 799)(name . 
798)(qualified_expression . 54)(selected_component . 55))
       nil
+      ((attribute_reference . 51)(interface_list . 797)(name . 
798)(qualified_expression . 54)(selected_component . 55))
+      ((actual_parameter_part . 91))
       nil
       nil
-      ((actual_parameter_part . 90)(constraint . 799)(index_constraint . 800))
+      ((aggregate . 151)(association_opt . 173)(association_list . 
190)(attribute_reference . 51)(choice_expression . 
175)(choice_relation_and_list . 176)(choice_relation_or_list . 
177)(choice_relation_xor_list . 178)(choice_relation_and_then_list . 
179)(choice_relation_or_else_list . 180)(choice_relation . 181)(discrete_choice 
. 182)(discrete_choice_list . 183)(expression . 184)(expression_opt . 
185)(factor . 153)(name . 186)(primary . 157)(qualified_expression . 54)(range 
. 191)(relati [...]
+      ((aspect_specification_opt . 793))
       nil
+      ((aspect_specification_opt . 792))
       nil
+      ((identifier_list . 214)(parameter_specification . 
215)(parameter_specification_list . 216))
       nil
       nil
       nil
-      ((attribute_reference . 50)(interface_list . 795)(name . 
792)(qualified_expression . 53)(selected_component . 54))
-      ((attribute_reference . 50)(interface_list . 794)(name . 
792)(qualified_expression . 53)(selected_component . 54))
-      ((attribute_reference . 50)(interface_list . 793)(name . 
792)(qualified_expression . 53)(selected_component . 54))
+      ((attribute_reference . 51)(name . 790)(qualified_expression . 
54)(selected_component . 55))
       nil
-      ((attribute_reference . 50)(interface_list . 791)(name . 
792)(qualified_expression . 53)(selected_component . 54))
-      ((actual_parameter_part . 90))
       nil
       nil
-      ((aggregate . 150)(association_opt . 172)(association_list . 
189)(attribute_reference . 50)(choice_expression . 
174)(choice_relation_and_list . 175)(choice_relation_or_list . 
176)(choice_relation_xor_list . 177)(choice_relation_and_then_list . 
178)(choice_relation_or_else_list . 179)(choice_relation . 180)(discrete_choice 
. 181)(discrete_choice_list . 182)(expression . 183)(expression_opt . 
184)(factor . 152)(name . 185)(primary . 156)(qualified_expression . 53)(range 
. 190)(relati [...]
-      ((aspect_specification_opt . 787))
+      ((actual_parameter_part . 91))
       nil
-      ((aspect_specification_opt . 786))
       nil
-      ((identifier_list . 213)(parameter_specification . 
214)(parameter_specification_list . 215))
       nil
       nil
+      ((attribute_reference . 51)(interface_list . 1063)(name . 
798)(qualified_expression . 54)(selected_component . 55))
       nil
-      ((attribute_reference . 50)(name . 784)(qualified_expression . 
53)(selected_component . 54))
       nil
+      ((actual_parameter_part . 91))
       nil
       nil
-      ((actual_parameter_part . 90))
       nil
       nil
+      ((aggregate . 151)(association_opt . 173)(association_list . 
190)(attribute_reference . 51)(choice_expression . 
175)(choice_relation_and_list . 176)(choice_relation_or_list . 
177)(choice_relation_xor_list . 178)(choice_relation_and_then_list . 
179)(choice_relation_or_else_list . 180)(choice_relation . 181)(discrete_choice 
. 182)(discrete_choice_list . 183)(discrete_subtype_definition . 
759)(discrete_subtype_definition_list . 1059)(expression . 184)(expression_opt 
. 185)(factor . 15 [...]
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
186)(primary . 157)(qualified_expression . 54)(range . 1035)(selected_component 
. 55)(simple_expression . 765)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
       nil
-      ((attribute_reference . 50)(interface_list . 1049)(name . 
792)(qualified_expression . 53)(selected_component . 54))
+      ((attribute_reference . 51)(index_subtype_definition . 1055)(name . 
1056)(qualified_expression . 54)(selected_component . 55))
       nil
+      ((aggregate . 151)(attribute_reference . 51)(discrete_subtype_definition 
. 1053)(factor . 153)(name . 875)(primary . 157)(qualified_expression . 
54)(range . 764)(selected_component . 55)(simple_expression . 
765)(subtype_indication . 766)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
-      ((actual_parameter_part . 90))
+      ((attribute_reference . 51)(name . 1034)(qualified_expression . 
54)(selected_component . 55))
       nil
       nil
       nil
       nil
-      ((aggregate . 150)(association_opt . 172)(association_list . 
189)(attribute_reference . 50)(choice_expression . 
174)(choice_relation_and_list . 175)(choice_relation_or_list . 
176)(choice_relation_xor_list . 177)(choice_relation_and_then_list . 
178)(choice_relation_or_else_list . 179)(choice_relation . 180)(discrete_choice 
. 181)(discrete_choice_list . 182)(discrete_subtype_definition . 
753)(discrete_subtype_definition_list . 1045)(expression . 183)(expression_opt 
. 184)(factor . 15 [...]
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
185)(primary . 156)(qualified_expression . 53)(range . 1021)(selected_component 
. 54)(simple_expression . 759)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
       nil
+      ((actual_parameter_part . 91)(aspect_specification_opt . 1051))
+      ((actual_parameter_part . 91)(aspect_specification_opt . 1050))
+      ((attribute_reference . 51)(name . 1049)(qualified_expression . 
54)(selected_component . 55))
       nil
-      ((attribute_reference . 50)(index_subtype_definition . 1041)(name . 
1042)(qualified_expression . 53)(selected_component . 54))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(discrete_subtype_definition 
. 1039)(factor . 152)(name . 865)(primary . 156)(qualified_expression . 
53)(range . 758)(selected_component . 54)(simple_expression . 
759)(subtype_indication . 760)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
       nil
-      ((attribute_reference . 50)(name . 1020)(qualified_expression . 
53)(selected_component . 54))
+      ((component_clause . 1046)(component_clause_list . 1047))
       nil
       nil
+      ((aspect_specification_opt . 1043))
       nil
+      ((aspect_specification_opt . 1041))
+      ((attribute_reference . 51)(interface_list . 1040)(name . 
798)(qualified_expression . 54)(selected_component . 55))
       nil
       nil
-      ((actual_parameter_part . 90)(aspect_specification_opt . 1037))
-      ((actual_parameter_part . 90)(aspect_specification_opt . 1036))
-      ((attribute_reference . 50)(name . 1035)(qualified_expression . 
53)(selected_component . 54))
       nil
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
186)(primary . 157)(qualified_expression . 54)(range . 1035)(selected_component 
. 55)(simple_expression . 765)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((attribute_reference . 51)(name . 1034)(qualified_expression . 
54)(selected_component . 55))
       nil
+      ((aspect_specification_opt . 1031))
+      ((attribute_reference . 51)(interface_list . 1030)(name . 
798)(qualified_expression . 54)(selected_component . 55))
       nil
-      ((component_clause . 1032)(component_clause_list . 1033))
       nil
       nil
-      ((aspect_specification_opt . 1029))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 1025)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 1024)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((enumeration_literal . 1022)(enumeration_literal_list . 1023))
       nil
-      ((aspect_specification_opt . 1027))
-      ((attribute_reference . 50)(interface_list . 1026)(name . 
792)(qualified_expression . 53)(selected_component . 54))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 1019)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(selected_component . 
55)(simple_expression . 1017)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((aspect_clause . 1010)(at_clause . 297)(component_declaration . 
1011)(component_item . 1012)(component_list . 1013)(component_list_opt . 
1014)(enumeration_representation_clause . 304)(identifier_list . 
1015)(record_representation_clause . 328)(variant_part . 1016))
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
185)(primary . 156)(qualified_expression . 53)(range . 1021)(selected_component 
. 54)(simple_expression . 759)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((attribute_reference . 50)(name . 1020)(qualified_expression . 
53)(selected_component . 54))
       nil
-      ((aspect_specification_opt . 1017))
-      ((attribute_reference . 50)(interface_list . 1016)(name . 
792)(qualified_expression . 53)(selected_component . 54))
+      ((record_definition . 1004))
       nil
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 1011)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((aggregate . 150)(attribute_reference . 50)(expression . 1010)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((enumeration_literal . 1008)(enumeration_literal_list . 1009))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 1005)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(selected_component . 
54)(simple_expression . 1003)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((aspect_clause . 996)(at_clause . 296)(component_declaration . 
997)(component_item . 998)(component_list . 999)(component_list_opt . 
1000)(enumeration_representation_clause . 303)(identifier_list . 
1001)(record_representation_clause . 326)(variant_part . 1002))
       nil
+      ((aspect_specification_opt . 1002))
       nil
       nil
-      ((record_definition . 990))
       nil
+      ((aspect_specification_opt . 999))
+      ((aspect_specification_opt . 997))
+      ((aspect_specification_opt . 995))
       nil
       nil
       nil
       nil
       nil
-      ((aspect_specification_opt . 988))
       nil
       nil
       nil
-      ((aspect_specification_opt . 985))
-      ((aspect_specification_opt . 983))
-      ((aspect_specification_opt . 981))
       nil
+      ((actual_parameter_part . 91)(constraint . 805)(index_constraint . 806))
+      ((attribute_reference . 51)(name . 210)(name_opt . 
984)(qualified_expression . 54)(selected_component . 55))
       nil
+      ((case_expression_alternative . 983))
       nil
+      ((attribute_reference . 51)(name . 981)(qualified_expression . 
54)(selected_component . 55))
+      ((actual_parameter_part . 91))
+      ((aggregate . 151)(attribute_reference . 51)(discrete_subtype_definition 
. 980)(factor . 153)(name . 875)(primary . 157)(qualified_expression . 
54)(range . 764)(selected_component . 55)(simple_expression . 
765)(subtype_indication . 766)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
       nil
-      ((actual_parameter_part . 90)(constraint . 799)(index_constraint . 800))
-      ((attribute_reference . 50)(name . 209)(name_opt . 
974)(qualified_expression . 53)(selected_component . 54))
       nil
-      ((case_expression_alternative . 973))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 978)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 977)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
-      ((attribute_reference . 50)(name . 971)(qualified_expression . 
53)(selected_component . 54))
-      ((actual_parameter_part . 90))
-      ((aggregate . 150)(attribute_reference . 50)(discrete_subtype_definition 
. 970)(factor . 152)(name . 865)(primary . 156)(qualified_expression . 
53)(range . 758)(selected_component . 54)(simple_expression . 
759)(subtype_indication . 760)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
+      ((elsif_expression_item . 976))
+      ((aspect_clause . 967)(at_clause . 297)(entry_body . 
968)(enumeration_representation_clause . 304)(function_specification . 
16)(overriding_indicator_opt . 969)(procedure_specification . 
32)(protected_operation_item . 970)(protected_operation_item_list . 
971)(protected_operation_item_list_opt . 972)(record_representation_clause . 
328)(subprogram_body . 973)(subprogram_declaration . 974))
+      ((abstract_subprogram_declaration . 295)(aspect_clause . 296)(at_clause 
. 297)(body . 298)(body_stub . 299)(declaration . 300)(declarations . 
301)(declarative_part_opt . 965)(entry_declaration . 
303)(enumeration_representation_clause . 304)(exception_declaration . 
305)(expression_function_declaration . 306)(full_type_declaration . 
307)(function_specification . 16)(generic_declaration . 
308)(generic_formal_part . 18)(generic_instantiation . 
309)(generic_package_declaration . 20)(gen [...]
       nil
+      ((aggregate . 151)(association_opt . 173)(association_list . 
190)(attribute_reference . 51)(choice_expression . 
175)(choice_relation_and_list . 176)(choice_relation_or_list . 
177)(choice_relation_xor_list . 178)(choice_relation_and_then_list . 
179)(choice_relation_or_else_list . 180)(choice_relation . 181)(discrete_choice 
. 182)(discrete_choice_list . 183)(expression . 184)(expression_opt . 
185)(factor . 153)(name . 186)(primary . 157)(qualified_expression . 54)(range 
. 187)(relati [...]
       nil
+      ((formal_part . 116)(parameter_profile_opt . 964))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 968)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((aggregate . 150)(attribute_reference . 50)(expression . 967)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
+      ((identifier_opt . 963))
+      ((case_statement_alternative . 961)(case_statement_alternative_list . 
962))
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 
638)(handled_sequence_of_statements . 959)(if_statement . 640)(iteration_scheme 
. 641)(label_opt . 642)(loop_statement . 643)(name . 644)(pragma . 
645)(procedure_call_statement . 646)(qualified_expression . 54)(raise_statement 
. 64 [...]
       nil
-      ((elsif_expression_item . 966))
-      ((aspect_clause . 957)(at_clause . 296)(entry_body . 
958)(enumeration_representation_clause . 303)(overriding_indicator_opt . 
959)(procedure_specification . 31)(protected_operation_item . 
960)(protected_operation_item_list . 961)(protected_operation_item_list_opt . 
962)(record_representation_clause . 326)(subprogram_body . 
963)(subprogram_declaration . 964))
-      ((abstract_subprogram_declaration . 294)(aspect_clause . 295)(at_clause 
. 296)(body . 297)(body_stub . 298)(declaration . 299)(declarations . 
300)(declarative_part_opt . 955)(entry_declaration . 
302)(enumeration_representation_clause . 303)(exception_declaration . 
304)(full_type_declaration . 305)(generic_declaration . 
306)(generic_formal_part . 17)(generic_instantiation . 
307)(generic_package_declaration . 19)(generic_renaming_declaration . 
308)(generic_subprogram_declaration . 21 [...]
       nil
-      ((aggregate . 150)(association_opt . 172)(association_list . 
189)(attribute_reference . 50)(choice_expression . 
174)(choice_relation_and_list . 175)(choice_relation_or_list . 
176)(choice_relation_xor_list . 177)(choice_relation_and_then_list . 
178)(choice_relation_or_else_list . 179)(choice_relation . 180)(discrete_choice 
. 181)(discrete_choice_list . 182)(expression . 183)(expression_opt . 
184)(factor . 152)(name . 185)(primary . 156)(qualified_expression . 53)(range 
. 186)(relati [...]
       nil
-      ((formal_part . 115)(parameter_profile_opt . 954))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 
184)(expression_opt . 957)(factor . 153)(name . 154)(primary . 
157)(qualified_expression . 54)(relation_and_list . 158)(relation_and_then_list 
. 159)(relation_or_list . 160)(relation_or_else_list . 161)(relation_xor_list . 
162)(relation . 163)(selected_component . 55)(simple_expression . 164)(term . 
165)(term_list . 166)(unary_adding_operator . 167))
       nil
-      ((identifier_opt . 953))
-      ((case_statement_alternative . 951)(case_statement_alternative_list . 
952))
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 
634)(handled_sequence_of_statements . 949)(if_statement . 636)(iteration_scheme 
. 637)(label_opt . 638)(loop_statement . 639)(name . 640)(pragma . 
641)(procedure_call_statement . 642)(qualified_expression . 53)(raise_statement 
. 64 [...]
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 638)(if_statement . 
640)(iteration_scheme . 641)(label_opt . 642)(loop_statement . 643)(name . 
644)(pragma . 645)(procedure_call_statement . 646)(qualified_expression . 
54)(raise_statement . 647)(requeue_statement . 648)(selected_c [...]
       nil
       nil
+      ((aggregate . 151)(attribute_reference . 51)(expression . 954)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 
183)(expression_opt . 947)(factor . 152)(name . 153)(primary . 
156)(qualified_expression . 53)(relation_and_list . 157)(relation_and_then_list 
. 158)(relation_or_list . 159)(relation_or_else_list . 160)(relation_xor_list . 
161)(relation . 162)(selected_component . 54)(simple_expression . 163)(term . 
164)(term_list . 165)(unary_adding_operator . 166))
       nil
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 634)(if_statement . 
636)(iteration_scheme . 637)(label_opt . 638)(loop_statement . 639)(name . 
640)(pragma . 641)(procedure_call_statement . 642)(qualified_expression . 
53)(raise_statement . 643)(requeue_statement . 644)(selected_c [...]
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 
638)(handled_sequence_of_statements . 952)(if_statement . 640)(iteration_scheme 
. 641)(label_opt . 642)(loop_statement . 643)(name . 644)(pragma . 
645)(procedure_call_statement . 646)(qualified_expression . 54)(raise_statement 
. 64 [...]
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 944)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
+      ((aliased_opt . 951))
       nil
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 638)(if_statement . 
640)(iteration_scheme . 641)(label_opt . 642)(loop_statement . 643)(name . 
644)(pragma . 645)(procedure_call_statement . 646)(qualified_expression . 
54)(raise_statement . 647)(requeue_statement . 648)(selected_c [...]
       nil
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 
634)(handled_sequence_of_statements . 942)(if_statement . 636)(iteration_scheme 
. 637)(label_opt . 638)(loop_statement . 639)(name . 640)(pragma . 
641)(procedure_call_statement . 642)(qualified_expression . 53)(raise_statement 
. 64 [...]
+      ((accept_statement . 671)(delay_alternative . 672)(delay_statement . 
945)(select_alternative . 947))
       nil
       nil
-      ((aliased_opt . 941))
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 638)(if_statement . 
640)(iteration_scheme . 641)(label_opt . 642)(loop_statement . 643)(name . 
644)(pragma . 645)(procedure_call_statement . 646)(qualified_expression . 
54)(raise_statement . 647)(requeue_statement . 648)(selected_c [...]
+      ((delay_alternative . 944)(delay_statement . 945))
       nil
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 634)(if_statement . 
636)(iteration_scheme . 637)(label_opt . 638)(loop_statement . 639)(name . 
640)(pragma . 641)(procedure_call_statement . 642)(qualified_expression . 
53)(raise_statement . 643)(requeue_statement . 644)(selected_c [...]
       nil
-      ((accept_statement . 667)(delay_alternative . 668)(delay_statement . 
935)(select_alternative . 937))
       nil
       nil
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 634)(if_statement . 
636)(iteration_scheme . 637)(label_opt . 638)(loop_statement . 639)(name . 
640)(pragma . 641)(procedure_call_statement . 642)(qualified_expression . 
53)(raise_statement . 643)(requeue_statement . 644)(selected_c [...]
-      ((delay_alternative . 934)(delay_statement . 935))
       nil
       nil
       nil
+      ((attribute_reference . 51)(exception_choice . 
937)(exception_choice_list . 938)(name . 939)(qualified_expression . 
54)(selected_component . 55))
       nil
+      ((exception_handler . 934))
       nil
       nil
       nil
-      ((attribute_reference . 50)(exception_choice . 
927)(exception_choice_list . 928)(name . 929)(qualified_expression . 
53)(selected_component . 54))
       nil
-      ((exception_handler . 924))
       nil
       nil
+      ((actual_parameter_part . 91))
       nil
       nil
       nil
+      ((accept_statement . 1162)(delay_alternative . 1163)(delay_statement . 
945))
       nil
-      ((actual_parameter_part . 90))
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 638)(if_statement . 
640)(iteration_scheme . 641)(label_opt . 642)(loop_statement . 643)(name . 
644)(pragma . 645)(procedure_call_statement . 646)(qualified_expression . 
54)(raise_statement . 647)(requeue_statement . 648)(selected_c [...]
       nil
       nil
       nil
-      ((accept_statement . 1148)(delay_alternative . 1149)(delay_statement . 
935))
       nil
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 634)(if_statement . 
636)(iteration_scheme . 637)(label_opt . 638)(loop_statement . 639)(name . 
640)(pragma . 641)(procedure_call_statement . 642)(qualified_expression . 
53)(raise_statement . 643)(requeue_statement . 644)(selected_c [...]
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 638)(if_statement . 
640)(iteration_scheme . 641)(label_opt . 642)(loop_statement . 643)(name . 
644)(pragma . 645)(procedure_call_statement . 646)(qualified_expression . 
54)(raise_statement . 647)(requeue_statement . 648)(selected_c [...]
+      ((constant_opt . 1154))
       nil
       nil
       nil
+      ((identifier_opt . 1150))
+      ((elsif_statement_item . 1148)(elsif_statement_list . 1149))
       nil
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 634)(if_statement . 
636)(iteration_scheme . 637)(label_opt . 638)(loop_statement . 639)(name . 
640)(pragma . 641)(procedure_call_statement . 642)(qualified_expression . 
53)(raise_statement . 643)(requeue_statement . 644)(selected_c [...]
-      ((constant_opt . 1140))
       nil
       nil
+      ((aggregate . 151)(attribute_reference . 51)(choice_expression . 
175)(choice_relation_and_list . 176)(choice_relation_or_list . 
177)(choice_relation_xor_list . 178)(choice_relation_and_then_list . 
179)(choice_relation_or_else_list . 180)(choice_relation . 181)(discrete_choice 
. 182)(discrete_choice_list . 1142)(factor . 153)(name . 186)(primary . 
157)(qualified_expression . 54)(range . 187)(selected_component . 
55)(simple_expression . 459)(term . 165)(term_list . 166)(unary_adding_ [...]
       nil
-      ((identifier_opt . 1136))
-      ((elsif_statement_item . 1134)(elsif_statement_list . 1135))
+      ((case_statement_alternative . 1141))
       nil
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(choice_expression . 
174)(choice_relation_and_list . 175)(choice_relation_or_list . 
176)(choice_relation_xor_list . 177)(choice_relation_and_then_list . 
178)(choice_relation_or_else_list . 179)(choice_relation . 180)(discrete_choice 
. 181)(discrete_choice_list . 1128)(factor . 152)(name . 185)(primary . 
156)(qualified_expression . 53)(range . 186)(selected_component . 
54)(simple_expression . 456)(term . 164)(term_list . 165)(unary_adding_ [...]
       nil
-      ((case_statement_alternative . 1127))
       nil
       nil
+      ((function_specification . 16)(procedure_specification . 
32)(subprogram_specification . 1134))
       nil
+      ((aspect_clause . 967)(at_clause . 297)(entry_body . 
968)(enumeration_representation_clause . 304)(function_specification . 
16)(overriding_indicator_opt . 969)(procedure_specification . 
32)(protected_operation_item . 1133)(record_representation_clause . 
328)(subprogram_body . 973)(subprogram_declaration . 974))
       nil
       nil
       nil
-      ((procedure_specification . 31)(subprogram_specification . 1120))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 1131)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
-      ((aspect_clause . 957)(at_clause . 296)(entry_body . 
958)(enumeration_representation_clause . 303)(overriding_indicator_opt . 
959)(procedure_specification . 31)(protected_operation_item . 
1119)(record_representation_clause . 326)(subprogram_body . 
963)(subprogram_declaration . 964))
       nil
       nil
+      ((attribute_reference . 51)(name . 1129)(qualified_expression . 
54)(selected_component . 55))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 1117)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
+      ((actual_parameter_part . 91))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 1127)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
       nil
+      ((formal_part . 116)(parameter_profile_opt . 1125))
       nil
-      ((attribute_reference . 50)(name . 1115)(qualified_expression . 
53)(selected_component . 54))
       nil
-      ((actual_parameter_part . 90))
-      ((aggregate . 150)(attribute_reference . 50)(expression . 1113)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
       nil
       nil
-      ((formal_part . 115)(parameter_profile_opt . 1111))
       nil
       nil
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 1110)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 1124)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 1108)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 1122)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 1106)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 1120)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
-      ((attribute_reference . 50)(name . 1020)(qualified_expression . 
53)(selected_component . 54))
+      ((attribute_reference . 51)(name . 1034)(qualified_expression . 
54)(selected_component . 55))
       nil
       nil
-      ((aspect_specification_opt . 1103))
+      ((aspect_specification_opt . 1117))
       nil
-      ((attribute_reference . 50)(name . 1102)(qualified_expression . 
53)(selected_component . 54))
-      ((attribute_reference . 50)(name . 731)(qualified_expression . 
53)(selected_component . 54)(subtype_indication . 1101))
+      ((attribute_reference . 51)(name . 1116)(qualified_expression . 
54)(selected_component . 55))
+      ((attribute_reference . 51)(name . 737)(qualified_expression . 
54)(selected_component . 55)(subtype_indication . 1115))
       nil
-      ((direct_name . 1100))
+      ((direct_name . 1114))
       nil
       nil
       nil
       nil
-      ((aspect_clause . 996)(at_clause . 296)(component_declaration . 
997)(component_item . 1095)(enumeration_representation_clause . 
303)(identifier_list . 1001)(record_representation_clause . 326)(variant_part . 
1096))
+      ((aspect_clause . 1010)(at_clause . 297)(component_declaration . 
1011)(component_item . 1109)(enumeration_representation_clause . 
304)(identifier_list . 1015)(record_representation_clause . 328)(variant_part . 
1110))
       nil
       nil
       nil
@@ -3983,57 +4034,57 @@
       nil
       nil
       nil
-      ((real_range_specification_opt . 1089))
-      ((real_range_specification_opt . 1088))
+      ((real_range_specification_opt . 1103))
+      ((real_range_specification_opt . 1102))
       nil
       nil
-      ((identifier_opt . 1085))
-      ((abstract_subprogram_declaration . 294)(aspect_clause . 295)(at_clause 
. 296)(body . 297)(body_stub . 298)(declaration . 299)(declarations . 
300)(declarative_part_opt . 1084)(entry_declaration . 
302)(enumeration_representation_clause . 303)(exception_declaration . 
304)(full_type_declaration . 305)(generic_declaration . 
306)(generic_formal_part . 17)(generic_instantiation . 
307)(generic_package_declaration . 19)(generic_renaming_declaration . 
308)(generic_subprogram_declaration . 2 [...]
+      ((identifier_opt . 1099))
+      ((abstract_subprogram_declaration . 295)(aspect_clause . 296)(at_clause 
. 297)(body . 298)(body_stub . 299)(declaration . 300)(declarations . 
301)(declarative_part_opt . 1098)(entry_declaration . 
303)(enumeration_representation_clause . 304)(exception_declaration . 
305)(expression_function_declaration . 306)(full_type_declaration . 
307)(function_specification . 16)(generic_declaration . 
308)(generic_formal_part . 18)(generic_instantiation . 
309)(generic_package_declaration . 20)(ge [...]
       nil
       nil
       nil
-      ((abstract_subprogram_declaration . 294)(aspect_clause . 295)(at_clause 
. 296)(body . 297)(body_stub . 298)(declaration . 299)(declarations . 
300)(declarative_part_opt . 832)(entry_declaration . 
302)(enumeration_representation_clause . 303)(exception_declaration . 
304)(full_type_declaration . 305)(generic_declaration . 
306)(generic_formal_part . 17)(generic_instantiation . 
307)(generic_package_declaration . 19)(generic_renaming_declaration . 
308)(generic_subprogram_declaration . 21 [...]
-      ((actual_parameter_part . 90)(constraint . 1079)(index_constraint . 800))
+      ((abstract_subprogram_declaration . 295)(aspect_clause . 296)(at_clause 
. 297)(body . 298)(body_stub . 299)(declaration . 300)(declarations . 
301)(declarative_part_opt . 838)(entry_declaration . 
303)(enumeration_representation_clause . 304)(exception_declaration . 
305)(expression_function_declaration . 306)(full_type_declaration . 
307)(function_specification . 16)(generic_declaration . 
308)(generic_formal_part . 18)(generic_instantiation . 
309)(generic_package_declaration . 20)(gen [...]
+      ((actual_parameter_part . 91)(constraint . 1093)(index_constraint . 806))
       nil
       nil
       nil
-      ((identifier_opt . 1078))
-      ((abstract_subprogram_declaration . 294)(aspect_clause . 295)(at_clause 
. 296)(body . 297)(body_stub . 298)(declaration . 299)(declarations . 
300)(declarative_part_opt . 1077)(entry_declaration . 
302)(enumeration_representation_clause . 303)(exception_declaration . 
304)(full_type_declaration . 305)(generic_declaration . 
306)(generic_formal_part . 17)(generic_instantiation . 
307)(generic_package_declaration . 19)(generic_renaming_declaration . 
308)(generic_subprogram_declaration . 2 [...]
+      ((identifier_opt . 1092))
+      ((abstract_subprogram_declaration . 295)(aspect_clause . 296)(at_clause 
. 297)(body . 298)(body_stub . 299)(declaration . 300)(declarations . 
301)(declarative_part_opt . 1091)(entry_declaration . 
303)(enumeration_representation_clause . 304)(exception_declaration . 
305)(expression_function_declaration . 306)(full_type_declaration . 
307)(function_specification . 16)(generic_declaration . 
308)(generic_formal_part . 18)(generic_instantiation . 
309)(generic_package_declaration . 20)(ge [...]
       nil
       nil
-      ((abstract_subprogram_declaration . 294)(aspect_clause . 295)(at_clause 
. 296)(body . 297)(body_stub . 298)(declaration . 299)(declarations . 
300)(declarative_part_opt . 824)(entry_declaration . 
302)(enumeration_representation_clause . 303)(exception_declaration . 
304)(full_type_declaration . 305)(generic_declaration . 
306)(generic_formal_part . 17)(generic_instantiation . 
307)(generic_package_declaration . 19)(generic_renaming_declaration . 
308)(generic_subprogram_declaration . 21 [...]
+      ((abstract_subprogram_declaration . 295)(aspect_clause . 296)(at_clause 
. 297)(body . 298)(body_stub . 299)(declaration . 300)(declarations . 
301)(declarative_part_opt . 830)(entry_declaration . 
303)(enumeration_representation_clause . 304)(exception_declaration . 
305)(expression_function_declaration . 306)(full_type_declaration . 
307)(function_specification . 16)(generic_declaration . 
308)(generic_formal_part . 18)(generic_instantiation . 
309)(generic_package_declaration . 20)(gen [...]
       nil
       nil
       nil
       nil
-      ((component_clause . 1070))
-      ((aggregate . 150)(attribute_reference . 50)(expression . 1068)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((actual_parameter_part . 90)(aspect_specification_opt . 1067))
+      ((component_clause . 1084))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 1082)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((actual_parameter_part . 91)(aspect_specification_opt . 1081))
       nil
       nil
-      ((access_definition . 1061)(attribute_reference . 
50)(component_definition . 1064)(name . 731)(null_exclusion_opt . 
211)(qualified_expression . 53)(selected_component . 54)(subtype_indication . 
1063))
+      ((access_definition . 1075)(attribute_reference . 
51)(component_definition . 1078)(name . 737)(null_exclusion_opt . 
212)(qualified_expression . 54)(selected_component . 55)(subtype_indication . 
1077))
       nil
-      ((access_definition . 1061)(attribute_reference . 
50)(component_definition . 1062)(name . 731)(null_exclusion_opt . 
211)(qualified_expression . 53)(selected_component . 54)(subtype_indication . 
1063))
+      ((access_definition . 1075)(attribute_reference . 
51)(component_definition . 1076)(name . 737)(null_exclusion_opt . 
212)(qualified_expression . 54)(selected_component . 55)(subtype_indication . 
1077))
       nil
-      ((actual_parameter_part . 90))
+      ((actual_parameter_part . 91))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(name . 153)(primary . 
285)(qualified_expression . 53)(selected_component . 54))
+      ((aggregate . 151)(attribute_reference . 51)(name . 154)(primary . 
286)(qualified_expression . 54)(selected_component . 55))
       nil
       nil
-      ((attribute_reference . 50)(name . 1056)(qualified_expression . 
53)(selected_component . 54))
+      ((attribute_reference . 51)(name . 1070)(qualified_expression . 
54)(selected_component . 55))
       nil
       nil
       nil
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 1054)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 1068)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
       nil
-      ((actual_parameter_part . 90))
+      ((actual_parameter_part . 91))
       nil
-      ((attribute_reference . 50)(name . 1217)(qualified_expression . 
53)(selected_component . 54))
+      ((attribute_reference . 51)(name . 1231)(qualified_expression . 
54)(selected_component . 55))
       nil
-      ((access_definition . 1215)(attribute_reference . 50)(name . 
731)(null_exclusion_opt . 211)(qualified_expression . 53)(selected_component . 
54)(subtype_indication . 1216))
+      ((access_definition . 1229)(attribute_reference . 51)(name . 
737)(null_exclusion_opt . 212)(qualified_expression . 54)(selected_component . 
55)(subtype_indication . 1230))
       nil
       nil
       nil
@@ -4044,29 +4095,29 @@
       nil
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(selected_component . 
54)(simple_expression . 1211)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(selected_component . 
55)(simple_expression . 1225)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
-      ((attribute_reference . 50)(interface_list . 1210)(name . 
792)(qualified_expression . 53)(selected_component . 54))
+      ((attribute_reference . 51)(interface_list . 1224)(name . 
798)(qualified_expression . 54)(selected_component . 55))
       nil
       nil
-      ((abstract_subprogram_declaration . 294)(aspect_clause . 295)(at_clause 
. 296)(body . 297)(body_stub . 298)(declaration . 299)(declarations . 
300)(declarative_part_opt . 824)(entry_declaration . 
302)(enumeration_representation_clause . 303)(exception_declaration . 
304)(full_type_declaration . 305)(generic_declaration . 
306)(generic_formal_part . 17)(generic_instantiation . 
307)(generic_package_declaration . 19)(generic_renaming_declaration . 
308)(generic_subprogram_declaration . 21 [...]
+      ((abstract_subprogram_declaration . 295)(aspect_clause . 296)(at_clause 
. 297)(body . 298)(body_stub . 299)(declaration . 300)(declarations . 
301)(declarative_part_opt . 830)(entry_declaration . 
303)(enumeration_representation_clause . 304)(exception_declaration . 
305)(expression_function_declaration . 306)(full_type_declaration . 
307)(function_specification . 16)(generic_declaration . 
308)(generic_formal_part . 18)(generic_instantiation . 
309)(generic_package_declaration . 20)(gen [...]
       nil
       nil
       nil
-      ((attribute_reference . 50)(interface_list . 1206)(name . 
792)(qualified_expression . 53)(selected_component . 54))
+      ((attribute_reference . 51)(interface_list . 1220)(name . 
798)(qualified_expression . 54)(selected_component . 55))
       nil
       nil
-      ((abstract_subprogram_declaration . 294)(aspect_clause . 295)(at_clause 
. 296)(body . 297)(body_stub . 298)(declaration . 299)(declarations . 
300)(declarative_part_opt . 832)(entry_declaration . 
302)(enumeration_representation_clause . 303)(exception_declaration . 
304)(full_type_declaration . 305)(generic_declaration . 
306)(generic_formal_part . 17)(generic_instantiation . 
307)(generic_package_declaration . 19)(generic_renaming_declaration . 
308)(generic_subprogram_declaration . 21 [...]
+      ((abstract_subprogram_declaration . 295)(aspect_clause . 296)(at_clause 
. 297)(body . 298)(body_stub . 299)(declaration . 300)(declarations . 
301)(declarative_part_opt . 838)(entry_declaration . 
303)(enumeration_representation_clause . 304)(exception_declaration . 
305)(expression_function_declaration . 306)(full_type_declaration . 
307)(function_specification . 16)(generic_declaration . 
308)(generic_formal_part . 18)(generic_instantiation . 
309)(generic_package_declaration . 20)(gen [...]
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 1202)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(selected_component . 
54)(simple_expression . 1201)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 1216)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(selected_component . 
55)(simple_expression . 1215)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
       nil
-      ((enumeration_literal . 1200))
+      ((enumeration_literal . 1214))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(selected_component . 
54)(simple_expression . 1199)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((access_definition . 1061)(attribute_reference . 
50)(component_definition . 1198)(name . 731)(null_exclusion_opt . 
211)(qualified_expression . 53)(selected_component . 54)(subtype_indication . 
1063))
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(selected_component . 
55)(simple_expression . 1213)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((access_definition . 1075)(attribute_reference . 
51)(component_definition . 1212)(name . 737)(null_exclusion_opt . 
212)(qualified_expression . 54)(selected_component . 55)(subtype_indication . 
1077))
       nil
       nil
       nil
@@ -4074,46 +4125,46 @@
       nil
       nil
       nil
-      ((and_interface_list_opt . 1195))
-      ((actual_parameter_part . 90)(and_interface_list_opt . 1192)(constraint 
. 1193)(constraint_opt . 1194)(index_constraint . 800))
+      ((and_interface_list_opt . 1209))
+      ((actual_parameter_part . 91)(and_interface_list_opt . 1206)(constraint 
. 1207)(constraint_opt . 1208)(index_constraint . 806))
       nil
       nil
       nil
-      ((aspect_specification_opt . 1189))
+      ((aspect_specification_opt . 1203))
       nil
-      ((aspect_specification_opt . 1188))
+      ((aspect_specification_opt . 1202))
       nil
-      ((aspect_specification_opt . 1187))
-      ((aspect_specification_opt . 1186))
+      ((aspect_specification_opt . 1201))
+      ((aspect_specification_opt . 1200))
       nil
       nil
-      ((attribute_reference . 50)(name . 1185)(qualified_expression . 
53)(selected_component . 54))
-      ((actual_parameter_part . 90))
-      ((aggregate . 150)(attribute_reference . 50)(expression . 1184)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
+      ((attribute_reference . 51)(name . 1199)(qualified_expression . 
54)(selected_component . 55))
+      ((actual_parameter_part . 91))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 1198)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
-      ((identifier_opt . 1183))
+      ((identifier_opt . 1197))
       nil
-      ((aspect_specification_opt . 127))
-      ((entry_body_formal_part . 1181)(formal_part . 
115)(parameter_profile_opt . 1182))
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 
634)(handled_sequence_of_statements . 1179)(if_statement . 
636)(iteration_scheme . 637)(label_opt . 638)(loop_statement . 639)(name . 
640)(pragma . 641)(procedure_call_statement . 642)(qualified_expression . 
53)(raise_statement . 6 [...]
+      ((aspect_specification_opt . 128))
+      ((entry_body_formal_part . 1195)(formal_part . 
116)(parameter_profile_opt . 1196))
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 
638)(handled_sequence_of_statements . 1193)(if_statement . 
640)(iteration_scheme . 641)(label_opt . 642)(loop_statement . 643)(name . 
644)(pragma . 645)(procedure_call_statement . 646)(qualified_expression . 
54)(raise_statement . 6 [...]
       nil
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 
634)(handled_sequence_of_statements . 1178)(if_statement . 
636)(iteration_scheme . 637)(label_opt . 638)(loop_statement . 639)(name . 
640)(pragma . 641)(procedure_call_statement . 642)(qualified_expression . 
53)(raise_statement . 6 [...]
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 
638)(handled_sequence_of_statements . 1192)(if_statement . 
640)(iteration_scheme . 641)(label_opt . 642)(loop_statement . 643)(name . 
644)(pragma . 645)(procedure_call_statement . 646)(qualified_expression . 
54)(raise_statement . 6 [...]
       nil
       nil
       nil
       nil
-      ((identifier_opt . 1175))
+      ((identifier_opt . 1189))
       nil
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 634)(if_statement . 
636)(iteration_scheme . 637)(label_opt . 638)(loop_statement . 639)(name . 
640)(pragma . 641)(procedure_call_statement . 642)(qualified_expression . 
53)(raise_statement . 643)(requeue_statement . 644)(selected_c [...]
-      ((aggregate . 150)(attribute_reference . 50)(expression . 
183)(expression_opt . 1173)(factor . 152)(name . 153)(primary . 
156)(qualified_expression . 53)(relation_and_list . 157)(relation_and_then_list 
. 158)(relation_or_list . 159)(relation_or_else_list . 160)(relation_xor_list . 
161)(relation . 162)(selected_component . 54)(simple_expression . 163)(term . 
164)(term_list . 165)(unary_adding_operator . 166))
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 638)(if_statement . 
640)(iteration_scheme . 641)(label_opt . 642)(loop_statement . 643)(name . 
644)(pragma . 645)(procedure_call_statement . 646)(qualified_expression . 
54)(raise_statement . 647)(requeue_statement . 648)(selected_c [...]
+      ((aggregate . 151)(attribute_reference . 51)(expression . 
184)(expression_opt . 1187)(factor . 153)(name . 154)(primary . 
157)(qualified_expression . 54)(relation_and_list . 158)(relation_and_then_list 
. 159)(relation_or_list . 160)(relation_or_else_list . 161)(relation_xor_list . 
162)(relation . 163)(selected_component . 55)(simple_expression . 164)(term . 
165)(term_list . 166)(unary_adding_operator . 167))
       nil
       nil
-      ((elsif_statement_item . 1171))
+      ((elsif_statement_item . 1185))
       nil
       nil
       nil
       nil
-      ((access_definition . 1164)(attribute_reference . 50)(name . 
731)(null_exclusion_opt . 211)(qualified_expression . 
53)(return_subtype_indication . 1165)(selected_component . 
54)(subtype_indication . 1166))
+      ((access_definition . 1178)(attribute_reference . 51)(name . 
737)(null_exclusion_opt . 212)(qualified_expression . 
54)(return_subtype_indication . 1179)(selected_component . 
55)(subtype_indication . 1180))
       nil
       nil
       nil
@@ -4121,12 +4172,12 @@
       nil
       nil
       nil
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 634)(if_statement . 
636)(iteration_scheme . 637)(label_opt . 638)(loop_statement . 639)(name . 
640)(pragma . 641)(procedure_call_statement . 642)(qualified_expression . 
53)(raise_statement . 643)(requeue_statement . 644)(selected_c [...]
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 638)(if_statement . 
640)(iteration_scheme . 641)(label_opt . 642)(loop_statement . 643)(name . 
644)(pragma . 645)(procedure_call_statement . 646)(qualified_expression . 
54)(raise_statement . 647)(requeue_statement . 648)(selected_c [...]
       nil
-      ((identifier_opt . 1157))
-      ((attribute_reference . 50)(exception_choice . 1156)(name . 
929)(qualified_expression . 53)(selected_component . 54))
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 634)(if_statement . 
636)(iteration_scheme . 637)(label_opt . 638)(loop_statement . 639)(name . 
640)(pragma . 641)(procedure_call_statement . 642)(qualified_expression . 
53)(raise_statement . 643)(requeue_statement . 644)(selected_c [...]
-      ((attribute_reference . 50)(exception_choice . 
927)(exception_choice_list . 1154)(name . 929)(qualified_expression . 
53)(selected_component . 54))
+      ((identifier_opt . 1171))
+      ((attribute_reference . 51)(exception_choice . 1170)(name . 
939)(qualified_expression . 54)(selected_component . 55))
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 638)(if_statement . 
640)(iteration_scheme . 641)(label_opt . 642)(loop_statement . 643)(name . 
644)(pragma . 645)(procedure_call_statement . 646)(qualified_expression . 
54)(raise_statement . 647)(requeue_statement . 648)(selected_c [...]
+      ((attribute_reference . 51)(exception_choice . 
937)(exception_choice_list . 1168)(name . 939)(qualified_expression . 
54)(selected_component . 55))
       nil
       nil
       nil
@@ -4142,45 +4193,45 @@
       nil
       nil
       nil
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 634)(if_statement . 
636)(iteration_scheme . 637)(label_opt . 638)(loop_statement . 639)(name . 
640)(pragma . 641)(procedure_call_statement . 642)(qualified_expression . 
53)(raise_statement . 643)(requeue_statement . 644)(selected_c [...]
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 638)(if_statement . 
640)(iteration_scheme . 641)(label_opt . 642)(loop_statement . 643)(name . 
644)(pragma . 645)(procedure_call_statement . 646)(qualified_expression . 
54)(raise_statement . 647)(requeue_statement . 648)(selected_c [...]
       nil
       nil
       nil
       nil
       nil
       nil
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 634)(if_statement . 
636)(iteration_scheme . 637)(label_opt . 638)(loop_statement . 639)(name . 
640)(pragma . 641)(procedure_call_statement . 642)(qualified_expression . 
53)(raise_statement . 643)(requeue_statement . 644)(selected_c [...]
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 638)(if_statement . 
640)(iteration_scheme . 641)(label_opt . 642)(loop_statement . 643)(name . 
644)(pragma . 645)(procedure_call_statement . 646)(qualified_expression . 
54)(raise_statement . 647)(requeue_statement . 648)(selected_c [...]
       nil
       nil
       nil
-      ((identifier_list . 213)(parameter_specification . 
214)(parameter_specification_list . 215))
+      ((identifier_list . 214)(parameter_specification . 
215)(parameter_specification_list . 216))
       nil
       nil
       nil
       nil
-      ((actual_parameter_part . 90))
+      ((actual_parameter_part . 91))
       nil
       nil
       nil
       nil
       nil
-      ((attribute_reference . 50)(interface_list . 1235)(name . 
792)(qualified_expression . 53)(selected_component . 54))
+      ((attribute_reference . 51)(interface_list . 1249)(name . 
798)(qualified_expression . 54)(selected_component . 55))
       nil
       nil
       nil
       nil
-      ((variant_list . 1231)(variant . 1232))
+      ((variant_list . 1245)(variant . 1246))
       nil
-      ((aspect_specification_opt . 1229))
+      ((aspect_specification_opt . 1243))
       nil
       nil
       nil
-      ((real_range_specification_opt . 1226))
-      ((identifier_opt . 1225))
+      ((real_range_specification_opt . 1240))
+      ((identifier_opt . 1239))
       nil
       nil
       nil
-      ((identifier_opt . 1222))
+      ((identifier_opt . 1236))
       nil
       nil
       nil
@@ -4190,50 +4241,50 @@
       nil
       nil
       nil
-      ((actual_parameter_part . 90)(constraint . 1079)(index_constraint . 800))
+      ((actual_parameter_part . 91)(constraint . 1093)(index_constraint . 806))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(selected_component . 
54)(simple_expression . 1282)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((abstract_subprogram_declaration . 294)(aspect_clause . 295)(at_clause 
. 296)(body . 297)(body_stub . 298)(declaration . 299)(declarations . 
300)(declarative_part_opt . 824)(entry_declaration . 
302)(enumeration_representation_clause . 303)(exception_declaration . 
304)(full_type_declaration . 305)(generic_declaration . 
306)(generic_formal_part . 17)(generic_instantiation . 
307)(generic_package_declaration . 19)(generic_renaming_declaration . 
308)(generic_subprogram_declaration . 21 [...]
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(selected_component . 
55)(simple_expression . 1296)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((abstract_subprogram_declaration . 295)(aspect_clause . 296)(at_clause 
. 297)(body . 298)(body_stub . 299)(declaration . 300)(declarations . 
301)(declarative_part_opt . 830)(entry_declaration . 
303)(enumeration_representation_clause . 304)(exception_declaration . 
305)(expression_function_declaration . 306)(full_type_declaration . 
307)(function_specification . 16)(generic_declaration . 
308)(generic_formal_part . 18)(generic_instantiation . 
309)(generic_package_declaration . 20)(gen [...]
       nil
       nil
-      ((abstract_subprogram_declaration . 294)(aspect_clause . 295)(at_clause 
. 296)(body . 297)(body_stub . 298)(declaration . 299)(declarations . 
300)(declarative_part_opt . 832)(entry_declaration . 
302)(enumeration_representation_clause . 303)(exception_declaration . 
304)(full_type_declaration . 305)(generic_declaration . 
306)(generic_formal_part . 17)(generic_instantiation . 
307)(generic_package_declaration . 19)(generic_renaming_declaration . 
308)(generic_subprogram_declaration . 21 [...]
+      ((abstract_subprogram_declaration . 295)(aspect_clause . 296)(at_clause 
. 297)(body . 298)(body_stub . 299)(declaration . 300)(declarations . 
301)(declarative_part_opt . 838)(entry_declaration . 
303)(enumeration_representation_clause . 304)(exception_declaration . 
305)(expression_function_declaration . 306)(full_type_declaration . 
307)(function_specification . 16)(generic_declaration . 
308)(generic_formal_part . 18)(generic_instantiation . 
309)(generic_package_declaration . 20)(gen [...]
       nil
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(selected_component . 
54)(simple_expression . 1279)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
-      ((aggregate . 150)(attribute_reference . 50)(expression . 1278)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(selected_component . 
55)(simple_expression . 1293)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 1292)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
-      ((aggregate . 150)(attribute_reference . 50)(choice_expression . 
174)(choice_relation_and_list . 175)(choice_relation_or_list . 
176)(choice_relation_xor_list . 177)(choice_relation_and_then_list . 
178)(choice_relation_or_else_list . 179)(choice_relation . 180)(discrete_choice 
. 181)(discrete_choice_list . 1276)(factor . 152)(name . 185)(primary . 
156)(qualified_expression . 53)(range . 186)(selected_component . 
54)(simple_expression . 456)(term . 164)(term_list . 165)(unary_adding_ [...]
-      ((variant . 1275))
+      ((aggregate . 151)(attribute_reference . 51)(choice_expression . 
175)(choice_relation_and_list . 176)(choice_relation_or_list . 
177)(choice_relation_xor_list . 178)(choice_relation_and_then_list . 
179)(choice_relation_or_else_list . 180)(choice_relation . 181)(discrete_choice 
. 182)(discrete_choice_list . 1290)(factor . 153)(name . 186)(primary . 
157)(qualified_expression . 54)(range . 187)(selected_component . 
55)(simple_expression . 459)(term . 165)(term_list . 166)(unary_adding_ [...]
+      ((variant . 1289))
       nil
       nil
-      ((record_definition . 1272))
+      ((record_definition . 1286))
       nil
       nil
       nil
       nil
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 
183)(expression_opt . 1271)(factor . 152)(name . 153)(primary . 
156)(qualified_expression . 53)(relation_and_list . 157)(relation_and_then_list 
. 158)(relation_or_list . 159)(relation_or_else_list . 160)(relation_xor_list . 
161)(relation . 162)(selected_component . 54)(simple_expression . 163)(term . 
164)(term_list . 165)(unary_adding_operator . 166))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 
184)(expression_opt . 1285)(factor . 153)(name . 154)(primary . 
157)(qualified_expression . 54)(relation_and_list . 158)(relation_and_then_list 
. 159)(relation_or_list . 160)(relation_or_else_list . 161)(relation_xor_list . 
162)(relation . 163)(selected_component . 55)(simple_expression . 164)(term . 
165)(term_list . 166)(unary_adding_operator . 167))
       nil
-      ((identifier_opt . 1269))
-      ((identifier_opt . 1268))
+      ((identifier_opt . 1283))
+      ((identifier_opt . 1282))
       nil
       nil
       nil
       nil
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 634)(if_statement . 
636)(iteration_scheme . 637)(label_opt . 638)(loop_statement . 639)(name . 
640)(pragma . 641)(procedure_call_statement . 642)(qualified_expression . 
53)(raise_statement . 643)(requeue_statement . 644)(selected_c [...]
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 638)(if_statement . 
640)(iteration_scheme . 641)(label_opt . 642)(loop_statement . 643)(name . 
644)(pragma . 645)(procedure_call_statement . 646)(qualified_expression . 
54)(raise_statement . 647)(requeue_statement . 648)(selected_c [...]
       nil
       nil
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(expression . 1263)(factor . 
152)(name . 153)(primary . 156)(qualified_expression . 53)(relation_and_list . 
157)(relation_and_then_list . 158)(relation_or_list . 
159)(relation_or_else_list . 160)(relation_xor_list . 161)(relation . 
162)(selected_component . 54)(simple_expression . 163)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
+      ((aggregate . 151)(attribute_reference . 51)(expression . 1277)(factor . 
153)(name . 154)(primary . 157)(qualified_expression . 54)(relation_and_list . 
158)(relation_and_then_list . 159)(relation_or_list . 
160)(relation_or_else_list . 161)(relation_xor_list . 162)(relation . 
163)(selected_component . 55)(simple_expression . 164)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
       nil
       nil
       nil
       nil
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 634)(if_statement . 
636)(iteration_scheme . 637)(label_opt . 638)(loop_statement . 639)(name . 
640)(pragma . 641)(procedure_call_statement . 642)(qualified_expression . 
53)(raise_statement . 643)(requeue_statement . 644)(selected_c [...]
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 638)(if_statement . 
640)(iteration_scheme . 641)(label_opt . 642)(loop_statement . 643)(name . 
644)(pragma . 645)(procedure_call_statement . 646)(qualified_expression . 
54)(raise_statement . 647)(requeue_statement . 648)(selected_c [...]
       nil
       nil
       nil
@@ -4246,25 +4297,25 @@
       nil
       nil
       nil
-      ((aspect_specification_opt . 1289))
+      ((aspect_specification_opt . 1303))
       nil
       nil
       nil
       nil
-      ((aspect_specification_opt . 1286))
+      ((aspect_specification_opt . 1300))
       nil
       nil
       nil
       nil
-      ((aggregate . 150)(attribute_reference . 50)(factor . 152)(name . 
153)(primary . 156)(qualified_expression . 53)(selected_component . 
54)(simple_expression . 1303)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
+      ((aggregate . 151)(attribute_reference . 51)(factor . 153)(name . 
154)(primary . 157)(qualified_expression . 54)(selected_component . 
55)(simple_expression . 1317)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
       nil
       nil
-      ((aspect_clause . 996)(at_clause . 296)(component_declaration . 
997)(component_item . 998)(component_list . 
1301)(enumeration_representation_clause . 303)(identifier_list . 
1001)(record_representation_clause . 326)(variant_part . 1002))
+      ((aspect_clause . 1010)(at_clause . 297)(component_declaration . 
1011)(component_item . 1012)(component_list . 
1315)(enumeration_representation_clause . 304)(identifier_list . 
1015)(record_representation_clause . 328)(variant_part . 1016))
       nil
       nil
-      ((abstract_subprogram_declaration . 294)(aspect_clause . 295)(at_clause 
. 296)(body . 297)(body_stub . 298)(declaration . 299)(declarations . 
300)(declarative_part_opt . 1298)(entry_declaration . 
302)(enumeration_representation_clause . 303)(exception_declaration . 
304)(full_type_declaration . 305)(generic_declaration . 
306)(generic_formal_part . 17)(generic_instantiation . 
307)(generic_package_declaration . 19)(generic_renaming_declaration . 
308)(generic_subprogram_declaration . 2 [...]
-      ((aggregate . 150)(attribute_reference . 50)(discrete_subtype_definition 
. 1297)(factor . 152)(name . 865)(primary . 156)(qualified_expression . 
53)(range . 758)(selected_component . 54)(simple_expression . 
759)(subtype_indication . 760)(term . 164)(term_list . 
165)(unary_adding_operator . 166))
+      ((abstract_subprogram_declaration . 295)(aspect_clause . 296)(at_clause 
. 297)(body . 298)(body_stub . 299)(declaration . 300)(declarations . 
301)(declarative_part_opt . 1312)(entry_declaration . 
303)(enumeration_representation_clause . 304)(exception_declaration . 
305)(expression_function_declaration . 306)(full_type_declaration . 
307)(function_specification . 16)(generic_declaration . 
308)(generic_formal_part . 18)(generic_instantiation . 
309)(generic_package_declaration . 20)(ge [...]
+      ((aggregate . 151)(attribute_reference . 51)(discrete_subtype_definition 
. 1311)(factor . 153)(name . 875)(primary . 157)(qualified_expression . 
54)(range . 764)(selected_component . 55)(simple_expression . 
765)(subtype_indication . 766)(term . 165)(term_list . 
166)(unary_adding_operator . 167))
       nil
       nil
       nil
@@ -4274,15 +4325,15 @@
       nil
       nil
       nil
-      ((aspect_clause . 996)(at_clause . 296)(component_declaration . 
997)(component_item . 1095)(enumeration_representation_clause . 
303)(identifier_list . 1001)(record_representation_clause . 326)(variant_part . 
1096))
+      ((aspect_clause . 1010)(at_clause . 297)(component_declaration . 
1011)(component_item . 1109)(enumeration_representation_clause . 
304)(identifier_list . 1015)(record_representation_clause . 328)(variant_part . 
1110))
       nil
       nil
       nil
-      ((accept_statement . 626)(assignment_statement . 
627)(asynchronous_select . 628)(attribute_reference . 50)(block_statement . 
629)(case_statement . 630)(conditional_entry_call . 631)(delay_statement . 
632)(exit_statement . 633)(extended_return_statement . 
634)(handled_sequence_of_statements . 1308)(if_statement . 
636)(iteration_scheme . 637)(label_opt . 638)(loop_statement . 639)(name . 
640)(pragma . 641)(procedure_call_statement . 642)(qualified_expression . 
53)(raise_statement . 6 [...]
-      ((formal_part . 115)(parameter_profile_opt . 1307))
+      ((accept_statement . 630)(assignment_statement . 
631)(asynchronous_select . 632)(attribute_reference . 51)(block_statement . 
633)(case_statement . 634)(conditional_entry_call . 635)(delay_statement . 
636)(exit_statement . 637)(extended_return_statement . 
638)(handled_sequence_of_statements . 1322)(if_statement . 
640)(iteration_scheme . 641)(label_opt . 642)(loop_statement . 643)(name . 
644)(pragma . 645)(procedure_call_statement . 646)(qualified_expression . 
54)(raise_statement . 6 [...]
+      ((formal_part . 116)(parameter_profile_opt . 1321))
       nil
       nil
-      ((identifier_opt . 1310))
+      ((identifier_opt . 1324))
       nil
       nil]))
   "Parser table.")
diff --git a/ada-mode.el b/ada-mode.el
index 52f0fa6..05360e0 100755
--- a/ada-mode.el
+++ b/ada-mode.el
@@ -5,7 +5,7 @@
 ;; Author: Stephen Leake <stephen_leake@member.fsf.org>
 ;; Maintainer: Stephen Leake <stephen_leake@member.fsf.org>
 ;; Keywords FIXME: languages, ada ELPA broken for multiple keywords
-;; Version: 5.1.3
+;; Version: 5.1.4
 ;; package-requires: ((wisi "1.0.4") (cl-lib "0.4") (emacs "24.2"))
 ;; url: http://stephe-leake.org/emacs/ada-mode/emacs-ada-mode.html
 ;;
@@ -167,11 +167,10 @@
 (defun ada-mode-version ()
   "Return Ada mode version."
   (interactive)
-  (let ((version-string "5.1.3"))
+  (let ((version-string "5.1.4"))
     ;; must match:
     ;; ada-mode.texi
     ;; README
-    ;; gpr-mode.el
     ;; Version: above
     (if (called-interactively-p 'interactive)
        (message version-string)
@@ -357,6 +356,7 @@ Values defined by cross reference packages.")
     (define-key map "\C-c\C-q"          'ada-xref-refresh)
     (define-key map "\C-c\C-r"          'ada-show-references)
     (define-key map "\C-c\M-r"          'ada-build-run)
+    (define-key map "\C-c\C-s"   'ada-goto-previous-pos)
     (define-key map "\C-c\C-v"   'ada-build-check)
     (define-key map "\C-c\C-w"          'ada-case-adjust-at-point)
     (define-key map "\C-c\C-x"   'ada-show-overriding)
@@ -403,6 +403,7 @@ Values defined by cross reference packages.")
      ["Show references"               ada-show-references          t]
      ["Show overriding"               ada-show-overriding          t]
      ["Show overridden"               ada-show-overridden          t]
+     ["Goto prev position"            ada-goto-previous-pos        t]
      )
     ("Edit"
      ["Expand skeleton"             ada-expand              t]
@@ -425,6 +426,7 @@ Values defined by cross reference packages.")
      )
     ("Misc"
      ["Show last parse error"         ada-show-parse-error         t]
+     ["Show xref tool buffer"         ada-show-xref-tool-buffer    t]
      ["Refresh cross reference cache" ada-xref-refresh             t]
      ["Reset parser"                  ada-reset-parser             t]
      )))
@@ -686,7 +688,7 @@ Each parameter declaration is represented by a list
       )
 
     (let ((space-before-p (save-excursion (skip-chars-backward " \t") (not 
(bolp))))
-         (space-after-p (save-excursion (skip-chars-forward " \t") (not 
(eolp)))))
+         (space-after-p (save-excursion (skip-chars-forward " \t") (not (or (= 
(char-after) ?\;) (eolp))))))
       (when space-before-p
        ;; paramlist starts on same line as subprogram identifier; clean
        ;; up whitespace. Allow for code on same line as closing paren
@@ -1566,6 +1568,16 @@ Indexed by project variable xref_tool.")
   (interactive)
   (message "current Emacs Ada mode project file: %s" ada-prj-current-file))
 
+(defvar ada-show-xref-tool-buffer nil
+  ;; Supplied by xref tool
+  "Function to show process buffer used by xref tool."
+  )
+
+(defun ada-show-xref-tool-buffer ()
+  (interactive)
+  (when ada-show-xref-tool-buffer
+    (funcall ada-show-xref-tool-buffer)))
+
 ;;;; syntax properties
 
 (defvar ada-mode-syntax-table
@@ -1850,6 +1862,18 @@ previously set by a file navigation command."
        (back-to-indentation))
       (setq ff-function-name nil))))
 
+(defun ada-check-current-project (file-name)
+  "Throw error if FILE-NAME (must be absolute) is not found in
+the current project source directories, or if no project has been
+set."
+  (when (null (car compilation-search-path))
+    (error "no file search path defined; set project file?"))
+
+  (unless (string= file-name
+                  (locate-file (file-name-nondirectory file-name)
+                               compilation-search-path))
+    (error "current file not part of current project; wrong project?")))
+
 (defun ada-find-other-file-noset (other-window)
   "Same as `ada-find-other-file', but preserve point in the other file,
 don't move to corresponding declaration."
@@ -1893,8 +1917,7 @@ the other file."
   ;;                       information
 
   (interactive "P")
-  (when (null (car compilation-search-path))
-    (error "no file search path defined; set project file?"))
+  (ada-check-current-project (buffer-file-name))
 
   (if mark-active
       (progn
@@ -1950,6 +1973,27 @@ identifier.  May be an Ada identifier or operator 
function name."
       (error "No identifier around"))
      )))
 
+(defvar ada-goto-pos-ring '()
+  "List of positions selected by navigation functions. Used
+to go back to these positions.")
+
+(defconst ada-goto-pos-ring-max 16
+  "Number of positions kept in the list `ada-goto-pos-ring'.")
+
+(defun ada-goto-push-pos ()
+  "Push current filename, position on `ada-goto-pos-ring'. See 
`ada-goto-previous-pos'."
+  (setq ada-goto-pos-ring (cons (list (point) (buffer-file-name)) 
ada-goto-pos-ring))
+  (if (> (length ada-goto-pos-ring) ada-goto-pos-ring-max)
+      (setcdr (nthcdr (1- ada-goto-pos-ring-max) ada-goto-pos-ring) nil)))
+
+(defun ada-goto-previous-pos ()
+  "Go to the first position in `ada-goto-pos-ring', pop `ada-goto-pos-ring'."
+  (interactive)
+  (when ada-goto-pos-ring
+    (let ((pos (pop ada-goto-pos-ring)))
+      (find-file (cadr pos))
+      (goto-char (car pos)))))
+
 (defun ada-goto-source (file line column other-window)
   "Find and select FILE, at LINE and COLUMN.
 FILE may be absolute, or on `compilation-search-path'.
@@ -1963,6 +2007,8 @@ If OTHER-WINDOW is non-nil, show the buffer in another 
window."
       (error "File %s not found; installed library, or set project?" file))
     )
 
+  (ada-goto-push-pos)
+
   (let ((buffer (get-file-buffer file)))
     (cond
      ((bufferp buffer)
@@ -2027,6 +2073,7 @@ If at the declaration, go to the body, and vice versa.
 If OTHER-WINDOW (set by interactive prefix) is non-nil, show the
 buffer in another window."
   (interactive "P")
+  (ada-check-current-project (buffer-file-name))
 
   (when (null ada-xref-other-function)
     (error "no cross reference information available"))
@@ -2058,6 +2105,8 @@ Displays a buffer in compilation-mode giving locations of 
the parent type declar
 (defun ada-show-declaration-parents ()
   "Display the locations of the parent type declarations of the type 
identifier around point."
   (interactive)
+  (ada-check-current-project (buffer-file-name))
+
   (when (null ada-xref-parent-function)
     (error "no cross reference information available"))
 
@@ -2082,6 +2131,7 @@ identifier is declared or referenced.")
 (defun ada-show-references ()
   "Show all references of identifier at point."
   (interactive)
+  (ada-check-current-project (buffer-file-name))
 
   (when (null ada-xref-all-function)
     (error "no cross reference information available"))
@@ -2106,6 +2156,7 @@ Displays a buffer in compilation-mode giving locations of 
the overriding declara
 (defun ada-show-overriding ()
   "Show all overridings of identifier at point."
   (interactive)
+  (ada-check-current-project (buffer-file-name))
 
   (when (null ada-xref-overriding-function)
     (error "no cross reference information available"))
@@ -2131,6 +2182,7 @@ Returns a list '(file line column) giving the 
corresponding location.
 (defun ada-show-overridden (other-window)
   "Show the overridden declaration of identifier at point."
   (interactive "P")
+  (ada-check-current-project (buffer-file-name))
 
   (when (null ada-xref-overridden-function)
     (error "'show overridden' not supported, or no cross reference information 
available"))
@@ -2225,15 +2277,27 @@ buffer in another window."
   ;;
   ;; This is run from ff-pre-load-hook, so ff-function-name may have
   ;; been set by ff-treat-special; don't reset it.
-  "Function to move point to start of the generic, package,
-protected, subprogram, or task declaration point is currently in
-or just after.  Called with no parameters.")
+  "For `beginning-of-defun-function'. Function to move point to
+start of the generic, package, protected, subprogram, or task
+declaration point is currently in or just after.  Called with no
+parameters.")
 
 (defun ada-goto-declaration-start ()
   "Call `ada-goto-declaration-start'."
   (when ada-goto-declaration-start
     (funcall ada-goto-declaration-start)))
 
+(defvar ada-goto-declaration-end nil
+  ;; supplied by indentation engine
+  "For `end-of-defun-function'. Function to move point to end of
+current declaration.")
+
+(defun ada-goto-declaration-end ()
+  "See `ada-goto-declaration-end' variable."
+  (interactive)
+  (when ada-goto-declaration-end
+    (funcall ada-goto-declaration-end)))
+
 (defvar ada-goto-declarative-region-start nil
   ;; Supplied by indentation engine
   "Function to move point to start of the declarative region of
@@ -2635,6 +2699,7 @@ The paragraph is indented on the first line."
        'ada-other-file-alist)
   (setq ff-post-load-hook    'ada-set-point-accordingly
        ff-file-created-hook 'ada-ff-create-body)
+  (add-hook 'ff-pre-load-hook 'ada-goto-push-pos)
   (add-hook 'ff-pre-load-hook 'ada-which-function)
   (setq ff-search-directories 'compilation-search-path)
   (when (null (car compilation-search-path))
@@ -2714,6 +2779,12 @@ The paragraph is indented on the first line."
                  ada-95-keywords
                  ada-2005-keywords
                  ada-2012-keywords))))
+
+  (when ada-goto-declaration-start
+    (set (make-local-variable 'beginning-of-defun-function) 
ada-goto-declaration-start))
+
+  (when ada-goto-declaration-end
+    (set (make-local-variable 'end-of-defun-function) 
ada-goto-declaration-end))
   )
 
 (put 'ada-mode 'custom-mode-group 'ada)
diff --git a/ada-mode.info b/ada-mode.info
index 91db9d0..018ba66 100644
--- a/ada-mode.info
+++ b/ada-mode.info
@@ -94,7 +94,8 @@ File: ada-mode.info,  Node: Installation,  Next: 
Customization,  Prev: Overview,
 2 Installation
 **************
 
-Ada mode requires Emacs 24.2 or greater.
+Ada mode requires Emacs 24.2 or greater; it also requires the Emacs lisp
+sources (not just the compiled binaries).
 
    Ada mode is distributed in the Gnu ELPA package archive; it can be
 installed via 'M-x list-packages' (*note (emacs)Packages::).  You must
@@ -2414,44 +2415,44 @@ Tag Table:
 Node: Top945
 Node: Overview2576
 Node: Installation3787
-Node: gnatinspect4601
-Node: Upgrading5562
-Node: Customization6136
-Node: Non-standard file names6618
-Node: Other compiler8459
-Node: Other cross-reference9038
-Node: Other customization9757
-Node: Compiling Executing12227
-Node: Compile commands12962
-Node: Compiling Examples15700
-Node: No project files16532
-Node: Set compiler options21898
-Node: Set source search path23860
-Node: Use GNAT project file26313
-Node: Use multiple GNAT project files29087
-Node: Use a Makefile31807
-Node: Compiler errors33122
-Node: Project files33939
-Node: Project file overview34966
-Node: Project file variables36494
-Node: Moving Through Ada Code40124
-Node: Identifier completion42823
-Node: Indentation43785
-Node: Statement skeletons47837
-Node: Aligning code49622
-Node: Automatic casing50567
-Node: Comment Handling53271
-Node: Key summary53790
-Node: Developer overview56417
-Node: Directory structure56757
-Node: Package organization60243
-Node: Ada mode60478
-Node: gpr mode62674
-Node: GNAT core62957
-Node: Wisi63903
-Node: OpenToken64870
-Node: ELPA65472
-Node: GNU Free Documentation License66082
-Node: Index91243
+Node: gnatinspect4675
+Node: Upgrading5636
+Node: Customization6210
+Node: Non-standard file names6692
+Node: Other compiler8533
+Node: Other cross-reference9112
+Node: Other customization9831
+Node: Compiling Executing12301
+Node: Compile commands13036
+Node: Compiling Examples15774
+Node: No project files16606
+Node: Set compiler options21972
+Node: Set source search path23934
+Node: Use GNAT project file26387
+Node: Use multiple GNAT project files29161
+Node: Use a Makefile31881
+Node: Compiler errors33196
+Node: Project files34013
+Node: Project file overview35040
+Node: Project file variables36568
+Node: Moving Through Ada Code40198
+Node: Identifier completion42897
+Node: Indentation43859
+Node: Statement skeletons47911
+Node: Aligning code49696
+Node: Automatic casing50641
+Node: Comment Handling53345
+Node: Key summary53864
+Node: Developer overview56491
+Node: Directory structure56831
+Node: Package organization60317
+Node: Ada mode60552
+Node: gpr mode62748
+Node: GNAT core63031
+Node: Wisi63977
+Node: OpenToken64944
+Node: ELPA65546
+Node: GNU Free Documentation License66156
+Node: Index91317
 
 End Tag Table
diff --git a/ada-wisi.el b/ada-wisi.el
index bb57492..c5ce9c2 100755
--- a/ada-wisi.el
+++ b/ada-wisi.el
@@ -297,7 +297,7 @@ point must be on CACHE. PREV-TOKEN is the token before the 
one being indented."
 
        (name
         (cl-case (wisi-cache-nonterm cache)
-          ((procedure_specification subprogram_specification)
+          ((function_specification procedure_specification)
            ;; test/ada_mode-nominal.ads
            ;; not
            ;; overriding
@@ -1076,7 +1076,7 @@ cached token, return new indentation for point."
     ))
 
 (defun ada-wisi-comment ()
-  "Compute indentation of a comment. For `wisi-indent-functions'."
+  "Compute indentation of a comment. For `wisi-indent-calculate-functions'."
   ;; We know we are at the first token on a line. We check for comment
   ;; syntax, not comment-start, to accomodate gnatprep, skeleton
   ;; placeholders, etc.
@@ -1191,6 +1191,10 @@ Also return cache at start."
        )
     cache))
 
+(defun ada-wisi-goto-declaration-end ()
+  "For `ada-goto-declaration-end', which see."
+  (wisi-goto-end-1 (ada-wisi-goto-declaration-start)))
+
 (defun ada-wisi-goto-declarative-region-start ()
   "For `ada-goto-declarative-region-start', which see."
   (wisi-validate-cache (point))
@@ -1521,6 +1525,7 @@ Also return cache at start."
 
 (setq ada-fix-context-clause 'ada-wisi-context-clause)
 (setq ada-goto-declaration-start 'ada-wisi-goto-declaration-start)
+(setq ada-goto-declaration-end 'ada-wisi-goto-declaration-end)
 (setq ada-goto-declarative-region-start 
'ada-wisi-goto-declarative-region-start)
 (setq ada-goto-end 'wisi-goto-end)
 (setq ada-in-paramlist-p 'ada-wisi-in-paramlist-p)
diff --git a/gnat-core.el b/gnat-core.el
index 38dd80e..2637c89 100755
--- a/gnat-core.el
+++ b/gnat-core.el
@@ -155,8 +155,9 @@ Uses 'gnat list'. Returns new '(src-dirs prj-dirs)."
   (let ((src-dirs (ada-prj-get 'src_dir project))
        (prj-dirs (ada-prj-get 'prj_dir project)))
 
-    ;; FIXME: use a dispatching function instead, to avoid "require" here,
-    ;; which gives "warning: function not known".
+    ;; FIXME: use a dispatching function instead, with autoload, to
+    ;; avoid "require" here, which gives "warning: function not
+    ;; known".
     ;; Using 'require' at top level gives the wrong default ada-xref-tool
     (cl-ecase (ada-prj-get 'xref_tool project)
       ((gnat gnat_inspect)
@@ -224,6 +225,10 @@ src_dir will include compiler runtime."
        )
       buffer)))
 
+(defun ada-gnat-show-run-buffer ()
+  (interactive)
+  (pop-to-buffer (gnat-run-buffer)))
+
 (defun gnat-run (exec command &optional err-msg expected-status)
   "Run a gnat command line tool, as \"EXEC COMMAND\".
 EXEC must be an executable found on `exec-path'.
@@ -411,9 +416,6 @@ list."
     (save-some-buffers t)
     (add-to-list 'opts "-f")
     (with-current-buffer (gnat-run-buffer)
-      ;; FIXME: gnat-run-buffer requires a project, but we don't
-      ;; actually need one. Just use a temp buffer. Same for other
-      ;; uses of gnat-run-no-prj.
       (gnat-run-no-prj
        (append (list "stub") opts (list start-file "-cargs") switches)
        (file-name-directory body-file-name))
diff --git a/gnat-inspect.el b/gnat-inspect.el
index a5d2cda..b55b2cd 100755
--- a/gnat-inspect.el
+++ b/gnat-inspect.el
@@ -103,12 +103,19 @@
              (cl-acons ada-prj-current-file session gnat-inspect--sessions))))
     ))
 
+(defun gnat-inspect-show-session-buffer ()
+  (interactive)
+  (pop-to-buffer (gnat-inspect-cached-session)))
+
 (defconst gnat-inspect-prompt "^>>> $"
   ;; gnatinspect output ends with this
   "Regexp matching gnatinspect prompt; indicates previous command is 
complete.")
 
 (defun gnat-inspect-session-wait (session)
   "Wait for the current command to complete."
+  (unless (process-live-p (gnat-inspect--session-process session))
+    (error "gnatinspect process failed"))
+
   (with-current-buffer (gnat-inspect--session-buffer session)
     (let ((process (gnat-inspect--session-process session))
          (search-start (point-min))
@@ -341,7 +348,6 @@ set compilation-mode with compilation-error-regexp-alist 
set to COMP-ERR."
 
       (cond
        ((null search-type)
-       (pop-to-buffer (current-buffer))
        (error "gnatinspect did not return other item; refresh?"))
 
        ((and
@@ -354,7 +360,6 @@ set compilation-mode with compilation-error-regexp-alist 
set to COMP-ERR."
        )
 
       (when (null result)
-       (pop-to-buffer (current-buffer))
        (error "gnatinspect did not return other item; refresh?"))
 
       (message "parsing result ... done")
@@ -399,7 +404,6 @@ set compilation-mode with compilation-error-regexp-alist 
set to COMP-ERR."
               (string-to-number (match-string 4)))))
 
       (when (null result)
-       (pop-to-buffer (current-buffer))
        (error "gnatinspect did not return other item; refresh?"))
 
       (message "parsing result ... done")
@@ -504,6 +508,7 @@ Enable mode if ARG is positive"
   (setq ada-xref-all-function        'gnat-inspect-all)
   (setq ada-xref-overriding-function 'gnat-inspect-overriding)
   (setq ada-xref-overridden-function 'gnat-inspect-overridden-1)
+  (setq ada-show-xref-tool-buffer    'gnat-inspect-show-session-buffer)
 
   (add-to-list 'completion-ignored-extensions ".ali") ;; gnat library files, 
used for cross reference
   )
@@ -521,6 +526,7 @@ Enable mode if ARG is positive"
   (setq ada-xref-all-function        nil)
   (setq ada-xref-overriding-function nil)
   (setq ada-xref-overridden-function nil)
+  (setq ada-show-xref-tool-buffer    nil)
 
   (setq completion-ignored-extensions (delete ".ali" 
completion-ignored-extensions))
   )
diff --git a/gpr-mode.el b/gpr-mode.el
index f11e417..cd9ddd6 100755
--- a/gpr-mode.el
+++ b/gpr-mode.el
@@ -242,17 +242,6 @@ of the package or project point is in or just after, or 
nil.")
   (set (make-local-variable 'add-log-current-defun-function)
        'gpr-add-log-current-function)
 
-  ;; used by autofill to break a comment line and continue it on
-  ;; another line. The reason we need this one is that the default
-  ;; behavior does not work correctly with the definition of
-  ;; paragraph-start above when the comment is right after a
-  ;; multi-line subprogram declaration (the comments are aligned under
-  ;; the latest parameter, not under the declaration start).
-  ;; FIXME: need test - should be in gpr-wisi? why doesn't ada-mode do this?
-  (set (make-local-variable 'comment-line-break-function)
-       (lambda (&optional soft) (let ((fill-prefix nil))
-                                 (indent-new-comment-line soft))))
-
   (run-hooks 'gpr-mode-hook)
 
   )
diff --git a/gpr-query.el b/gpr-query.el
index 36cbd33..7fe7c0e 100755
--- a/gpr-query.el
+++ b/gpr-query.el
@@ -61,15 +61,13 @@
   (with-current-buffer (gpr-query--session-buffer session)
     (let ((process-environment (ada-prj-get 'proc_env)) ;; for GPR_PROJECT_PATH
 
-         ;; WORKAROUND: gnatcoll-1.6 can't handle aggregate projects; M910-032
-         ;; gpr_query can handle some aggregate projects, but not all
-         (project-file (file-name-nondirectory
-                        (or (ada-prj-get 'gpr_query_file)
-                            (ada-prj-get 'gpr_file)))))
+         (project-file (file-name-nondirectory (ada-prj-get 'gpr_file))))
       (erase-buffer); delete any previous messages, prompt
       (setf (gpr-query--session-process session)
+           ;; gnatcoll-1.6 can't handle aggregate projects; M910-032
+           ;; gpr_query can handle some aggregate projects, but not all
            ;; FIXME: need good error message on bad project file:
-           ;;          "can't handle aggregate projects? - set gpr_query_file")
+           ;;          "can't handle aggregate projects?")
            (start-process (concat "gpr_query " (buffer-name))
                           (gpr-query--session-buffer session)
                           "gpr_query"
@@ -80,7 +78,6 @@
       ;; check for warnings about invalid directories etc
       (goto-char (point-min))
       (when (search-forward "warning:" nil t)
-       (pop-to-buffer (current-buffer))
        (error "gpr_query warnings"))
       )))
 
@@ -116,6 +113,9 @@
 
 (defun gpr-query-session-wait (session)
   "Wait for the current command to complete."
+  (unless (process-live-p (gpr-query--session-process session))
+    (error "gpr-query process died"))
+
   (with-current-buffer (gpr-query--session-buffer session)
     (let ((process (gpr-query--session-process session))
          (search-start (point-min))
@@ -132,7 +132,6 @@
        (setq wait-count (1+ wait-count)))
       (if (process-live-p process)
          (message (concat "running gpr_query ... done"))
-       (pop-to-buffer (current-buffer))
        (error "gpr_query process died"))
       )))
 
@@ -171,6 +170,11 @@ Return buffer that holds output."
     (message "Killed %d sessions" count)
     ))
 
+(defun gpr-query-show-buffer ()
+  "Show gpr-query buffer for current project."
+  (interactive)
+  (pop-to-buffer (gpr-query--session-buffer (gpr-query-cached-session))))
+
 ;;;;; utils
 
 (defun gpr-query-get-src-dirs (src-dirs)
@@ -363,6 +367,7 @@ buffer in another window."
     ["Find and select project ..."   ada-build-prompt-select-prj-file t]
     ["Select project ..."            ada-prj-select                   t]
     ["Show current project"          ada-prj-show                     t]
+    ["Show gpr-query buffer"         gpr-query-show-buffer            t]
     ["Next compilation error"        next-error                       t]
     ["Show secondary error"          ada-show-secondary-error         t]
     ["Goto declaration/body"         gpr-query-goto-declaration       t]
@@ -490,7 +495,6 @@ Enable mode if ARG is positive"
        )
 
       (when (null result)
-       (pop-to-buffer (current-buffer))
        (error "gpr_query did not return other item; refresh?"))
 
       (message "parsing result ... done")
@@ -529,7 +533,6 @@ Enable mode if ARG is positive"
               (string-to-number (match-string 3)))))
 
       (when (null result)
-       (pop-to-buffer (current-buffer))
        (error "gpr_query did not return a result; refresh?"))
 
       (message "parsing result ... done")
@@ -553,6 +556,7 @@ Enable mode if ARG is positive"
   (setq ada-xref-all-function        'gpr-query-all)
   (setq ada-xref-overriding-function 'gpr-query-overriding)
   (setq ada-xref-overridden-function 'gpr-query-overridden-1)
+  (setq ada-show-xref-tool-buffer    'gpr-query-show-buffer)
 
   (add-to-list 'completion-ignored-extensions ".ali") ;; gnat library files, 
used for cross reference
   )
@@ -570,6 +574,7 @@ Enable mode if ARG is positive"
   (setq ada-xref-all-function        nil)
   (setq ada-xref-overriding-function nil)
   (setq ada-xref-overridden-function nil)
+  (setq ada-show-xref-tool-buffer    nil)
 
   (setq completion-ignored-extensions (delete ".ali" 
completion-ignored-extensions))
   )



reply via email to

[Prev in Thread] Current Thread [Next in Thread]