3 lines
188 B
Ada
3 lines
188 B
Ada
|
type Fruit is (apple, banana, cherry); -- No specification of the representation value;
|
||
|
|
for Fruit use (apple => 1, banana => 2, cherry => 4); -- specification of the representation values
|