Re: Record initialisation question

[Simon Wright <simon@pushface.org>]

Shark8 <onewingedshark@gmail.com> writes:

>> I'll try it but I've just faced another problem where a component of 
>> another record is the address of the record itself. 
>
>     Type Example;
>     Function To_Address( Input : Access Example ) return System.Address
>        with Inline;
>     
>     Type Example is limited record
>         Addr : System.Address := To_Address(Example'Access);
>     End record;
>     
>     Package Cvt is new System.Address_To_Access_Conversions(Example);
>     Function To_Address( Input : Access Example ) return System.Address is
>       ( Cvt.To_Address( Input.all'Access ) );

OP wanted to place the data structures in ROM, the chance of this
working looks pretty remote

(what is it with this weird casing "convention" you use? makes the code
quite hard to read ...)