About Derived Types and SubTypes |
Derived types and subtypes are given an entity kind that corresponds to the entity kind of the root type. For example:
type color is (red, orange, yellow, green, blue, violet); type rainbow_color is new color; type paint_color is new rainbow_color;
The kind for all three types will be Ada Enumeration.
Scientific Toolworks, Inc. http://www.scitools.com |