4.6 Type Conversions
Explicit type conversions, both value conversions
and view conversions, are allowed between closely related types as defined
below. This clause also defines rules for value and view conversions
to a particular subtype of a type, both explicit ones and those implicit
in other constructs.
Syntax
One type is
convertible
to a second type if a
type_conversion
with the first type as operand type and the second type as target type
is legal according to the rules of this clause. Two types are convertible
if each is convertible to the other.
A
type_conversion
whose operand is the
name
of an object is called a
view conversion if both its target type
and operand type are tagged, or if it appears in a call as an actual
parameter of mode
out or
in out;
other
type_conversions
are called
value conversions.
Name Resolution Rules
The operand of a view conversion is interpreted only
as a
name;
the operand of a value conversion is interpreted as an
expression.
Legality Rules
In a view conversion for an untagged type, the target
type shall be convertible (back) to the operand type.
Paragraphs 9 through
20 were reorganized and moved below.
If
there is a type that is an ancestor of both the target type and the operand
type, or both types are class-wide types, then at least one of the following
rules shall apply:
The target
type shall be untagged; or
The operand type shall be covered by or descended
from the target type; or
The operand type shall be a class-wide type that
covers the target type; or
The operand and target types shall both be class-wide
types and the specific type associated with at least one of them shall
be an interface type.
If there is no type that is the ancestor of both
the target type and the operand type, and they are not both class-wide
types, one of the following rules shall apply:
If the
target type is a numeric type, then the operand type shall be a numeric
type.
If
the target type is an array type, then the operand type shall be an array
type. Further:
The types shall have the same dimensionality;
Corresponding index types shall
be convertible;
The component subtypes shall statically
match;
If the component types are anonymous
access types, then the accessibility level of the operand type shall
not be statically deeper than that of the target type;
Neither the target type nor the
operand type shall be limited;
If the target type of a view conversion
has aliased components, then so shall the operand type; and
The operand type of a view conversion
shall not have a tagged, private, or volatile subcomponent.
If the target type is universal_access,
then the operand type shall be an access type.
If
the target type is a general access-to-object type, then the operand
type shall be
universal_access or an access-to-object type. Further,
if the operand type is not
universal_access:
If the target type is an access-to-variable
type, then the operand type shall be an access-to-variable type;
If the target designated type is
tagged, then the operand designated type shall be convertible to the
target designated type;
If
the target designated type is not tagged, then the designated types shall
be the same, and either:
the designated subtypes shall statically
match; or
the designated type shall be discriminated
in its full view and unconstrained in any partial view, and one of the
designated subtypes shall be unconstrained;
The accessibility
level of the operand type shall not be statically deeper than that of
the target type.
In addition to the places where
Legality Rules normally apply (see
12.3),
this rule applies also in the private part of an instance of a generic
unit.
If the
target type is a pool-specific access-to-object type, then the operand
type shall be
universal_access.
If
the target type is an access-to-subprogram type, then the operand type
shall be
universal_access or an access-to-subprogram type. Further,
if the operand type is not
universal_access:
The designated profiles shall be
subtype-conformant.
The accessibility
level of the operand type shall not be statically deeper than that of
the target type.
In addition to the places where
Legality Rules normally apply (see
12.3),
this rule applies also in the private part of an instance of a generic
unit. If the operand type is declared within a generic body, the target
type shall be declared within the generic body.
Static Semantics
A
type_conversion
that is a value conversion denotes the value that is the result of converting
the value of the operand to the target subtype.
A
type_conversion
that is a view conversion denotes a view of the object denoted by the
operand. This view is a variable of the target type if the operand denotes
a variable; otherwise it is a constant of the target type.
Dynamic Semantics
For
the evaluation of a
type_conversion
that is a value conversion, the operand is evaluated, and then the value
of the operand is
converted to a
corresponding value of
the target type, if any.
If
there is no value of the target type that corresponds to the operand
value, Constraint_Error is raised; this can only happen on conversion
to a modular type, and only when the operand value is outside the base
range of the modular type. Additional rules follow:
If the target and the operand types
are both integer types, then the result is the value of the target type
that corresponds to the same mathematical integer as the operand.
If the target type is a decimal
fixed point type, then the result is truncated (toward 0) if the value
of the operand is not a multiple of the small of the target type.
If the target
type is some other real type, then the result is within the accuracy
of the target type (see
G.2, “
Numeric
Performance Requirements”, for implementations that support
the Numerics Annex).
If the target type is an integer
type and the operand type is real, the result is rounded to the nearest
integer (away from zero if exactly halfway between two integers).
Enumeration
Type Conversion
The result is the value of the target
type with the same position number as that of the operand value.
If
the target subtype is a constrained array subtype, then a check is made
that the length of each dimension of the value of the operand equals
the length of the corresponding dimension of the target subtype. The
bounds of the result are those of the target subtype.
If
the target subtype is an unconstrained array subtype, then the bounds
of the result are obtained by converting each bound of the value of the
operand to the corresponding index type of the target type.
For
each nonnull index range, a check is made that the bounds of the range
belong to the corresponding index subtype.
In either array case, the value
of each component of the result is that of the matching component of
the operand value (see
4.5.2).
If the component types of the array
types are anonymous access types, then a check is made that the accessibility
level of the operand type is not deeper than that of the target type.
Composite
(Non-Array) Type Conversion
The value of each nondiscriminant
component of the result is that of the matching component of the operand
value.
The tag of the result is that of
the operand.
If the operand type
is class-wide, a check is made that the tag of the operand identifies
a (specific) type that is covered by or descended from the target type.
For each discriminant of the target
type that corresponds to a discriminant of the operand type, its value
is that of the corresponding discriminant of the operand value;
if
it corresponds to more than one discriminant of the operand type, a check
is made that all these discriminants are equal in the operand value.
For each discriminant of the target
type that corresponds to a discriminant that is specified by the
derived_type_definition
for some ancestor of the operand type (or if class-wide, some ancestor
of the specific type identified by the tag of the operand), its value
in the result is that specified by the
derived_type_definition.
For
each discriminant of the operand type that corresponds to a discriminant
that is specified by the
derived_type_definition
for some ancestor of the target type, a check is made that in the operand
value it equals the value specified for it.
For
each discriminant of the result, a check is made that its value belongs
to its subtype.
For an access-to-object type, a
check is made that the accessibility level of the operand type is not
deeper than that of the target type.
If the operand value is null, the
result of the conversion is the null value of the target type.
If the operand value is not null,
then the result designates the same object (or subprogram) as is designated
by the operand value, but viewed as being of the target designated subtype
(or profile); any checks associated with evaluating a conversion to the
target designated subtype are performed.
After
conversion of the value to the target type, if the target subtype is
constrained, a check is performed that the value satisfies this constraint.
If the target subtype excludes null, then a check is made that the value
is not null.
For the evaluation of a view
conversion, the operand
name
is evaluated, and a new view of the object denoted by the operand is
created, whose type is the target type;
if
the target type is composite, checks are performed as above for a value
conversion.
The properties of this
new view are as follows:
If the target type is composite, the bounds or
discriminants (if any) of the view are as defined above for a value conversion;
each nondiscriminant component of the view denotes the matching component
of the operand object; the subtype of the view is constrained if either
the target subtype or the operand object is constrained, or if the target
subtype is indefinite, or if the operand type is a descendant of the
target type and has discriminants that were not inherited from the target
type;
If the target type is tagged, then an assignment
to the view assigns to the corresponding part of the object denoted by
the operand; otherwise, an assignment to the view assigns to the object,
after converting the assigned value to the subtype of the object (which
might raise Constraint_Error);
Reading the value of the view yields the result
of converting the value of the operand object to the target subtype (which
might raise Constraint_Error), except if the object is of an access type
and the view conversion is passed as an
out parameter; in this
latter case, the value of the operand object is used to initialize the
formal parameter without checking against any constraint of the target
subtype (see
6.4.1).
If an Accessibility_Check
fails, Program_Error is raised. Any other check associated with a conversion
raises Constraint_Error if it fails.
Conversion to a type is the same as conversion to
an unconstrained subtype of the type.
19
In addition to explicit
type_conversions,
type conversions are performed implicitly in situations where the expected
type and the actual type of a construct differ, as is permitted by the
type resolution rules (see
8.6). For example,
an integer literal is of the type
universal_integer, and is implicitly
converted when assigned to a target of some specific integer type. Similarly,
an actual parameter of a specific tagged type is implicitly converted
when the corresponding formal parameter is of a class-wide type.
Even when
the expected and actual types are the same, implicit subtype conversions
are performed to adjust the array bounds (if any) of an operand to match
the desired target subtype, or to raise Constraint_Error if the (possibly
adjusted) value does not satisfy the constraints of the target subtype.
21 The constraint of the target subtype
has no effect for a
type_conversion
of an elementary type passed as an
out parameter. Hence, it is
recommended that the first subtype be specified as the target to minimize
confusion (a similar recommendation applies to renaming and generic formal
in out objects).
Examples
Examples of numeric
type conversion:
Real(2*J) -- value is converted to floating point
Integer(1.6) -- value is 2
Integer(-0.4) -- value is 0
Example of conversion
between derived types:
type A_Form is new B_Form;
X : A_Form;
Y : B_Form;
X := A_Form(Y);
Y := B_Form(X); -- the reverse conversion
Examples of conversions
between array types:
type Sequence is array (Integer range <>) of Integer;
subtype Dozen is Sequence(1 .. 12);
Ledger : array(1 .. 100) of Integer;
Sequence(Ledger) -- bounds are those of Ledger
Sequence(Ledger(31 .. 42)) -- bounds are 31 and 42
Dozen(Ledger(31 .. 42)) -- bounds are those of Dozen