From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on
	ip-172-31-74-118.ec2.internal
X-Spam-Level: 
X-Spam-Status: No, score=0.8 required=3.0 tests=BAYES_50,FREEMAIL_FROM
	autolearn=ham autolearn_force=no version=3.4.6
X-Received: by 2002:ad4:5f89:: with SMTP id jp9mr311886qvb.130.1643223622502;
        Wed, 26 Jan 2022 11:00:22 -0800 (PST)
X-Received: by 2002:a25:2d43:: with SMTP id s3mr466418ybe.646.1643223622340;
 Wed, 26 Jan 2022 11:00:22 -0800 (PST)
Path: eternal-september.org!reader02.eternal-september.org!news.misty.com!border2.nntp.dca1.giganews.com!nntp.giganews.com!news-out.google.com!nntp.google.com!postnews.google.com!google-groups.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Wed, 26 Jan 2022 11:00:22 -0800 (PST)
In-Reply-To: <3ecb1915-5e53-40bd-aaba-96ac52e774b1n@googlegroups.com>
Injection-Info: google-groups.googlegroups.com; posting-host=94.31.100.23; posting-account=rmHyLAoAAADSQmMWJF0a_815Fdd96RDf
NNTP-Posting-Host: 94.31.100.23
References: <lymtjisahx.fsf@pushface.org> <3ecb1915-5e53-40bd-aaba-96ac52e774b1n@googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <2c201046-a0f0-48aa-a8a1-f177d5349e45n@googlegroups.com>
Subject: Re: Generic formal ">"
From: AdaMagica <christ-usch.grein@t-online.de>
Injection-Date: Wed, 26 Jan 2022 19:00:22 +0000
Content-Type: text/plain; charset="UTF-8"
Xref: reader02.eternal-september.org comp.lang.ada:63405
List-Id: <comp.lang.ada>

GNAT CE 2021 produces the wrong result. You should definitely report this.

Data'Length: 2
Data'Length > 1: FALSE
Integer'(Data'Length) > 1: TRUE
Standard.">" (Data'Length, 1): FALSE
Standard.">" (Integer'(Data'Length), 1): TRUE
[2022-01-26 19:53:10] process terminated successfully, elapsed time: 02.39s