7.1 Package Specifications and Declarations
Syntax
Legality Rules
To be honest: {
AI05-0229-1}
If an implementation supports it, the body of a package or generic package
may be imported (using aspect Import, see
B.1),
in which case no explicit body is allowed.
Static Semantics
Ramification: This definition of visible
part does not apply to generic formal packages —
12.7
defines the visible part of a generic formal package.
The implicit empty private part is important
because certain implicit declarations occur there if the package is a
child package, and it defines types in its visible part that are derived
from, or contain as components, private types declared within the parent
package. These implicit declarations are visible in children of the child
package. See
10.1.1.
[An entity declared in the private part of a package
is visible only within the declarative region of the package itself (including
any child units — see
10.1.1). In
contrast, expanded names denoting entities declared in the visible part
can be used even outside the package; furthermore, direct visibility
of such entities can be achieved by means of
use_clauses
(see
4.1.3 and
8.4).]
Dynamic Semantics
1 The visible part of a package contains
all the information that another program unit is able to know about the
package.
2 If a declaration occurs immediately within
the specification of a package, and the declaration has a corresponding
completion that is a body, then that body has to occur immediately within
the body of the package.
Proof: This follows from the fact that
the declaration and completion are required to occur immediately within
the same declarative region, and the fact that
bodies
are disallowed (by the Syntax Rules) in
package_specifications.
This does not apply to instances of generic units, whose bodies can occur
in
package_specifications.
Examples
Example of a package
declaration:
package Rational_Numbers is
type Rational is
record
Numerator : Integer;
Denominator : Positive;
end record;
function "="(X,Y : Rational) return Boolean;
function "/" (X,Y : Integer) return Rational; -- to construct a rational number
function "+" (X,Y : Rational) return Rational;
function "-" (X,Y : Rational) return Rational;
function "*" (X,Y : Rational) return Rational;
function "/" (X,Y : Rational) return Rational;
end Rational_Numbers;
There are also many examples of package declarations
in the predefined language environment (see
Annex
A).
Incompatibilities With Ada 83
In Ada 83, a library package
is allowed to have a body even if it doesn't need one. In Ada 95, a library
package body is either required or forbidden — never optional.
The workaround is to add
pragma Elaborate_Body, or something else
requiring a body, to each library package that has a body that isn't
otherwise required.
Wording Changes from Ada 83
{
AI05-0299-1}
We have moved the syntax into this subclause and the next subclause from
RM83-7.1, “Package Structure”, which we have removed.
RM83 was unclear on the rules about when a package
requires a body. For example, RM83-7.1(4) and RM83-7.1(8) clearly forgot
about the case of an incomplete type declared in a
package_declaration
but completed in the body. In addition, RM83 forgot to make this rule
apply to a generic package. We have corrected these rules. Finally, since
we now allow a
pragma
Import for any explicit declaration, the completion rules need to take
this into account as well.
Wording Changes from Ada 95
{
AI95-00420-01}
Defined “declaration list” to avoid ambiguity in other rules
as to whether packages are included.
Extensions to Ada 2005
Ada 2005 and 2012 Editions sponsored in part by Ada-Europe