From: Stephen Leake <Stephen.Leake@gsfc.nasa.gov>
Subject: Re: How do I get this to work??
Date: 1999/01/05
Date: 1999-01-05T00:00:00+00:00 [thread overview]
Message-ID: <uiuelbj6r.fsf@gsfc.nasa.gov> (raw)
In-Reply-To: 76tbvv$ba5$1@nntp3.uunet.ca
"Chris Warwick" <chris.warwick@cdcgy.com> writes:
> > package Ada_Front_End is
> >
> > type Session_Type is
> > record
> > Status : integer := 0;
> > end record;
> >
> > type Session_Ptr_Type is access Session_Type;
> >
> > function Close_Port (Session : in Session_Ptr_Type) return integer;
> > end Ada_Front_End;
> >
> > procedure Close_Connection is
> > Session : aliased constant Ada_Front_End.Session_Type;
> > Session_Ptr : Session_Ptr_Type := Session'Access;
>
> It barfs here, because Session_Ptr_Type has greater scope than Session. My
> problem is Close_Port needs a pointer to a Session, so I have to define the
> Session_Ptr_Type at the highest level...
Why does Close_Port need a pointer to a Session? If you are passing
Session to C code, you should probably use 'Address rather than
'access. Or, define Close_Port to take an access parameter:
function Close_Port (Session : access Session_Type);
If you really, really need the interface you've given,
'unchecked_access will eliminate the error message.
We need more info about what you are really doing to really help.
-- Stephe
next prev parent reply other threads:[~1999-01-05 0:00 UTC|newest]
Thread overview: 55+ messages / expand[flat|nested] mbox.gz Atom feed top
1999-01-04 0:00 How do I get this to work?? Chris Warwick
1999-01-05 0:00 ` Tom Moran
1999-01-05 0:00 ` Chris Warwick
1999-01-05 0:00 ` Stephen Leake [this message]
1999-01-05 0:00 ` Tom Moran
1999-01-06 0:00 ` robert_dewar
1999-01-06 0:00 ` Tom Moran
1999-01-07 0:00 ` robert_dewar
1999-01-07 0:00 ` Tom Moran
1999-01-10 0:00 ` robert_dewar
1999-01-06 0:00 ` Tom Moran
1999-01-07 0:00 ` robert_dewar
1999-01-07 0:00 ` Tom Moran
1999-01-10 0:00 ` robert_dewar
1999-01-10 0:00 ` Tom Moran
1999-01-10 0:00 ` robert_dewar
1999-01-10 0:00 ` Tom Moran
1999-01-10 0:00 ` Pat Rogers
1999-01-10 0:00 ` robert_dewar
1999-01-06 0:00 ` Larry Kilgallen
1999-01-06 0:00 ` Tom Moran
1999-01-06 0:00 ` robert_dewar
1999-01-06 0:00 ` Chris Warwick
1999-01-06 0:00 ` Tom Moran
1999-01-07 0:00 ` robert_dewar
1999-01-09 0:00 ` Chris Warwick
1999-01-09 0:00 ` Simon Wright
1999-01-10 0:00 ` robert_dewar
1999-01-11 0:00 ` Simon Wright
1999-01-16 0:00 ` Chris Warwick
1999-01-16 0:00 ` Matthew Heaney
1999-01-16 0:00 ` robert_dewar
1999-01-18 0:00 ` Chris Warwick
1999-01-18 0:00 ` Matthew Heaney
1999-01-18 0:00 ` dennison
1999-01-18 0:00 ` robert_dewar
1999-01-18 0:00 ` Tucker Taft
1999-01-19 0:00 ` Chris Warwick
1999-01-19 0:00 ` robert_dewar
1999-01-20 0:00 ` Jeff Carter
1999-01-20 0:00 ` robert_dewar
1999-01-21 0:00 ` Chris Warwick
1999-01-19 0:00 ` Stephen Leake
1999-01-19 0:00 ` Tom Moran
1999-01-18 0:00 ` dennison
1999-01-16 0:00 ` Simon Wright
1999-01-16 0:00 ` robert_dewar
1999-01-18 0:00 ` Chris Warwick
1999-01-18 0:00 ` Matthew Heaney
1999-01-09 0:00 ` Brian Rogoff
1999-01-10 0:00 ` Matthew Heaney
1999-01-07 0:00 ` Stephen Leake
1999-01-08 0:00 ` Simon Wright
1999-01-06 0:00 ` Simon Wright
1999-01-22 0:00 ` Nick Roberts
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox