Re: Ada Address = C pointer ?

[tmoran@acm.org]

> For example, the C function is returning an array of unsigned long.  I
> want to access that array without copying it.

  type UL is array(1 .. 100) of Unsigned_Long;
  type P_UL is access all UL;
  function Cfunc(c : in character) return P_UL;
  pragma (C, Cfunc);
  P : P_UL;
  ...
  Ada.Text_IO.Put_Line(Unsigned_Long'image(Cfunc('a').all(99)));
  P := Cfunc('b');
  Ada.Text_IO.Put_Line(Unsigned_Long'image(P.all(98)));