accept_statement

accept_statement ::= 
      "accept" direct_name [ "(" entry_index ")" ] parameter_profile [ "do" 
      handled_sequence_of_statements 
      "end" [ entry_identifier ] ] ";" 

[rule list]
This rule is called by

-> accept_alternative -> compound_statement