Type mapping for reverse engineering Ada - enumeration type (Ada code)
For each enumeration type, the Reverser creates a Type Definition of Enumeration construction. The Pointer property of the Type Definition is set to FALSE, that is, the Pointer check box on the Type Definition's Property Pages is cleared.
For each enumeration literal, the Reverser creates an Enumeration Literal for the owning Type Definition.
The Visibility property of the reverse engineered Type Definition is set according to how the type is declared:
• If the type is declared in the parent Ada package specification, the Visibility property is set to Public.
• If the type is declared in the private region of the parent Ada package specification, the Visibility property is set to protected.
• If the type is declared in the parent package body, the Visibility property is set to Private.
If the type uses the private keyword, the Type Definition is stereotyped by the «Ada Private» stereotype.
If the type uses the limited private keywords, the Type Definition is stereotyped by the «Ada Private» stereotype and the tagged value of the Ada Limited tag definition (applied by the «Ada Private» stereotype) is set to TRUE.