Re: Ada to C Interface: Passing Pointers Via System.Address

[tmoran@acm.org]

> struct_ptr : system.address;
>
> struct_ptr := ada_cfunct1(input1, input2);
>
> cfunct2(struct_ptr, input3);
> ...
> at the value of the memory of the struct_ptr after it has gone to ada and
> back to c it says that it is null.  I must not be using the system.address
  Could you please post a small, but complete (ie, compiles, but fails to
run) program?  I'm very confused by the above, not knowing which of the
functions are in Ada, which are imported from C, how is struct_ptr's value
created, what are the declarations of ada_cfunct1 and cfunct2, etc.  I'm
guessing that both ada_cfunct1 and cfunct2 are imported C functions.  How
about putting printout inside ada_cfunct1 just before it returns
struct_ptr, another printout just after the "struct_ptr := ...", and a
third printout at the beginning of cfunct2, showing the value passed in
for struct_ptr.