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
X-Google-Thread: 103376,f47e0c6e2e5fd00d,start
X-Google-Attributes: gid103376,public
From: Harald Schmidt <Harald.Schmidt@tomcat.de>
Subject: Function name problem
Date: 2000/01/15
Message-ID: <B4A633AE.3FF3%Harald.Schmidt@tomcat.de>#1/1
X-Deja-AN: 572955252
Content-Transfer-Encoding: 8bit
Content-Type: text/plain; charset="ISO-8859-1"
X-Complaints-To: abuse@de.uu.net
Organization: Customer of UUNET Deutschland GmbH, Dortmund, Germany
Mime-Version: 1.0
User-Agent: Microsoft Outlook Express Macintosh Edition - 5.0 (1513)
NNTP-Posting-Date: 15 Jan 2000 13:25:51 GMT
Newsgroups: comp.lang.ada
Date: 2000-01-15T13:25:51+00:00
List-Id: <comp.lang.ada>

Hi,

I want to declare two function, but the 2nd is not
allowed by GNAT3.12. Could someone tell me why?
Here are the two declarations:

package bla is
    type Object is tagged limited private;
    function "=" (Left, Right: in Object�Class) return Boolean;
    function "==" (Left, Right: in Object�Class) return Boolean;
private
    type Object is tagged limited null record;
end bla;

Thanks for any info,

    Harald