Object-oriented Software in Ada 95

310 System programming
which when run on an MSDOS system with none of these keys set would print:
Insert mode not set
Caps lock not set
Number lock not set
Note:
21.3 Self-assessment
For this to work, the generated code must be able to access these low locations in DOS.
• Using a representation clause, the following enumeration for Country defines the IDC(International
Dialling Code) for a small selection of countries.
type Country is (USA, France, UK, Australia);
for Country'Size use Integer'Size;
for Country use (USA=> 1, France=> 33,
UK=> 44, Australia=> 61);
What do the following deliver?
(a) Country'Pos( USA )
(b) Country'Val( 2 ).
• How can the IDC of France be extracted from the enumeration for France?
• As Canada has the same IDC as the USA, how can an enumeration for Canada be included in the list
of countries above?
• How can the variable Cost be declared so that its address maps on to the byte at absolute location
040 in programs address space?
21.4 Exercises
Construct the following:
• Memory dump
A program which prints in hexadecimal the contents of the bottom 100 locations of the current program.
© M A Smith - May not be reproduced without permission