object_declaration

object_declaration ::= 
      ( defining_identifier_list ":" [ "aliased" ] [ "constant" ] 
      subtype_indication [ ":=" expression ] ";" ) 
      | ( defining_identifier_list ":" [ "aliased" ] [ "constant" ] 
      array_type_definition [ ":=" expression ] ";" ) 
      | single_task_declaration 
      | single_protected_declaration 

This rule is called by

-> basic_declaration