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,FREEMAIL_FROM
	autolearn=ham autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,60e2922351e0e780
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2003-11-03 08:30:24 PST
Path: 
 archiver1.google.com!news2.google.com!news.maxwell.syr.edu!news.he.net!newsfeed1.easynews.com!easynews.com!easynews!small1.nntp.aus1.giganews.com!border1.nntp.aus1.giganews.com!intern1.nntp.aus1.giganews.com!nntp.giganews.com!nntp.comcast.com!news.comcast.com.POSTED!not-for-mail
NNTP-Posting-Date: Mon, 03 Nov 2003 10:30:21 -0600
Date: Mon, 03 Nov 2003 11:30:19 -0500
From: "Robert I. Eachus" <rieachus@comcast.net>
User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.0; en-US;
 rv:1.4) Gecko/20030624 Netscape/7.1 (ax)
X-Accept-Language: en-us, en
MIME-Version: 1.0
Newsgroups: comp.lang.ada
Subject: Re: Clause "with and use"
References: <3FA2CDCB.500F4AF0@fakeaddress.nil>
 <1tbcqv03boka8k4dirujrrfbepc2cbvscu@4ax.com>
In-Reply-To: <1tbcqv03boka8k4dirujrrfbepc2cbvscu@4ax.com>
Content-Type: text/plain; charset=us-ascii; format=flowed
Content-Transfer-Encoding: 7bit
Message-ID: <056dnSP7J9EAHzuiRVn-gw@comcast.com>
NNTP-Posting-Host: 24.34.214.193
X-Trace: 
 sv3-FmrlpZ8n1r6WZ4x3Cp3I7j5scnyNjGvv3DNX93zc25yzqtCaN7lX/rlIywHJ0D+fITGLC8UD/ccqSY1!XfyeGawIsQpBvlLU1kqPFhVwC364TY9LPJUB4X8r3rAgkOvlFqMqF+ByMSgAlg==
X-Complaints-To: abuse@comcast.net
X-DMCA-Complaints-To: dmca@comcast.net
X-Abuse-and-DMCA-Info: Please be sure to forward a copy of ALL headers
X-Abuse-and-DMCA-Info: Otherwise we will be unable to process your complaint
 properly
X-Postfilter: 1.1
Xref: archiver1.google.com comp.lang.ada:1996
Date: 2003-11-03T11:30:19-05:00
List-Id: <comp.lang.ada>

Dmitry A. Kazakov wrote:

> It would be nice to have something like:
> 
> use all A.B.C.D; to abbreviate:
> 
> use A;
> use A.B;
> use A.B.C;
> use A.B.C.D;
> 
> ------------
> OR, maybe it is worth to invent some mechanism to rename all declared
> entities of a package within another package:
> 
> package A is
>    type Something is ...;
>    procedure Foo;
> end A;
> 
> package B is
>    procedure Bar;
> end B;
> 
> with A, B;
> package Proxy is
>    rename all A;
>       -- = subtype Something is A.Something;
>       --    procedure Foo renames A.Foo;
>    rename all B;
>       -- = procedure Baz renames B.Baz;
> end Proxy;
> 
> Now one can "use" Proxy to see both A.Foo and B.Baz.

Great minds think alike.  I just posted a similar proposal for "use 
all," but I suggested a simpler approach to creating aggregate scopes to 
use it with.

-- 
 
Robert I. Eachus

100% Ada, no bugs--the only way to create software.