#
# old_revision [7cffc728b47fd25e4caf24686fc4d3a37038a558]
#
# patch "ada-grammar.wy"
#  from [ade544415c2d863a13c59f5ad931cae5d354338b]
#    to [87c600fa38ce95843e46cda5aabc63374af58842]
#
============================================================
--- ada-grammar.wy	ade544415c2d863a13c59f5ad931cae5d354338b
+++ ada-grammar.wy	87c600fa38ce95843e46cda5aabc63374af58842
@@ -1958,8 +1958,8 @@ subprogram_declaration
   ;
 
 subprogram_declaration
-  : overriding_indicator_opt subprogram_specification SEMICOLON
-    (wisi-statement-action 1 'statement-start 2 'block-middle 3 'statement-end)
+  : overriding_indicator_opt subprogram_specification aspect_specification_opt SEMICOLON
+    (wisi-statement-action 1 'statement-start 2 'block-middle 4 'statement-end)
   ;
 
 subprogram_default : name | BOX | NULL ;