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-65-14.ec2.internal
X-Spam-Level: 
X-Spam-Status: No, score=-3.2 required=3.0 tests=BAYES_00,NICE_REPLY_A,
	T_SCC_BODY_TEXT_LINE autolearn=ham autolearn_force=no version=3.4.6
Path: eternal-september.org!feeder.eternal-september.org!.POSTED!not-for-mail
From: =?UTF-8?Q?Bj=c3=b6rn_Lundin?= <bnl@nowhere.com>
Newsgroups: comp.lang.ada
Subject: Re: Assignment access type with discriminants
Date: Wed, 22 Mar 2023 10:31:58 +0100
Organization: A noiseless patient Spider
Message-ID: <tvehue$ijrf$1@dont-email.me>
References: <tveh6u$ihpu$1@dont-email.me>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8; format=flowed
Content-Transfer-Encoding: 8bit
Injection-Date: Wed, 22 Mar 2023 09:31:58 -0000 (UTC)
Injection-Info: dont-email.me; posting-host="0018d217993fc5ad95359477c1bfdac3";
	logging-data="610159"; mail-complaints-to="abuse@eternal-september.org";	posting-account="U2FsdGVkX18GNBD1T0cPkaWy3WO9jgs0"
User-Agent: Mozilla/5.0 (X11; Linux x86_64; rv:102.0) Gecko/20100101
 Thunderbird/102.8.0
Cancel-Lock: sha1:bX4FC5oudq8UiaIzthrqm+ZT4Yk=
In-Reply-To: <tveh6u$ihpu$1@dont-email.me>
Content-Language: en-US
Xref: feeder.eternal-september.org comp.lang.ada:65009
List-Id: <comp.lang.ada>

On 2023-03-22 10:19, Dmitry A. Kazakov wrote:
> I stumbled on a curious fact.
....
> Is this a compiler bug or intentional language design? Any language 
> lawyers?
> 

I get
Execution of ./test terminated by unhandled exception
raised CONSTRAINT_ERROR : test.adb:18 discriminant check failed
Call stack traceback locations:
0x402c33 0x402b27 0x7f335b5cfd8e 0x7f335b5cfe3e 0x402b63 0xfffffffffffffffe

bnl@hp-t510:/usr2$ gnatls -v
GNATLS Pro 22.2 (20220605-103)

Linux 64bit - ubuntu 22.04

So it is (also) present on that platform at least


-- 
/Björn