Re: Aliased

["Steve" <nospam_steved94@comcast.net>]

<nblanpain@hotmail.com> wrote in message 
news:1118851601.345326.86640@g49g2000cwa.googlegroups.com...
> Hello,
>
> I have a probleme with aliased variable :
>
> -- Specification
>
> package Test is
>
> ...
>
> private
>
> type T_Toto is ...;
> type A_Toto is acess all T_Toto;
>
> type T_Test is new T_Object with record
>   Tab : aliased T_Toto;
>   Ptr_Tab : A_Toto;
> end record;
>
> end Test;
>
> -- Body
>
> package body Test is
>
> ...
>
> procedure Initialize is
> begin
>   Ptr_Tab := Tab'Access;  -- illegal instruction
> end Initialize;
>
> ...
>
> end Test;
>
> Where is the problem and is there a solution to it?
>
> Thanks,
>

For a question like this please post the smallest set of sources that 
compile, or give the compilation error such that it may easily be 
reproduced.  Otherwise you are wasting everyones time (including your own).

It is easy to spot a number of possible errors in your sample code, many of 
which are likely just errors in composing your post.  One must "guess" at 
the real source of the problem.

Steve
(The Duck)