Re: Hardware Interrupts

[sk <noname@myob.com>]

andrew@carroll-tech.net:

 > procedure getequipment is
 >  type equiplist is array(0..15) of boolean;
 >  package boolean_io is new enumeration_io(boolean);
 >  procedure getlist(list: out equiplist);
 >  for getlist use at reference(16#11#);
 >  mylist: equiplist;
 > begin

I don't know any answers to your questions. What I do
remember about any assembly calls to BIOS interrupts
is that you have to set up the registers with parameters
etc.

You are using GNAT from your examples. Which version
and platform ?

If it is an Intel compiler running in "protected" mode,
that is 32-bit address space etc, the physical address
"16#11# does not corespond to the interrupt 11. Once
32-bit protected mode is entered, the Interrupts are
gated and are typically not at the booting 0 .. 255
address space of an Intel 386 processor boot prior to
entering protected mode.

Another thing to note is that, I believe, the BIOS
is not accessible as regular memory once Intel 32-bit
protected mode is established (I could be wrong on this :-)

If you are still determined to go into never-never land,
you need to look at Ada's machine code insertions. The
code you posted looks potentially fatal to your machine.

So, beyond Gnat telling you the code is non-portable, I
would say it is also, at the least, not what you are
looking for, at worst calling "format disk" which is
a BIOS routine of almost 20 years ago before the
current IDE standards were established.

Sorry, not much help, but I am hoping that you don't
trash your system by being determined to call a
possible inaccessible BIOS.

Simon :-)

-- 
-------------------------------------------------
-- Merge vertically for real address
--
--     s n p @ t . o
--      k i e k c c m
-------------------------------------------------