Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!titan!polymnia!fred
From: fred@polymnia.tsd.arlut.utexas.edu (Fred Hosch)
Newsgroups: comp.lang.ada
Subject: Unusual "use" semantics
Message-ID: <20@polymnia.tsd.arlut.utexas.edu>
Date: 8 Aug 90 21:21:51 GMT
Organization: Applied Research Labs, University of Texas; Austin, TX
Lines: 24

My Ada compiler complains about the relation on the fourth line of the
following

	with TEXT_IO;
	procedure TEST is
	begin
	    if TEXT_IO.COL = 1 then
	        TEXT_IO.PUT_LINE ("COL is 1");
	    else
	        TEXT_IO.PUT_LINE ("COL is not 1");
	    end if;
	end TEST;

reporting: no operator visible for positive_count "=" universal integer.

If I add a context clause "use TEXT_IO;" it compiles successfully.

Is this a compiler bug or am I missing something in the LRM?

	Fred Hosch
	Applied Research Labs
	UT Austin
	fred@cs.utexas.edu
	fred@titan.tsd.arlut.utexas.edu