From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.5-pre1 (2020-06-20) on
	ip-172-31-74-118.ec2.internal
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=3.0 tests=BAYES_00 autolearn=ham
	autolearn_force=no version=3.4.5-pre1
Date: 15 Jan 92 22:24:11 GMT
From: milo!edm@uunet.uu.net  (Ed Matthews)
Subject: Re: Need Ada question answered
Message-ID: <1992Jan15.222411.6012@verdix.com>
List-Id: <comp.lang.ada>

In article <1992Jan14.205656.3388@cs.ucf.edu> csa@engr.ucf.edu (Carolyn Anderso
n) writes:
>
>I have a data type defined in a package.  I have given the main routine 
>visibility of the type with a WITH statement and qualified my variable 
>declarations with dot notation.  Now, I want to test two quantities of this 
>data type for equality.  How do I give the main routine visibility to the 
>equality operator without the use of a USE clause?

with Package;
procedure Main_Routine is
	function "="(L, R : in Package.Data_Type) return Boolean
		renames Package."=";
begin
	null;
end Main_Routine;
-- 

Ed Matthews                                                edm@verdix.com
Verdix Corporation Headquarters                            (703) 378-7600
Chantilly, Virginia