4. Typen und Datenstrukturen
 
zurück
4.4.4 Attribute


Den einzelnen Typklassen sind Attribute (attribute_reference <BNF>) zugeordnet. Die möglichen Attribute der jeweiligen Typklasse sind in der Beschreibung der einzelnen Typklassen enthalten.
Die Attribute beschreiben typspezifische Eigenschaften der Objekte. Diese können abgefragt und in Zuweisungen, arithmetischen Ausdrücken usw. verwendet werden. Attribute von Typen werden ähnlich gebildet:
durch den Typnamen, gefolgt von einem Apostroph, gefolgt vom Namen des Attributs.

Für ganze Zahlen oder auch Aufzählungstypen gibt es z. B. das Attribut 'First und 'Last zum Erfragen des kleinsten bzw. größten Elementes.

type Monats_Typ is (Jan, Feb, Mär, Apr, Mai, Jun, Jul, Aug, Sep, Okt, Nov, Dez);
Monat : Monats_Typ := Mai;
...
for I in Monats_Typ loop -- zyklisch geschlossene Ausgabe der Monate beginnend mit "Mai"
   Put(Monats_Typ'Image(Monat));
   if Monat = Monats_Typ'Last then
      Monat := Monats_Typ'First;
   else
      Monat := Monats_Typ'Succ(Monat); -- Das Attribut 'Succ ermittelt den Nachfolger eines Elements
   end if;
end loop;

subtype Sommermonats_Typ is Monats_Typ range Jun..Sep;
...
Put(Sommermonats_Typ'Image(Sommermonats_Typ'First): -- gibt hier "Jun" aus
Put(Sommermonats_Typ'Image(Sommermonats_Typ'Last): -- gibt hier "Sep" aus




 
zurück
 Index   Ada Tour - Dokumentation  
© 2003 Förderverein Ada Deutschland e.V.