From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00 autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,e51119ce3aa4b2a5
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 1995-03-06 00:13:50 PST
Path: 
 bga.com!news.sprintlink.net!howland.reston.ans.net!gatech!paladin.american.edu!zombie.ncsc.mil!news.mathworks.com!news.alpha.net!uwm.edu!lll-winken.llnl.gov!ames!newsfeed.gsfc.nasa.gov!news!sal714
From: sal714@rs710.gsfc.nasa.gov (Stephen A. Leake)
Newsgroups: comp.lang.ada
Subject: Re: Problem with child package
Date: 03 Mar 1995 18:31:50 GMT
Organization: NASA Goddard Space Flight Center -- Greenbelt, Maryland USA
Message-ID: <SAL714.95Mar3133150@rs710.gsfc.nasa.gov>
References: <3j4e9a$mdj@rc1.vub.ac.be>
NNTP-Posting-Host: rs710.gsfc.nasa.gov
In-reply-to: jydelr@vub.ac.be's message of 2 Mar 1995 12:39:06 GMT
Date: 1995-03-03T18:31:50+00:00
List-Id: <comp.lang.ada>


<discription of carav and voiture packages and child packages>

Remember that there are many scopes in Ada, not just 'local' and
'global. In which package did you declare your 'global' variable? That
package must be visible (via 'with' and possibly 'use') at the point
you want to use the variable.

For example:

package voiture is
	type carav_1 is ...;
end voiture;

package voiture.child is
	type carav is new carav_1 ...;

	global_var : carav;
end voiture.child;

with voiture.child;
procedure access_global_var is
begin
	voiture.child.global_var := ...
end access_global_var;

If your code looks different, post some of it, maybe that will help.

- Stephe
--
Stephen Leake, NASA Goddard Space Flight Center
email: Stephen.Leake@gsfc.nasa.gov