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.3 required=5.0 tests=BAYES_00,INVALID_MSGID,XPRIO
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,3e960bf7341df1d2,start
X-Google-Attributes: gid103376,public
From: "Riyaz Mansoor" <s800032@student.uq.edu.au>
Subject: parameter passing
Date: 2000/02/17
Message-ID: <88gqg5$4a8$1@bunyip.cc.uq.edu.au>#1/1
X-Deja-AN: 586900187
X-Priority: 3
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2314.1300
X-Complaints-To: news@uq.edu.au
X-Trace: bunyip.cc.uq.edu.au 950791493 4424 172.20.69.157 (17 Feb 2000
 12:44:53 GMT)
Organization: University of Queensland
X-MSMail-Priority: Normal
NNTP-Posting-Date: 17 Feb 2000 12:44:53 GMT
Newsgroups: comp.lang.ada
Date: 2000-02-17T12:44:53+00:00
List-Id: <comp.lang.ada>



i want to pass a generic package as a parameter to another genric package.

eg:

with gen1_pack;
with gen2_pack;

procedure main is
    package gen1 is new gen1_pack;
    --how do i declare the gen2_pack with gen1 as a parameter?
begin
end;

also how would the code look like in gen2_pack which actually accepts the
gen1 package as a generic "paramter" ?

thanks


----------------------------------------------------