Re: Pointer

["Dmitry A. Kazakov" <mailbox@dmitry-kazakov.de>]

On Mon, 19 May 2008 11:53:11 +0200, Dmitry A. Kazakov wrote:

> On Mon, 19 May 2008 09:38:08 +0000, S�bastien wrote:
> 
>> I'm getting from a C interfaces a char**data in a System.Address. I have 
>> the following hypothesis:
>> - data is an array of n elements where n is known
>> - There is no memory issue (meaning data[i] with i < n is allocated)
>> - I do not have to free the memory (memory is managed by the C library)
>> 
>> How can I retrieve all my values in the C arrays using a loop to create 
>> some Ada String (Interfaces.C.Strings.Value)?
> 
> Suggesting, n is returned from the C program:
> 
> with Interfaces.C;  use Interfaces.C;
> with Interfaces.C.Strings;  use Interfaces.C.Strings;
> 
> function Get_It return String is
>    procedure Internal (N : out size_t; Data : out chars_ptr);
>    pragma Import (C, Internal, "<C-name>");
>    Data : chars_ptr;
>    N : size_t;
> begin
>    Internal (Data);

Internal (N, Data);  -- Of course

>    return Value (N, Data);
> end Get_It;


-- 
Regards,
Dmitry A. Kazakov
http://www.dmitry-kazakov.de