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
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,6cb2525ffbfe23ce
X-Google-Attributes: gid103376,public
From: tmoran@bix.com (Tom Moran)
Subject: Re: Why both "with" and "use"?
Date: 1999/02/13
Message-ID: <36c60d14.12851112@news.pacbell.net>#1/1
X-Deja-AN: 444112774
References: <36C5B28C.F32C43A4@jps.net> <m2socaxfjw.fsf@wf-rch.cirr.com>
 <m3lni1ucb9.fsf@mheaney.ni.net>
X-Complaints-To: abuse@pacbell.net
X-Trace: typhoon-sf.pbi.net 918949378 206.170.24.39 (Sat,
 13 Feb 1999 15:42:58 PDT)
Organization: SBC Internet Services
NNTP-Posting-Date: Sat, 13 Feb 1999 15:42:58 PDT
Newsgroups: comp.lang.ada
Date: 1999-02-13T00:00:00+00:00
List-Id: <comp.lang.ada>

>package Digitizer_Id_Types is

>   type Digitizer_Id is range 1 .. 2;

>end Digitizer_Id_Types;


>with Digitizer_Id_Types;  use Digitizer_Id_Types;
>...

>   Digitizer : Digitizer_Id;
alternatively, you could do
 package Digitizers is
   type ID is range 1 .. 2;
   ...
end Digitizers;
with Digitizers;
...
  Digitizer : Digitizers.ID;
which would leave out the Use clause, let the compiler help make sure
the naming is right, and let the maintainer or simple minded source
code tool easily spot the origin of Digitizers.ID.