7.1:
package_specification::= packagedefining_program_unit_name is
{basic_declarative_item}
[private
{basic_declarative_item}] end [[parent_unit_name.]identifier]
7.2:
package_body::= packagebodydefining_program_unit_name is declarative_part
[begin handled_sequence_of_statements] end [[parent_unit_name.]identifier];
7.3:
private_type_declaration::= typedefining_identifier [discriminant_part] is [[abstract] tagged] [limited] private;
7.3:
private_extension_declaration::= typedefining_identifier [discriminant_part] is
[abstract] newancestor_subtype_indication with private;
9.5.2:
entry_body::= entrydefining_identifier entry_body_formal_part entry_barrier is declarative_part begin handled_sequence_of_statements end [entry_identifier];