Re: Pragma Import don't suppress access initialization

[Jeffrey Carter <jrcarter@acm.org>]

Matthew Heaney wrote:
> "Fr�d�ric Ormancey" <frederic.ormancey@atosorigin.com> wrote in message
> news:9c9fb8b4.0210070410.fa84429@posting.google.com...
> 
>>   function Analyser_Formule (Varset : in System.ADDRESS)
>>    return Integer is
>>     V : Ty_Varset;
>>     for V use at Varset;
>>     pragma Import (Ada, V);
>>
>>where Ty_Varset is declared in another package :
>>
>>    type Varset(Nature : Character; Taille : Integer);
>>    type Ty_Varset is access Varset;
> 
> What's wrong with System.Address_To_Access_Conversions?
> 
>   V : Object_Pointer := To_Pointer (Varset);

Note that he is not using Varset as an access value as you are 
suggesting; he is using it as the address of an access object. That may 
be his problem, but we can't tell.

-- 
Jeff Carter
"Have you gone berserk? Can't you see that that man is a ni?"
Blazing Saddles