4.6 Type Conversions
1
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
2
3
4
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.
5/2
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
6
7
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
8/2
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.
21/2
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:
21.1/2
- The
target type shall be untagged; or
22
- The operand type shall be covered
by or descended from the target type; or
23/2
- The operand type shall be a class-wide
type that covers the target type; or
23.1/2
- 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.
24/2
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:
24.1/2
- If
the target type is a numeric type, then the operand type shall be a numeric
type.
24.2/2
- If
the target type is an array type, then the operand type shall be an array
type. Further:
24.3/2
- The types shall have the same
dimensionality;
24.4/2
- Corresponding index types shall
be convertible;
24.5/2
- The component subtypes shall
statically match;
24.6/2
- 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;
24.7/2
- Neither the target type nor
the operand type shall be limited;
24.8/2
- If the target type of a view
conversion has aliased components, then so shall the operand type; and
24.9/2
- The operand type of a view conversion
shall not have a tagged, private, or volatile subcomponent.
24.10/2
- If the target type is universal_access,
then the operand type shall be an access type.
24.11/2
- 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:
24.12/2
- If the target type is an access-to-variable
type, then the operand type shall be an access-to-variable type;
24.13/2
- If the target designated type
is tagged, then the operand designated type shall be convertible to the
target designated type;
24.14/2
- If
the target designated type is not tagged, then the designated types shall
be the same, and either:
24.15/2
- the designated subtypes shall
statically match; or
24.16/2
- 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;
24.17/2
- 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.
24.18/2
- If
the target type is a pool-specific access-to-object type, then the operand
type shall be universal_access.
24.19/2
- 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:
24.20/2
- The designated profiles shall
be subtype-conformant.
24.21/2
- 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
25
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.
26
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.
27
Dynamic Semantics
28
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:
29
30
- 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.
31
- 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.
32
- 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).
33
- 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).
34
- Enumeration
Type Conversion
35
- The result is the value of the
target type with the same position number as that of the operand value.
36
37
- 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.
38
- 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.
39
- 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).
39.1/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.
40
- Composite
(Non-Array) Type Conversion
41
- The value of each nondiscriminant
component of the result is that of the matching component of the operand
value.
42
- 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.
43
- 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.
44
- 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.
45
- 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.
46
- For
each discriminant of the result, a check is made that its value belongs
to its subtype.
47
48
- 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.
49/2
- If the operand value is null,
the result of the conversion is the null value of the target type.
50
- 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.
51/2
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.
52
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.
53
The properties of this
new view are as follows:
54/1
- 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;
55
- 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);
56
- 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).
57
If an Accessibility_Check
fails, Program_Error is raised. Any other check associated with a conversion
raises Constraint_Error if it fails.
58
Conversion to a type is the same as conversion to
an unconstrained subtype of the type.
59
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.
60
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.
61/2
62
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
63
Examples of numeric
type conversion:
64
Real(2*J) -- value is converted to floating point
Integer(1.6) -- value is 2
Integer(-0.4) -- value is 0
65
Example of conversion
between derived types:
66
type A_Form is new B_Form;
67
X : A_Form;
Y : B_Form;
68
X := A_Form(Y);
Y := B_Form(X); -- the reverse conversion
69
Examples of conversions
between array types:
70
type Sequence is array (Integer range <>) of Integer;
subtype Dozen is Sequence(1 .. 12);
Ledger : array(1 .. 100) of Integer;
71
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