Re: A copy question....

[Dale Stanbrough <dale@cs.rmit.edu.au>]

In article <9qedad$i1p$1@newstoo.ericsson.se>,
 "Zebylon" <sebastian.madunic@esavionics.se> wrote:

> If you have an system.address variable, an data length variable and an array
> of Unsigned_32. How can you move the data ranging between the address and
> the address+data_length into the array?
> 
> I.G.
> 
> Address               : System.address      := 0x0200_0000;
> Data_Length       : Natural                       := 200; --bytes
> Array                   : array range (integer 0..375) of Unsigned_32;
> 
> Is there some smart way of placing the data in the array...?


Convert the address to an access type using an instantiation of the 
generic

   System.Address_To_Access_Conversions.To_Pointer

and then dereference the pointer generated by the function...

   function Address_To_Int_Pointer is new
      To_Pointer (Int_Pointer);

...
   for i in Array'range loop
      Array (i) := Address_To_Int_Pointer (Address).all;
      Address := Address + Unsigned_32'Size/8;
      -- i think there is a constant somewhere i should use instead of 8
   end loop;

note that the "+" operator is from System.Storage_Elements

Alternatively you could dive into either the OS API, which could well 
have a block move instruction (realloc?), or call any relavent assembler 
instruction.

Dale