Re: calling an ada procedure from C++

[tmoran@acm.org]

>  --type Record_Ptr is access Record_T;
> ...
>  function Struct return Record_T is
>     A_Record : Record_T :=(2,4);
>     begin
>        return A_Record;
>     end Struct;
   Why do you have the Record_Ptr declaration commented out?  Did you try
returning a pointer, instead of a record, but it still didn't work?  How
about
   procedure Struct(Result : out Record_T) is
      A_Record : Record_T :=(2,4);
      begin
         Result := A_Record;
      end Struct;
so you are doing things C-style by passing a pointer parameter.