Re: Low Level Ada

[tmoran@acm.org]

> For instance, let's say I want to create an Array that would hold characters
> with the goal to send it to the video card directly (address $B800).
   You can use an address clause to put an object (eg an array) anywhere
and then just do normal assignment operations.  So if you declare
  type Display_Strings is array(Integer range <>) of Char_Attribute_Pairs;
  Screen : Display_Strings(1 .. 24*80);
  for Screen'address use 16#B800#;
you can
  Screen(1) := ('a',Blinking);
or
  Screen(Start .. Start+Last-1) := Work_Buffer(1 .. Last);
Note of course that if you are running on a Windows machine 16#B800# is
a virtual memory address, not a hardware one.  In that case you would need:
  Video_Memory_Address: constant System.Address := Beg_Of_Windows(16#B800);
  for Screen'address use Video_Memory_Address;