comp.lang.ada
 help / color / mirror / Atom feed
From: Dale Stanbrough <dale@cs.rmit.edu.au>
Subject: Re: A copy question....
Date: Mon, 15 Oct 2001 11:30:06 GMT
Date: 2001-10-15T11:30:06+00:00	[thread overview]
Message-ID: <dale-7CF46D.21285515102001@mec2.bigpond.net.au> (raw)
In-Reply-To: dale-238AFE.21195615102001@mec2.bigpond.net.au

Dale Stanbrough wrote:

> 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;


Silly me. I didn't check the code. System.Address_To_Access_Conversion
is a generic package, not a package with a generic function.
You'll need to instantiate it as...
  
   package To_Int_Pointers is
      new System.Address_To_Access_Conversion (Int_Pointer);

and then you'll call the To_Pointer function in this package.


Dale



  reply	other threads:[~2001-10-15 11:30 UTC|newest]

Thread overview: 14+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2001-10-15 10:40 A copy question Zebylon
2001-10-15 11:21 ` Dale Stanbrough
2001-10-15 11:30   ` Dale Stanbrough [this message]
2001-10-15 11:59     ` Petter Fryklund
2001-10-15 21:04       ` Dale Stanbrough
2001-10-16  2:34         ` Jeffrey Carter
2001-10-16 11:15           ` Dale Stanbrough
2001-10-15 13:38   ` Ted Dennison
2001-10-15 13:30 ` Mark Doherty
2001-10-15 17:00 ` tmoran
2001-10-16 10:09   ` Mark Doherty
2001-10-17  0:18     ` tmoran
2001-10-17  1:14       ` David Botton
2001-10-16 23:00 ` David Botton
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox