2 lines
189 B
Ada
2 lines
189 B
Ada
type Response is (Yes, No); -- Definition of an enumeration type with two values
|
|
for Response'Size use 1; -- Setting the size of Response to 1 bit, rather than the default single byte size
|