Re: Returning data from Ada to C

[igor.kh@gmail.com]

Ludovic Brenta wrote:
> Ludovic Brenta writes:
> > procedure Hello_World (I : in out Integer;
> >                        A_Ptr : out C_IntArrs.Pointer) is
> >    type Array_Access is access C_Integer_Arrays.C_Integer_Array;
> >    Result : Array_Access := new C_Integer_Arrays.C_Integer_Array'
> >           (0 => 3, 1 => 2, 2 => 1);
> > begin
> >    return Result (Result'First)'Access;
>      -- the above is wrong!
>      A_Ptr := Result (Result'First)'Access; -- correct
> > end Hello_World;
>
> obviously.

I had to use Unchecked_Access instead of Access (gnat complained
"non-local pointer cannot point to local object"), but it worked!

Thanks, everyone, for your help.

Igor