Re: Array access via pointer?

[Ted Dennison <dennison@telepath.com>]

In article <398721AD.CAEE3A51@home.com>,
  Michael Carman <mjcarman@home.com> wrote:

> type Addr_Table is array (Natural range <>) of System.Address;
>
> Arr1 : Addr_Table (0 .. 100);
> Arr2 : Addr_Table (0 .. 20);
>
> procedure Foo (Addr : in System.Address;
>                I    : in Integer) is
> begin
>     -- Do something with index I of the array at Addr
> end Foo;

> fight against the language. So, what's the canonical way of doing
> this in Ada?

That would be:

procedure Foo (Addr : in out Addr_Table;
               I    : in     Integer) is
begin
   -- Do something with index I of the array at Addr
end Foo;

It may be much more constructive for you to tell us why you feel you
need to use addresses and pointers. In Ada you almost *never* have to
use addresses, and rarely have to use pointers. Unless you have an
actual dynamic or linked data structure, or are interfacing to some
external C or OS call, you are probably doing something wrong when you
write code with addresses and/or pointers in it.

--
T.E.D.

http://www.telepath.com/~dennison/Ted/TED.html


Sent via Deja.com http://www.deja.com/
Before you buy.