Re: Access Type

[Simon Wright <simon@pushface.org>]

kug1977 <kug1977@web.de> writes:

> I will pass this to Openfirmware which is like a 32-bit C. So I use
>
>      type Ci_Args is record
>          Service         : t_OFW_Service_Name_Access;
>          ...
>       end record;
>       pragma Convention (C, Ci_Args); -- represent CI_Args as a C-
> style struct
>
>       Arg   : Ci_Args;
>
> I hope this will prevent the compiler from using something else than a
> 32-bit Address
> for the Service entry.

I think you should also add

   pragma Convention (C, t_OFW_Service_Name_Access);